Sao kết quả thành tiền như trong bài giảng thế nàyPrivate Sub tb_soluong_Change()If

Sao em làm kết quả thành tiền như trong bài giảng thế này

Private Sub tb_soluong_Change()

If tb_soluong <> "" And tb_Dongia <> "" Then

tb_thanhtien = tb_soluong * tb_Dongia

Private Sub tb_Dongia_Change()

If tb_soluong <> "" And tb_Dongia <> "" Then

tb_thanhtien = tb_soluong * tb_Dongia

mà nó ko ra

mà giờ làm theo bên dưới thì ra và ko hiểu Code bên dưới lắm

Private Sub Tb_soluong_Change()

On Error Resume Next
If Tb_soluong <> "" And tb_dongia<> "" Then
Tb_thanhtien = Tb_soluong * tb_dongia_n
Else: Tb_thanhtien = 0
End If
On Error GoTo 0
End Sub

3 câu trả lời

130 lượt xem

vỗ tay

Hằng Nguyễn 16:03 - Mar 26, 2021

Chào bạn code dưới sẽ check nếu có số lượng và đơn giá thì sẽ tính còn không trả ra là 0 còn lại bỏ qua tất cả các lỗi

vỗ tay

Hằng Nguyễn 16:03 - Mar 26, 2021

nhừng mà code đầu sao làm ko ra vậy thầy, có phải đơn giá nó dính với tên hàng không ạ, trường hợp nào mình sử dụng bên dưới ạ

vỗ tay

Hằng Nguyễn 17:03 - Mar 26, 2021

Chào bạn với code

Private Sub tb_soluong_Change()
If tb_soluong <> "" And tb_Dongia <> "" Then
tb_thanhtien = tb_soluong * tb_Dongia

về cú pháp là đang thiếu end if

Private Sub tb_soluong_Change()
If tb_soluong <> "" And tb_Dongia <> "" Then
    tb_thanhtien = tb_soluong * tb_Dongia
else
    tb_thanhtien = 0
end if

bạn debug để xem tb_soluong và tb_Dongia có giá trị không nhé.

vỗ tay

Gói Hội viên Gitiho: Trọn bộ khoá học theo Khung năng lực

Gói Hội viên G-Skills: 03 kỹ năng bổ trợ thiết yếu

Sao kết quả thành tiền như trong bài giảng thế nàyPrivate Sub tb_soluong_Change()If

Câu hỏi liên quan