单项选择题

在窗体上画一个名为Command1的命令按钮,然后编写下列程序:

Option Base 1

Private Sub Command1_Click()

Dim Arr

Arr=Array(1,2,3,4,5)

j=1

For i=5 To 1 Step-1

S=S+Arr(i)*j

j=j*10

Next

Print S

End Sub

程序运行后,单击命令按钮,输出结果是( )。

A.54321
B.123
C.12345
D.345
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上添加一个命令按钮,名为Command1,其单击事件中有下列程序段,则事件过程执行后,文本框中输出( )。 For i=1 To 4 For j=1 To 3 x=3 For k=1 To 2 K=x+3 Next k Next j Next i Text1.Text=Str(x)
A.3
B.6
C.9
D.12
单项选择题
某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签,计时器的属性设置为Enabled=True,Interval=0,并编程如下。希望在程序运行时,可以每2秒在标签上显示一次系统当前时间。 Private Sub Timer1_Timer() Label1.Caption=Time$ End Sub 在程序执行时发现未能实现上述目的,那么,应做的修改是( )。
A.通过属性窗口把计时器的Interval属性设置为2000
B.通过属性窗口把计时器的Enabled属性设置为False
C.把事件过程中的Label1.Caption=TimeS语句改为Timer1.Interval=Time$
D.把事件过程中的Label1.Caphon=TimeS语句改为Label1.Caption=Timer1.Time
相关试题
  • 下列关于复选框的说法,正确的是( )。
  • 下列程序段的运行结果是( )。 Sub sel...
  • 按文件的内容划分有( )。
  • 要使某菜单能够通过按住键盘上的<Alt>键...
  • 下列数据结构中,属于非线性的是( )。