网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
试题31
若有以下窗体事件过程：
Private Sub Form_Click()
result=1
For i=1 To 6 step 3
Result = result * 1
Next i
MsgBox result
End Sub
打开窗体运行后，单击窗体，则消息框的输出内容是（）
A．1
B．4
C．15
D．120
参考答案
更多 “ 试题31若有以下窗体事件过程：Private Sub Form_Click()result=1For i=1 To 6 step 3Result = result * 1Next iMsgBox resultEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是（）A．1B．4C．15D．120 ” 相关考题
考题
（ 23 ）在窗体上画 1 个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i=5 to 1 step -0.8Print Int(i);Next iEnd Sub运行程序，单击命令按钮，窗体上显示的内容为A ） 5 4 3 2 1 1B ） 5 4 3 2 1C ） 4 3 2 1 1D ） 4 4 3 2 1 1
考题
在窗体中使用一个文本框(名为n) 接受输入的值，有一个命令按钮run，事件代码如下：Private Sub run_Click()result＝""For i＝1 To Me!nFor j＝1 To Me!nresult＝result+"*"Next jresult＝result+Chr(13) +Chr(10)Next IMsgBox resultEnd Sub打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图形是( )A．B．C．D．
考题
运行下列程序，单击窗体后输出的结果是( )。Private Sub Form_Click()Dim aDim s As Integer, i As Integera = Array(1, 2, 3, 4, 5, 6)s = 1For i = 5 To 1 Step -2s = s * a(i)Next iPrint sEnd SubA、 15B、 48C、 120D、 720
考题
设有如下程序：Private Sub Form_Click()Dim i As Integer，x As String,Y As Stringx=”ABCDEFG”For i=4 To 1 Step-1y=Mid(x，i，i)+yNext iPrint yEnd Sub程序运行后，单击窗体，输出结果为A．ABCCDEDEFGB．AABBCDEFGC．ABCDEFGD．AABBCCDDEEFFGG
考题
在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1-Click()For i=5 To 1 Step-0．8Print Int(i)；Next iEnd Sub运行程序，单击命令按钮，窗体上显示的内容为A．5 4 3 2 1 1B．5 4 3 2 1C．4 3 2 1 1D．4 4 3 2 1 l
考题
设有以下窗体单击事件过程：Private Sub Form_Click()a=1For i=1 To 3End SelectNext iEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是( )。
考题
请阅读程序：Private Sub Form_Click()m=1For i=4 To 1 Step-1Print Str(m)；m=m+1For j=1 To iPrint”*”；Next jPrintNext iEnd Sub程序运行后，单击窗体，则输出结果是( )。A．1**** 2*** 3** 4*B．4* 3** 2*** 1****C．**** *** ** *D．* ** *** ****
考题
设有如下窗体单击事件过程： 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
考题
设有如下窗体单击事件过程： 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
考题
编写如下事件过程： Private Sub Form_Click() k=2 Ifk＞=1 Then A=3 Ifk＞=2 Then A=2 Ifk＞=3 Then A=1 Print A End Sub 程序运行后，单击窗体，输出的结果为 ______。A．1B．2C．3D．出错
考题
某个窗体己编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为【 】。Private Sub Form_Click()Dim k as Integer， n as Integer，m as Integern=10 ：m=1 : k=1Do While k＜=nm=m*2k=k+1LoopMsgBox mEnd Sub
考题
设有以下窗体单击事件过程：Private 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. Active ( )Dim Score (1 to 3) As IntegerDim i As IntegerDim t As VariantFori=3 To 1 step-1Score (i) = 2 * iNextFor Each t In ScorePrint tNextEnd Sub程序运行后窗体上显示的值为【 】。
考题
编写如下事件过程： Private Sub Form_Activate() Dimscore(1 to 3)As Integer Dimi As Integer Dim t As Variant Fori= 3 To 1 Step-1 score(i)=2*i Nexti ForEach t Inscore Printt Next End Sub 程序运行后窗体上显示的值是( )。A．642B．246C．2D．6
考题
设有以下窗体单击事件过程：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
考题
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是A．Private Sub Forml_Click() … End SubB．Private Sub Form_Click() … End SubC．Private Sub Commandl_Click() … End SubD．Private Sub Command_Click() … End Sub
考题
若有以下窗体单击事件过程：Private Sub Form_Click()result=1For i=1 To 6 step 3result=result*iNext iMsgBox resultEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是A．1B．4C．15D．120
考题
使用窗体的Click事件在窗体输出1～1000之间能同时被5和7整除的整数，如图所示，请填空Private Sub Form_Click()Dim i As IntegerDim Sum As IntegerClsFor i=1 To 1000If 【 】 ThenSum=Sum+iPrintiEnd IfNext iPrintPrint"Sum="SumEnd Sub
考题
在窗体中使用一个文本框名为n．接受输入的值，有一个命令按钮run，事件代码如下： Private Sub run_Click( ) result = "" For i = 1 To Me!n For j = 1 To Me!n result = result + "*" Next j result = result + Chr(13) + Chr(10) Next i MsgBox result End Sub 打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图型是A． * * * * * * * * * * * * * * * *B． * * * * * * * * * * * * * * * *C． * * * * * * * * * * * * * * * * * * * * * * * * * * * *D． * * * * * * * * * * * * * * * *
考题
在窗体中使用一个文本框名为num1．接受输入值，有一个命令按钮run13，事件代码如下： Private Sub run13_Click If Me!num1 = 60 Then result = "及格" ElseIf Me!num1 = 70 Then result = "通过" ElseIf Me!num1 = 85 Then result = "合格" End If MsgBox result End Sub 打开窗体后，若通过文本框输入的值为85，单击命令按钮，输出结果是 【13】 。
考题
某个窗体己编写下列事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 ______。Pfivate Sub Form_Click()a＝1i＝1Do Until i10a＝a+2i＝i+3LoopMsgBox aEnd Sub
考题
在窗体上画1个命令按钮，并编写如下事件过程： private Sub Command1_Click（ ） For i=5 To 1 Step-0．8 Print Int(i)； Next i End Sub 运行程序，单击命令按钮，窗体上显示的内容为（ ）。A.5 4 3 2 1 1B.5 4 3 2 1C.4 3 2 1 1D.4 4 3 2 1 1
考题
若有以下窗体单击事件过程：Private SubForm_Click（ ） result=1 For i=1To 6 Step 3 result=result*i Next i MsgBoxresult End Sub打开窗体运行后，单击窗体，则消息框的输出内容是（ ）。A.1B.4C.15D.120
考题
在窗体中使用一个文本框(名为n．接受输入的值，有一个命令按钮run，事件代码如下：Private Sub run_Click( ．result = For i= 1 To Me!nFor j = 1 To Me!nresult = result + *Next jresult = result + Chr(13． + Chr(10．Next iMsgBox resultEnd Sub打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图形是
考题
设有如下窗体单击事件过程： 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
考题
若有以下窗体单击事件过程：Private SubForm_Click（ ）result=1For i=1To 6 Step 3result=result*iNext iMsgBoxresultEnd Sub打开窗体运行后，单击窗体，则消息框的输出内容是（ ）。A.1B.4C.15D.120
热门标签
最新试卷
