单项选择题

下列程序段不正确的是( )。

A．Dim a As Integer a=array(1，2，3，4)
B．Dim a()，b() a=array(1，2，3，)：b=a
C．Dim a As Variant a=array(1，"asd"，true)
D．Dim a() As Variant a=array(1，2，3，4)

<上一题目录下一题>

热门试题

单项选择题在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，如图所示，对应的事件过程是( )。

A．Private Sub Text1_LostFocus() Text1．SelStart=0 Text1．SelLength=Len(Text1．Text) End Sub
B．Private Sub Text1_GotFocus() Text1．SelStart=0 Text1．SelLength=Len(Text1．Text) End Sub
C．Private Sub Text1_Change() Text1．SelStart=0 Text1．SelLength=Len(Text1．Text) End Sub
D．Private Sub Text1_SetFocus() Text．SelStart=0 Text1．SelLength=Len(Text1．Text) End Sub

单项选择题在窗体上画一个命令按钮(Name属性为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a(10)As Interger，p(3)As Interger K=5 For i=1 To 10 a(i)=i Next i For i=l To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Printk End Sub 程序运行后，单击命令按钮，输出结果是( )。

A．35
B．28
C．33
D．37