Ðề: Hỏi cách viết 1 hàn function tính điểm TB
Function DiemTB(Ma As String) As Single
Dim Toan, Van
Toan = DlookUp("DiemToan", "tblDiem", "MaHS = '" & Ma & "'")
Van = DlookUp("DiemVan", "tblDiem", "MaHS = '" & Ma & "'")
DiemTB = (Toan * 3 + Van * 2)/5
End Function