单项选择题

窗体上有一个名为Command1的命令按钮，并有下面的程序：
Private Sub Command1_Click()
Dim arr(5) As Integer
For k=1 To 5
arr(k)=k
Next k
Prog arr()
For k=1 To 5
Print arr(k)
Next k
End Sub
Sub prog(a() as Integer)
n=Ubound(

A．
For i=n To 2 Step-1
&nbs
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个标签、一个计时器和一个命令按钮，其名称分别为Label1、Timer1和Command1，如图8所示。程序运行后，如果单击命令按钮，则标签开始闪烁，每秒钟“欢迎”二字显示和消失各一次，如图9所示。以下是实现上述功能的程序，请填空。 Private Sub Form_Load() Label1.Caption= 欢迎 Timer1.Enabled=False Timer1.Interval= (7) Command1.Caption= 开始闪烁 End Sub Private Sub Timer1_Timer() Label1.Visible= (8) End Sub Private Sub Command1_Click() (9) End Sub
填空题
有如下程序： Private Sub Form_Click() n=10:i=0 Do i=i+n:n=n-2 Loop While n＞2 Print i End Sub 程序运行后，单击窗体，输出结果为______。
相关试题