大家好,我在学习VB时发生的一个问题

大家好,我在学习VB时发生的一个问题,第1张

他们不是在菜单栏里的,是在左边的工具箱中,有的大写的A的就是标签控件,命令按钮控件则是写在小写ab的下面的那个就是。

分别单击这两个控件,然后画到窗体上即可,或者直接在控件上双击,

然后在属性窗口中,修改它们的名称分别为lblShow,和CmdOK

建一表单,加入一个文本框text1,加入一个标签控件lblshow,双击Text1控件,录入以下代码:

Private Sub Text1_Change()

Dim Score As Integer

Score = Val(Text1.Text)

If Score <60 Then

lblshow.Caption = "成绩不及格"

ElseIf Score >90 Then

lblshow.Caption = "成绩优秀"

Else

lblshow.Caption = "成绩优良"

End If

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/bake/11519918.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-16
下一篇2023-05-16

发表评论

登录后才能评论

评论列表(0条)

    保存