单项选择题

在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：
Pnvate Sub Command1_Click()
Dim x As Integer，y As Integer，t As Integer
x=10：y=20：t=0
If x=y Then t=x：x=y：y=t
Print x；y
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。

A．10 20
B．20 0
C．20 10
D．20 20
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。 Private Sub func(a As Integer) Static m As Integer m=m+a Print m； End Sub， Private Sub Command1_Click() Dim k As Integer k=4 Call func(k) Call func(k) End Sub
A．4 8
B．4 4
C．8 8
D．8 4
单项选择题
在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。 Option Base 1 Private Sub fun(a()As Integer,n As Integer) ReDim Preserve a(n) a(6)=a(1)+a(2)+a(3)+a(4)+a(5) n=3 End Sub Private Sub Command1_Click() Dim arr1()As Integer，k As Integer ReDim arr1(5) For i=1 To 5 arr1(i)=i Next i k=6 Call fun(arr1，k) Print arr1(1)；arr1(k)；arr1(6) End Sub
A．1 3 6
B．1 3 0
C．1 3 15
D．出错
相关试题