Lấy kết quả từ Form vào tính toán (bị lỗi)

[thanhlanh]

Tôi có một Form dùng để chọn chi phí nhưng bị lỗi trong trường hợp kết quả lấy từ form là số thập phân và Decimal Symbol trong Control Panel chọn dấu "," các trường hợp khác thì sử dụng được. Nhờ các cao thủ tư vấn khắc phục lỗi và góp ý hoàn thiện code.
Xin nhiệt liệt cảm ơn!

 

[hanhpptc]

Chắc là lỗi giá trị tính toán.

 

[viehoai]

Tôi có một Form dùng để chọn chi phí nhưng bị lỗi trong trường hợp kết quả lấy từ form là số thập phân và Decimal Symbol trong Control Panel chọn dấu "," các trường hợp khác thì sử dụng được. Nhờ các cao thủ tư vấn khắc phục lỗi và góp ý hoàn thiện code.
Xin nhiệt liệt cảm ơn!

Trong code của bạn dấu thập phân là "." nhưng trong hệ thống là "," bạn xem lại code trong Form nha

 

[thanhlanh]

Chắc là lỗi giá trị tính toán.

Vậy phải dùng textbox chớ không dùng label được hả Bạn? Chỉ tại mình muốn label cho đẹp ấy mà.
Bây giờ thì được rồi nhưng mà phải sửa lại chương trình nhiều vì Bạn đã chia biến cho 100, cảm ơn Bạn!

Trong code của bạn dấu thập phân là "." nhưng trong hệ thống là "," bạn xem lại code trong Form nha

Nhưng mà trong code đâu cho nhập dấu "," bừa bãi đâu (Chỉ tại mình không biết dùng, lơ tơ mơ quá). Cảm ơn Bạn!
---------------------------------------------------------------
Các bạn xem luôn giùm các câu lệnh:
chiphittk.Value = "" ' khi mình muốn xóa biến
và
If chiphittk.Value <> "" ' khi muốn kiểm tra biến
Mình dùng nó nhưng cảm thấy không ổn hoặc không chuyên nghiệp mặc dù không thấy bị lỗi

 

[viehoai]

Nhưng mà trong code đâu cho nhập dấu "," bừa bãi đâu

Bởi vậy mình mới dùng hàm Replace() để khắc phục

 

[thanhlanh]

Bởi vậy mình mới dùng hàm Replace() để khắc phục

Xin lỗi Viehoai vì lúc nãy chưa kịp xem file của Bạn, mình đính chính lại rồi!
Vậy có thể dùng code này cho các máy có ".", "," khác nhau không Bạn?

 

[viehoai]

Xin lỗi Viehoai vì lúc nãy chưa kịp xem file của Bạn, mình đính chính lại rồi!
Vậy có thể dùng code này cho các máy có ".", "," khác nhau không Bạn?

Mình nghĩ là được, bởi vì khi có thì thay thế, còn không thì thôi (code không thực hiện hàm Replace(...) Bạn thử đổi dấu hệ thống xem, mình chưa thử)

 

[thanhlanh]

Mình nghĩ là được, bởi vì khi có thì thay thế, còn không thì thôi (code không thực hiện hàm Replace(...) Bạn thử đổi dấu hệ thống xem, mình chưa thử)

Thử được rồi, nhưng chưa yên tâm nên hỏi.
À, vậy hàm Replace khi nó không tìm thấy cũng im lặng không báo lỗi. Giờ mới biết!