单项选择题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Commandl_Click( ) n=Text1.Text Select Case n Case 1 T0 20 x=10 Case 2，4，6 x=20 Case ls<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是

A．10 B。20
C．30
D．40

<上一题目录下一题>

热门试题

单项选择题

在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3，La- bel4、Label5、Label6，其中标签Label4～Label6分别显示“A”；“B”、“A*B”等文字信息，标签Label1、La- bel2分别显示其右侧的滚动条的数值，LabeB显示A*B的计算结果。如图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是

A．Private Sub Command1_Click( )

Labe3.Caption=Str(Vs1(Label1.Captio*Val(Label2.Captio) End Sub
B．Private Sub Command1_Click( ) Labe3.Caption=Hscroll1.Value*Hscrol12.Value End Sub
C．Private　Sub　Command1_Click( ) Labe3.Caption=Hscrol11*Hscrol12 End Sub
D．Private　Sub　Command1＿Chek(　　) 　　　　 Labe13.Caption=Hscrol11.Text*Hscrol12.Text End Sub

单项选择题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．10 5
B．20 5
C．20 40
D．10 40

相关试题