单项选择题

在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是

A．1
B．3
C．6
D．10

<上一题目录下一题>

热门试题

单项选择题

若想使时钟控制每隔0.25秒触发一次Timer()事件，则可将Interval属性值设为

A．Interval=0.25
B．Intetval=25
C．Interval=250
D．Interval=2500

单项选择题

窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是

A．0
B．10
C．01234
D．程序出错

相关试题