在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun (a()As Integer,n As Integer) For i=1 To 2 t=a(i):a(i)=a(5-i+1):a(5-i+1)=t Next i End Sub Private Sub Command1_Click() Dim arr1(5)As Integer For i=1 To 5 arr1(i)=i Next i Call fun(arr1,5) Print arr1(1);arr1(2) End SubA.1 2B.2 1C.5 4D.4 5
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun (a()As Integer,n As Integer) For i=1 To 2 t=a(i):a(i)=a(5-i+1):a(5-i+1)=t Next i End Sub Private Sub Command1_Click() Dim arr1(5)As Integer For i=1 To 5 arr1(i)=i Next i Call fun(arr1,5) Print arr1(1);arr1(2) End Sub
A.1 2
B.2 1
C.5 4
D.4 5
相关考题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )A.123345B.468C.123D.345
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Private Sub fun() Static a As Integer a=a+2 Print a; End Sub Private Sub Command1_Click() Dim m As Integer For m=1 To 3 Call fun Next m End SubA.2 2 2B.0 0 0C.2 4 8D.2 4 6
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: PrivateSubCommandl_CnCk() aS="VisualBasic", Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。A.VVVB.VisC.sicD.11
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为,( )。 Private Sub fun(ByVal x As Integer,ByVal y As Integer,Byval z As Integer) z=x^3*y^3 End Sub Private Sub Command1_Click() Dim m As Integer Call fun(2,3,m) Print m End SubA.216B.0C.35D.程序不能运行