VB编程有个错误。。高手来看看

来源：百度知道 编辑：UC知道 时间：2024/06/19 04:51:56
Private Sub c1_click()
x = Val(Text1.Text)
If x > 100 Or x < 0 Then
MsgBox "输入成绩错误，程序退出!"
End
End If
If x >= 85 Then
strtemp = "该生成绩优秀"
ElseIf x >= 60 Then
strtemp = "该生成绩合格"
Else
strtemp = "该生成绩不合格"
End If
Label3.Caption = "该生成绩"
End Sub
高手门来看看该怎么改啊

洒家不戒女色 你懂不懂啊？？ 我重新写 是因为楼主写的比较杂乱
楼主少的是 将strtemp赋值给label显示出来。。难道这个这么简单的也要人教？如果是 我想这个人应该没什么天分学编程了。
Private Sub Form_click()
x = Val(Text1.Text)
If x < 60 Then
strtemp = "该生成绩不合格"
ElseIf x >= 60 And x < 85 Then
strtemp = "该生成绩合格"
ElseIf x >= 85 And x <= 100 Then
strtemp = "该生成绩优秀"
Else
MsgBox "输入成绩错误，程序退出!"
End If
Label3.Caption = "该生成绩"
End Sub

label3.caption=x 赋值问题
```````````````````````````````
本程序没有语言和逻辑方面的错误!!!!!!!!!!!!!!!
楼主想问的到底是什么?

那我问你90分是不是大于85，是不是应该是该生成绩优秀。但是你再想下90也大于60.所以就出现 了 逻辑错误。你在 85 后面再加上小于等于总分。要不然写个10000 岂不是还是成绩优秀，哪有这样的分数。 最重要的是在大于等与60 后面加小于85.就好了。 呵呵。 我学习VB 的时候也有过这样的问题， 祝你成功，加油。 你给的不是很详细，目前就发现这个。还有别的问题在给我留言。 记得给分我哦。

二楼到底看不看得懂程序 这个程序的判断没错。。

不知道楼主错在那句 或者是哪里没达到预期？

--------------------------------------------
【mosquitokobe - 首席运营官 十二级】同志：
拜托我说的是 【 zjlzx111 - 助理