单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是

A．4
B．5
C．6
D．7
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为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 x1 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
单项选择题
在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click( ) CommonDialogl．FileName=“” CommonDialogl，Filter＝“All File｜*．*｜(*．Doc)｜*．Doc｜(*．Txt)｜*．Txt” CommonDialogl．Filterlndex＝2 CommonDialogl．DialogTitle＝“VBTest” CommonDialogl．Action＝1 End Sub对于这个程序，以下叙述中错误的是
A．该对话框被设置为“打开”对话框
B．在该对话框中指定的默认文件名为空
C．该对话框的标题为VBTest
D．在该对话框中指定的默认文件类型为文本文件(*．Tx
相关试题