Thầy cho hỏi em dung code nhưng tb_thanhtien không hiện kết quả:
Private Sub Tb_SoLuong_Change()
If tb_SoLuong <> "" And tb_Dongia <> "" Then
tb_ThanhTien = tb_SoLuong * tb_DonGia
End If
End Sub
Chào bạn bạn thử với code sau
Private Sub Tb_SoLuong_Change()
If tb_SoLuong <> "" And tb_DonGia <> "" Then
tb_ThanhTien.Text = tb_SoLuong.Text * tb_DonGia.Text
End If
End Sub
Để hiện kết quả thành tiền bạn phải nhập cả số lượng và đơn giá mới được nhé, vì trong cấu trúc IF có xét cả 2 trường hợp Số lượng <>"" và Đơn giá <>"" mà.
Mình thấy file của bạn đã làm đúng rồi. Chỉ là bạn nhập thiếu 1 textbox nên không ra kết quả thành tiền thôi.
Em đã thử rồi nhưng không hiện kết quả tb_ThanhTien, có cần set-up gì trong VBA không, file mẫu của bài học vẫn chạy bình thường nhưng file của em thì không?
Chào bạn không cần setup gì bạn nhé. bạn thử dubug khi nhập số lượng hoặc đơn giá có chạy đoạn code tính toán trên không?