单选题执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1 Click() Dim a a= Array("a"， "b"， "C"， "d"， "e"， "f"， "g") Print a(1)； a(3)； a(5) End Sub
单选题下列有语法错误的赋值语句是
单选题下列程序执行后，其输出结果为( )。 Dim a(5) For i=0 To 4 a(i)=i+1 m=i+1 If m=3 Then a(m-1)=a(i-2)Else a(m)=a(i) If i=2 Then a(i-1)=a(m-3) a(4)=i Print a(i); Next i
单选题以下关于事件、事件驱动的叙述中，错误的是( )。 A) 事件是可以由窗体或控件识别的操作 B) 事件可以由用户的动作触发 C) 一个操作动作只能触发一个事件 D) 事件可以由系统的某个状态的变化而触发
单选题下列程序执行的结果为 x=25：y=20： z=7 Print"S("；x+2*y；")" A) S(47) B) S(165) C) S(25+7*20) D) S(87)
单选题设有如下程序： Private Sub sV(ByVal m As Integer，n As Integer) m=m*2：n=n一5：Print m：n End Sub Private Sub Form_Click() Dim x As Integer,y As Integer x=10：y=15：sV x,y Print x；y End Sub 运行程序，单击窗体，输出结果为
单选题下列对于软件测试的描述正确的是
单选题在数据库系统中，数据独立性是指______。 A) 数据与程序独立存放 B) 不同的数据被存放在不同的文件中 C) 不同的数据只能被对应的应用程序所使用 D) 以上三种说法都不对
单选题在窗体上画一个名称为Command1的命令按钮，编写如卜程序代码 Private Type Student sn As String*10 class As String*20 score As Double End Type Private Sub Command1_Click() Dim s As Student Dim s1 As Student Open"C：＼Scorelist．dat"For Random As #1 Len=Len(s) s．sn="张一帆" s．class="计2014—1班" s．score=90 Put #1，s Close #1 End Sub 以下叙述中正确的是( )。
单选题如果在程序中要将c定义为静态变量，且为整型数，则应使用的语句是
A. Redim a As Integer
B. Static a As Integer
C. Public a As Imeger
D. Dim a As Integer
单选题下列与队列结构有关联的是
单选题在程序中要使用Array函数给数组arr赋初值，则以下数组变量定义语句中错误的是
单选题使用语句Dim A(2) As Integer声明数组A之后，以下说法正确的是
单选题在窗体上画一个名为Commandl的命令按钮，然后编写以下程序： Private Sub Commandl—Click() Dim M(10)As Integer For k=1 To 10 M(k)=12一k Next k X=8 Print M(2+M(X)) End Sub运行程序，单击命令按钮，在窗体上显示的是( )。
单选题设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2，
单选题设a=5，b=6，c=7，d=8，执行语句x=IIf((a＞B)And(c＞D)，10，20)后，x的值是______。
单选题通过“工程”菜单的“______”命令，可以将多个窗体添加到工程中。
单选题一间宿舍可住多个学生，则实体宿舍和学生之间的联系是
单选题有如下程序： Option Base 1 Private Sub Form Click() Dim arr，Sum Sum =0 arr=Array(1，3，5，7，9，11，13，15，17，19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为
单选题下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer，y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub