网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
假定有如下事件过程：
Private Sub Form_Click（）
Dim x As Integer, n As Integer
x = 1
n = 0
Do While x < 28
x = x * 3
n = n + 1
Loop
Print x, n
End Sub
程序运行后，单击窗体，输出结果是（ ）。
A．81 4
B．56 3
C．28 1
D．243 5
参考答案
更多 “ 假定有如下事件过程：Private Sub Form_Click（）Dim x As Integer, n As Integerx = 1n = 0Do While x 28x = x * 3n = n + 1LoopPrint x, nEnd Sub程序运行后，单击窗体，输出结果是（ ）。A．81 4B．56 3C．28 1D．243 5 ” 相关考题
考题
假定有如下事件过程： Privte Sub Form_Click0 Dim x As Integer,n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x,n End Sub 程序运行后，单击窗体，输出结果是( )。A．81 4B．56 3C．28 1D．243 5
考题
某个窗体已编写如下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为______。PrivateSubForm_Click()DimKasInteger,nasInteger,masIntegern=10：m=1:k=1DoWhileK＜=nm=m*2k=k+1LoopMsgBoxmEndSub
考题
假定有如下事件过程： Privte Sub Form_Click() Dim x As Integer，n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x，n End Sub 程序运行后，单击窗体，输出结果是A．81 4B．56 3C．28 1D．243 5
考题
假定有如下事件过程： Phvate Sub Form_Click() DimXASInteger，nASInteger x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Ptint x,n End Sub 程序运行后，单击窗体，输出结果为______。A． 81 4B．56 3C．28 1D．243 5
考题
假定有如下事件过程： Private Sub Form. Click() Dim x As Integer, n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x, n End Sub 程序运行后，单击窗体，输出结果是______。A．81 4B．56 3C．28 1D．243 5
考题
|在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Commandl_Click（ ） Dim X As Integer，Y As Integerx=12：y=32Call Proc（x，y）EndSubPublic Sub Proc{n As Integer，ByVM mAs mteger}n=nMod l0m=mModl0EndSub打开窗体运行后，单击命令按钮，立即窗口上输出的结果是（ ）。l考点5过程调用与参数传递1A.2 32B.12 3C.2 2D.12 32
考题
假定有如下事件过程： Private Sub Form_Cilck() Dim x As Integer，n As Integer x=1 n=0 Do While x＜28 X=X*3 n=n+1 Loop Print x,n End Sub 程序运行后，单击窗体，输出结果为______。A．81 4B．56 3C．28 1D．243 5
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．41 54B．2 54C．1 3D．42 3
考题
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：Private Sub Command1_Click()Dim x As Integer,y As Integerx=12：y=32Call p(x,y)MsgBox x*yEnd SubPublic Sub p(n As Integer,By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为【 】。
热门标签
最新试卷
