网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
设有如下窗体单击事件过程： Private Sub Form_Click（) a = 1 For i= 1 To 3 Select Case i Case 1,3 a= a+1 Case 2,4 a = a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出的结果是（)。
A．3
B．4
C．5
D．6
参考答案和解析
C 解析：Select Case结构运行时，首先计算“表达式”的值，它可以是字符串或者数值变量或表达式。然后会依次计算测试每个Case表达式的值，直到值匹配成功，程序会转入相应Case结构内执行语句。本题中，当i=1和3的时候，执行a=a+l，当i=2时，执行a=a+2，所以a=1+1+2+1=5。
更多 “设有如下窗体单击事件过程： Private Sub Form_Click（) a = 1 For i= 1 To 3 Select Case i Case 1,3 a= a+1 Case 2,4 a = a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出的结果是（)。A．3B．4C．5D．6” 相关考题
考题
（ 32 ）设有如下窗体单击事件过程：Private Sub Form. Click （）a ＝ 1For i ＝ 1 To 3Select Case iCase 1 ， 3a ＝ a ＋ 1Case 2, 4a ＝ a ＋ 2End SelectNext iMsgBox aEnd Sub打开窗体运行后，单击窗体，则消息框的输出的结果是A ） 3B ） 4C ） 5D ） 6
考题
在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVa1 x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(1)If i＞4 Then i=i*2MsgBox iEnd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为______。
考题
设有如下窗体单击事件过程：Private Sub Form Click( )x=1For i=1 To 3Select Case ICase 1,3x=x+3Case 2,4x=x-2End SelectNext IMsgBox xEnd Sub打开窗体运行后，单击窗体，则消息框的输出结果是______。
考题
设有以下窗体单击事件过程：Private Sub Form_Click()a=1For i=1 To 3End SelectNext iEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是( )。
考题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVal x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(i)If i＞4 Then i=i*2End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
考题
在窗体中添加一个命令按钮(名称为Command1) ，然后编写如下代码： Private Sub Command1_Click( ) A=95 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．1B．2C．3D．4
考题
设有如下窗体单击事件过程： Private Sub Form Click( ) a＝1 For i＝1 To 3 Select Case i Case 1,3 a＝a+1 Case 2,4 a＝a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出结果是__A．3B． 4C． 5D． 6
考题
在窗体上有一个命令按钮Command1，编写事件代码如下：Private Sub Command1_Click()Dim a(10)，P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是( )。
考题
设有以下窗体单击事件过程：Private Sub Form_C1ick( )a=1For i=1 To 3Select Case ICase 1,3a=a+1Case 2,4a=a+2End SelectNext IMsgBox aEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是______。
考题
设有如下窗体单击事件过程： Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1 a=a+1 Case 2, 4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出结果是( )。A．3B．4C．5D．6
考题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_CliCk() A=75 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．1B．2C．3D．4
考题
在窗体中添加—个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() s="ABBACDDCBA" For I=6 To 2 Step -2 x=Mid(s,I,I) y=Left(s,I) z=Right(s,I) z=x y z Next I MSgBox z End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．AABAABB．ABBABAC．BABBAD．BBABBA
考题
给出窗体单击事件过程：PRIVATE SUB FORM_CLICK( )DIM A AS INTEGERA =VAL( INPUTBOX( "PLEASE INPUT A NUMBER" ))SELECT CASE A MOD 5CASE IS＜4W=A+10CASE IS＜2W=A.2CASE ELSEW=A-10END SELECTMSGBOX WEND SUB当运行程序后，设输入的数据分别为14、3、125、21时，消息框显示的内容分别是【 】。
考题
设有以下窗体单击事件过程：Private Sub Form_Click()a＝1For i＝1 To 3Select Case iCase 1,3a＝a＋1Case 2,4a＝a＋2End SelectNext iMsgBox aEnd Sub打开窗体运行后，单击窗体消息框的输出内容应为【 】。
考题
设有下列窗体单击事件过程：Pfivate Sub Form_Click()a＝1For i＝1 To 3Select Case ICase 1,3a＝a+1Case 2,4a＝a+2End SelectNext IMsgBox aEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是______。
考题
设有以下窗体单击事件过程：Private Sub Form_Click()a=1For i=l To 3Select Case iCase 1，3a=a+1Case 2,4a=a+2End SelectNext iMsgBox aEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是______。
考题
设有如下程序： Private Sub Form_Click() A=1 For i＝1 To 3 Select Case i Case 1,3 A＝A+1 Case 2,4 A＝A+2 End Select Next i Print A End Sub 程序运行后，单击窗体，则在窗体上显示的内容是A．6B．5C．4D．3
考题
在窗体上添加有一个命令按钮，(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next I MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是 ______。A．7B．15C．157D．538
考题
若有以下窗体单击事件过程：Private Sub Form_Click()result=1For i=1 To 6 step 3result=result*iNext iMsgBox resultEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是A．1B．4C．15D．120
考题
设有如下窗体单击事件过程： Private Sub Fom_Click． a =1 For i –To3 Select Case i Case 1,3 a =a +1 Case2,4 a =a +2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出的结果是 A．3 B．4 C．5 D．6
考题
在窗体中添加一个名为Command1的命令按钮，然后编写如下程序：Private Sub s(By Val p As Integer)p=p*2End SubPrirate Sub Command1_Click( )Dim i As Integeri=3Call s(i)If i＞4 Then i=i^2MsgBox IEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
考题
某个窗体己编写下列事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 ______。Pfivate Sub Form_Click()a＝1i＝1Do Until i10a＝a+2i＝i+3LoopMsgBox aEnd Sub
考题
若有以下窗体单击事件过程：Private SubForm_Click（ ） result=1 For i=1To 6 Step 3 result=result*i Next i MsgBoxresult End Sub打开窗体运行后，单击窗体，则消息框的输出内容是（ ）。A.1B.4C.15D.120
考题
在窗体上有一个名为num2的文本框和run11的命令按钮，事件代码如下： Private Sub run11 Click（ ） Select Case num2 Case 0 Result=“0分” Case 60 T0 84 result= “通过” Case IS=85 result= “优秀” Case Else result=“不合格” End Select MsgBox result End Sub 打开窗体，在文本框中输入80，单击命令按钮，输出结果是（ ）。A.合格B.通过C.优秀D.不合格
考题
设有如下窗体单击事件过程： Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1,3 a=a+l Case2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出结果是______。A．3B．4C．5D．6
考题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=l To 4 x=4 For j=1 To 3 x=3 Fork=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是( )。A．7B．15C．157D．528
考题
试题31若有以下窗体事件过程：Private Sub Form_Click()result=1For i=1 To 6 step 3Result = result * 1Next iMsgBox resultEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是（）A．1B．4C．15D．120
考题
单选题当下面程序运行后，单击窗体在对话框中输入10，则输出的结果是（） Private Sub Form_Click（） score=InputBox（"输入"） Select Case score CaseIs＜10 a$="F" Case 10 To 19 a$="D" Case 20 To 29 a$="C" Case 30 To 39 a$="B" Case Else a$="A" End Select Printa$ End SubA
AB
BC
CD
D
热门标签
最新试卷
