单项选择题
窗体上有名称分别为Text1、Text2的两个文本框,有一个由三个单选按钮构成的控件数组Option1,如图3所示。程序运行后,如果单击某个单选按钮,则执行Text1中的数值与该单选按钮所对应的运算(乘以1、10或100),并将结果显示在Text2中,如图4所示。为了实现上述功能,在程序中的问号()处应填入的内容是
Private Sub Option1_Click(Index As Integer)
If Text1.Text<>"" Then
Select Case
Case 0
Text2.Text=Val(Text1.Text)
Case 1
Text2.Text=Val(Text1.Text)*10
Case 2
Text2.Text=Val(Text1.Text)*100
End Select
End If
End Sub
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
设有如图2所示的窗体和以下程序: Private Sub Command1_Click() Text1.Text= Visual Basic End Sub Private Sub Text1_LostFocus() If Text1.Text<> BASIC Then Text1.Text= Text1.SetFocus End If End Sub 程序运行时,在Text1文本框中输入Basic(如图2所示),然后单击Command1按钮,则产生的结果是
点击查看答案&解析
单项选择题
窗体上有一个名称为Picture1的图片框控件和一个名称为Label1的标签控件,如图5所示。现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x.Caption= 计算机等级考试 Else x.Picture=LoadPicture( pic.jpg ) End If End Sub Private Sub Label1_Click() Call display(Label1) End Sub Private Sub Picture1_Click() Call display(Picture 1) End Sub 对以上程序,下列叙述中错误的是
点击查看答案&解析
相关试题
以下程序的功能是:从键盘任意输入正整数n...
以下函数的功能是:将一个(0~255)之...
在窗体上画一个命令按钮和一个文本框,其名...
在窗体上画一个文本框,名称为Text1,然后...
在深度为7的满二叉树中,度为2的节点个数...