( 9 )在窗体上画一个名称为 Command1 的命令按钮。然后编写如下程序:
Option Base 1
Private Sub Command1_Click ()
Dim a ( 10 ) As Integer
F or i=1 To 10
a ( i ) =i
Next
Call swap ( 【 11 】 )
For i=1 To 10
Print a ( i ) ;
Next
End Sub
Sub swap ( b () As Integer )
n =U b ound ( b )
For i=1 To n / 2
t =b ( i )
b ( i ) =b ( n )
b ( n ) =t
【 12 】
Next
End Sub
上述程序的功能是,通过调用过程 swap ,调换数组中数值的存放位置,即 a ( 1 ) 与 a ( 10 ) 的值互换, a ( 2 ) 与 a ( 9 ) 的值互换 , …… 。请填空。
第1题:
在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。
第2题:
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Cilck()
End Sub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。
第3题:
在窗体上画一个名为Command1的命令按钮,编写如下程序:
程序运行后,单击命令按钮,输出的结果是_________。
第4题:
在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.
B.H
C.
D.
第5题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是
A.VVV
B.Vis
C.sic
D.11
第6题:
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
a = 12345
Print Format$(a, "000.00")
End Sub
程序运行后,单击命令按钮,窗体上显示的是( )。
A.123.45
B.12345.00
C.12345
D.00123.45