我用的是VB6.0.我做了一个程序，用来显示成绩的结果。假设输入学生成绩（Score），如果分数小于 60 ，标签（LblShow）显示“成绩不及格”；如果分数大于 90 ，标签显示“成绩优秀”；如果分数介于两者之间，标签显示“成绩优良”。
我在确定按钮输入如下代码：

Private Sub Command1_Click()
Dim sore As Integer
sore = Text1.Text
If Score < 60 Then
    lblshow.Caption = "成绩不及格"
ElseIf Score > 90 Then
    lblshow.Caption = "成绩优秀"
Else
    lblshow.Caption = "成绩优良"
End If
End Sub
结果我点运行以后，不管在text1.text框中输入的是多少，在lblshow显示的都是不及格，我不知道我错那儿了，请高手指点.感激不尽。

sore = Text1.Text
If Score < 60 Then
变量名Score跟之前的sore不同，所以你不论输入多少，Score的数值是不确定的。另外，最好使用Val函数把文本框的数据从字符串转换为数值。

原来是这样一个不该犯的小错误，非常感谢。