网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

假定有如下事件过程: 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 4

B.56 3

C.28 1

D.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 ” 相关考题
考题 假定有如下事件过程: 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

考题 在窗体上画两个名称分别为Text1、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+1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是 ______。A.15和1B.27和3C.195和3D.600和4

考题 在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为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 + 1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是A.15和1B.27和3C.195和3D.600和4

考题 在窗体上画两个名称为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

考题 假定有如下事件过程: 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