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

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

在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command 1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proe(X,Y) Debug.Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=in Mod 10 End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。

A.2 32

B.12 3

C.2 2

D.12 32


参考答案

更多 “ 在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command 1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proe(X,Y) Debug.Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=in Mod 10 End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。A.2 32B.12 3C.2 2D.12 32 ” 相关考题
考题 窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yEnd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A、 444B、 123321C、 123+321D、 出错信息

考题 在窗体上有一个命令按钮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打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。

考题 在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:单击命令按钮后,标签显示的结果是( )。

考题 在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click() Dim i,j,x For i=1 To 20 Step 2 x=0 For j-i To 20 Step 3 x=x+1 Next j Next i Text1.Value=Str(x) End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是( )。A.1B.7C.17D.400

考题 窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下: Private Sub Command1 Click( ) Static x As Variant n=0 x=Array(1,2,3,4,5,6,7,8,9,10) While n=4 x(n)=x(n+5) Print x(n): n=n+1 Wend End Sub 运行程序,单击命令按钮Command1,窗体上显示的是( )。A.1 2 3 4 5B.6 7 8 9 10C.2 3 4 5 6D.6 2 3 4 5

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command 1_ Click() Static y As Integer CIs For i=0 To 2 x=x +y y=y +3 Next Print x, yEnd Sub程序运行后,连续二次单击Command1按钮后,窗体上显示的是______。A.9 9B.36 18C.30 12D.63 27

考题 在窗体上有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.10D.40

考题 在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click(. Dim i, j, x For i = 1 To 20 Step 2 x = 0 For j = i To 20 Step 3 x = x + 1 Next j Next i Text1.Value = Str(x. End Sub 打开窗体运行后,单击命令按钮,文本框中显示的结果是A.1B.7C.17D.400

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Staticy As Integer Cls For i=0 To 2 x=x+y y=y+3 Next Printx,y End Sub 程序运行后,连续二次单击Command1按钮后,窗体上显示的是 ______。A.9 9B.36 18C.30 12D.63 27