单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim a As Variant
a=Array(1，2，3，4，5)
Sum=0
For i=1 TO 5
Sum=Sum+a(i)
Next i
x=Sum/5
For i=1 To 5
If a(i)＞xThen Print a(i)
Next i
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是

A．1 2
B．1 2 3
C．3 4 5
D．4 5
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签，两个名称分别为Conmmnd1和Com— mand2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图所示。 编写如下程序： Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Left＜Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击“开始”按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是
单项选择题
在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim x As integer Static y As integer x=10 y=5 Call f1(x，y) Print x，y End Sub Private Sub f1(ByRef xl As Integer，y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．10 5
B．12 5
C．10 7
D．12 7
相关试题