单选题下列程序运行时输出的结果是
____
。
Option Base 1
Private Sub Form_Click()
Const a=6
Dim x (a) As Integer
For I=1 to a
x(i)=1^2
Next I
Print x(i)
End Sub
单选题窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：Private Sub Comrnand1_Click()n％=List1．ListIndexIfn＞0 Thench$=List1．List(n)List1．List(n)=List1．List(n-1)：List1．List(n-1)=chEnd IfEnd Sub程序运行时，选中1个列表项，然后单击Command1按钮，则产生的结果是
单选题软件设计中模块划分应遵循的准则是( )。
单选题数据库概念设计的过程中，以下各项中不属于视图设计设计次序的是______。
A.自顶向下
B.由整体到个体
C.由内向外
D.由底向上
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在______处应填入的内容为
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Comandl_Click() Dim arrayl(10, 10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i, j)=i+j Next j Next i Text1. Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
单选题如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是______。 A)任何时刻最多只有一个窗体是活动窗体 B)不能把标准模块设置成启动模块 C)用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 D)如果工程中含有Sub Main过程，则程序一定首先执行该过程
单选题阅读程序： Function Fun( a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Commandl _ Click( ) Dim a As Integer a=2 For i = 1 To 2 Print Fun (
单选题在窗体上画—个名称为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。
单选题设运行程序时弹出的菜单如下图所示。关于该菜单，以下叙述中错误的是______。
单选题在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click() X=5 : Y=3 Call proc(X, Y) Label1. Caption = X Label2. Caption = Y End Sub Private Sub proc(a As Integer, ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是( )。 A) 25和3 B) 5和3 C) 25和6 D) 5和6
单选题设有如下程序段： Dim a(10) For Each x In a Print x； Next x 在上面的程序段中，变量x必须是
单选题一间宿舍可住多个学生，则实体宿舍和学生之间的联系是( )。 A) 一对一 B) 一对多 C) 多对一 D) 多对多
单选题现有程序如下：Option Base 1Private Sub Form_Click() Dim x(5，6)As Integer，y(5)As Integer For i=1 To 5 For i=1 To 6 x(i，j)=Int(Rnd*9+1) Next i Next i Call f(5，6，x，y) For i=1 To 5 Print y(i)； Next iEnd SubSub f(m As Integer，n As Integer， a() As Integer，b()As Integer) For i=1 To m b(i)=0 For i=1 To n b(i)=b(i)+a(i，j) Next j Next iEnd Sub关于上述程序，以下叙述中正确的是
单选题在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。 Option Base 1 Private Sub fun(a()As Integer,n As Integer) ReDim Preserve a(n) a(6)=a(1)+a(2)+a(3)+a(4)+a(5) n=3 End Sub Private Sub Command1_Click() Dim arr1()As Integer，k As Integer ReDim arr1(5) For i=1 To 5 arr1(i)=i Next i k=6 Call fun(arr1，k) Print arr1(1)；arr1(k)；arr1(6) End Sub
单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 If i=1 Then x=i If i ＜= 4 Then x=x+1 Print x； Next i End Sub 程序运行后，单击命令按钮，其输出的结果为
单选题下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Private Sub Command1_Click() Dim NDin(25)As Integer，Chr1 As String Chr1=UCase(InputBox("请输入字母字符串")) For k=1 To Len(Chr1) n=Asc(Mid(Chr1，k，1))-Asc("A") If n>=0 Then Num(n)=Num(n)+1 End If Next k m=Num(0) For k=1 To 25 If m
单选题以下关于VB特点的叙述中，错误的是
单选题设有如下表所列的菜单结构：
标 题
名 称
层 次
显示
大图标
小图标
appeal
bigicon
SmallIcon
1
2
2
要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是
单选题按文件的内容划分有( )。