单选题在窗体上画一个名称为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 程序运行后，如果单击命令按钮，则在窗体上输出的内容为( )。
单选题有如下程序； Private SubForm_Click() Dim check As Boolean，n As Integer check=False n=0 Do Do While n＜10 n=n+1 If n=5 Then check=True Exit Do End if Print n； Loop Loop Until check = True End Sub 程序运行后，输出的结果是 ______ 。
单选题在关系数据库设计中，设计关系模式是数据库设计中( )阶段的任务。
单选题为计算1+2+22+23+24+...+210的值，并把结果显示在文本框Text1中，若编写如下事件过程：
Private Sub Commandl Click() Dim
a&,s&,k& s=1 a=2
For k=2 To 10 a=a*2 s=s+a
Next k Text1.Text=S End Sub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是______，
A.把s=1改为s=0
B.把For k=2 To 10改为For k=1 To 10
C. 交换语句s=s+a和a=a*2的顺序
D. 把For k=2 To 10改为For k=1 To 10、交换语句s=s+a和a=a*2的顺序
单选题过程共有3种，它们分别是{{U}} {{/U}}。
A. Sub过程、函数过程和属性过程
B. 事件过程、函数过程和通用过程
C. Sub过程、函数过程和通用过程
D. 事件过程、子过程和函数过程
单选题设有下面的程序段： x = InputBox("请输入一个整数") ReDim a(x) For k = x To 0 Step -1 a(k) = k Next k一般，在这段程序之前应先进行数组a的定义。下面定义语句中正确的是 A) B) C) D) 答案：
单选题在窗体上画一个命令按钮和一个文本框，其名称分别为command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
a=InputBox("Enter an integer")
b=Text1.Text
Text1.Text=b+a
End Sub
程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是______。
单选题以下能够设置控件焦点的方法是
单选题在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序：
Private Sub func(L As Label)
L.Caption="1234"
End Sub
Private Sub Form_Load()
Label1.Caption="ABCDE"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Valf Label2.Caption)
Call func(Label1)
Label2.Caption=a
End Sub
程序运行后，单击命令按钮，则在两个标签中显示的内容分别为______。
单选题在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Calffion=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是______。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的 事件过程：
Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then
fun = 2
Else
fun = 1
End If
End Function
Private Sub Command1_Click() Dim i As Integer, s As Integer s = 0
For i = 1 To 5
s = s + fun(i) Next
Print s
End Sub
程序运行后，单击命令按钮，在窗体上显示的是______。
单选题在窗体上画一个命令按钮，其名称为Commandl，然后编写如下程序： Function Fonc(By Val x As Integer,y As InteSer) y=x*y If y＞0 Then Func=X； Else Func=y End If End Function Private Sub Commandl_Click() Dim a As Integer,b As Integer a=3 b=4 c=Func(a,B) Print"a=";a Print"b=";b Print"C=";C End Sub 程序运行后，单击命令按钮，其输出结果为______。
单选题假定有以下程序段For i=1 To 3 For j=5 To 1 Srep-1 Print i*j Next jNext i则语句Print i*j 的执行次数是______。
单选题在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labell)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。下列可以实现上述操作的事件过程是______。
单选题设有如下通用过程：
Public Sub Fun(a()As Integer, x As Integer)
For i=1 To 4
x=x*a(i)
Next
End Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim arr(5) As Integer, n As Integer
n=1
For i=1 To 4
arr(i)=i+i
Next
Fun arr, n
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是______。
单选题要删除列表框中最后一个列表项，正确的语句是( )。
单选题一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是( )。
单选题以下关于图片框控件的说法中，错误的是( )。 A) 可以通过Print方法在图片框中输出文本 B) 图片框控件中的图形可以在程序运行过程中被清除 C) 图片框控件中可以放置其他控件 D) 用Stretch属性可以自动调整图片框中图形的大小
单选题设已打开5个文件，文件号为1、2、3、4、5。要关闭所有文件，则下列语句正确的是( )。 A)Close#1,2,3,4,5 B)Close#1,#2,#3,#4,#5 C)Closeg#1-#5 D)Close#1;#2,#3;#4;#5
单选题在窗体上画２个文本框（名称分别为Text1和Text2），一个命令按钮（名称为Command1）。并定义以下记录类型和变量：
Private Type Teacher
ID As Integer
Name As String * 10
End Type
Dim Teach As Teacher
程序运行后，在Text1中输入编号（ID），在Text2中输入姓名（Name），然后单击命令按钮，则把两个文本框中的内容写入随机文件d:/f1.txt。以下能够正确实现上述功能的事件过程是