1. Mọi người giúp mình viết câu lệnh để gán cho textBox xếp loại với.
Lúc đầu mình viết như thế này nhưng báo lỗi hoài.
Private Sub cmdxeploai_Click()
If txtTB >= 8 Then txtketqua = "Gioi"
ElseIf txtTB >= 6.5 And txtTB < 8 Then txtketqua = " Kha"
ElseIf txtTB >= 5 And txtTB < 6.5 Then txtketqua = "Trung Binh"
Else: txt = " Yeu"
End If
https://www.dropbox.com/s/klndh0ai6dmzdq...h.png?dl=0