菜鸟请教一个最简单的问题
我想做一个学习成绩考核表，为什么总不成功，帮我看看是什么地方出了问题
Private Sub Command1_Click()
Dim a As Integer
Dim b As Byte
a = tetFen.Text
b = tetPenlun.Text
If a >= 90 Then
b = "良"
ElseIf a >= 80 Then
b = "优"
ElseIf a >= 70 Then
b = "秀"
ElseIf a >= 60 Then
b = "及格"
Else
b = "不及格"
End If
End Sub
Private Sub Form_Load()
tetFen.Text = ""
tetPenlun.Text = ""
End Sub
