选修VB操作题(打印)讲解(共9页).doc

精选优质文档-倾情为你奉上186、举重比赛，60公斤级选手体重不能超过60公斤。 修改程序中的(1)(2)(3)，使得在文本Text1中输入一个大于60的数时，标签Label1显示“超重！不能参赛！”，当输入一个小于等于60的数时，标签Label1显示“合格，可以参赛！”。Private Sub Command1_Click() Dim t As Single 定义变量t，值由文本框Text1读入 t = (1) If (2) Then Label1.Caption = 超重！不能参赛！ Else Label1.Caption = 合格，可以参赛！ (3)End Sub参考答案：(1) val(text1.text) (2) t60 (3) End If187、填空完成程序，使得单击显示按钮时，Label1、Label2分别显示30，10。程序代码:Private Sub Command1_Click() Dim x, y