网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
假定有如下事件过程： 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 4
B．56 3
C．28 1
D．243 5
参考答案
更多 “ 假定有如下事件过程： 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 ” 相关考题
考题
假定有如下事件过程： 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
考题
假定有如下事件过程：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_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
考题
在窗体上画两个名称为Tcxt1、Text2的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程： Private Sub Command1 Click() Dim x As Integer，n As Integer x=1 n=0 Do While x＜20 x=x*3 n=n +l Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是( )。A．9和2B．27和3C．195和3D．600和4
考题
假定有如下事件过程： 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
考题
在窗体上画两个名称为Text l、Text 2的文本框和一个名称为Command l的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim x As Integer，n As Integer x=1 n=0 Do While x＜20 x＝x*3 n=n＋l Loop Textl．Text=Str(x) Text2．Text-Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是( )。A．9和2B．27和3C．195和3D．600和4
考题
下列VBA程序段的执行结果为__________。 X1=1 X2=1 N=0 Do While N＜5 debug.Print X1,X2 X1=X1+X2 X2=X1+X2 N=N+1 Loop Debug.Print X1;X2A．233 377B．55 89C．34 55D．89 144
热门标签
最新试卷
