A）MDI子窗口包含在一个大小可调的MDI父窗口内
B）MDI应用程序允许同时显示多个文档，每个文档显示在它自己的窗口中 C）MDI窗体的ActiveFrom属性可以返回具有焦点或最后被激活的子窗体 D）MDI应用程序中只有两种类型的窗体，即父窗体和子窗体 29．下列关于文件的叙述正确的是（ ）。
A) Open命令的作用是打开一个已存在的文件 B) 使用Input#语句可以从随机文件中读取数据 C) 一个记录中所包含的各元素数据类型必须相同 D) 二进制存取可以获取任一文件的原始字节 30．对随机文件进行写操作的语句是（ ）。 A）Input #文件号，输出列表 B）Put #文件号，变量名 C）Read #文件号，变量名 D）Get #文件号，变量名
第5套
1．下列叙述错误的是（ ）。
A）窗体本身也是一个对象，有自己的属性、事件和方法 B）Appearance属性用于在窗体上设置要显示的图形 C）一旦装载窗体，就会自动产生Load事件 D）卸载窗体时触发Unload事件 2．有程序代码：text1.text=\Basic\，则text1、text和\Basic\分别代表（ ）。
A）对象、值、属性 B）对象、方法、属性 C）对象、属性、值 D）属性、对象、值
3．设a=8,b=6,c= -1;执行语句Print a>b>c后，窗体上显示的是（ ）。 A）1 B）True C）False D）出错信息 4．下列叙述错误的是（ ）。
A）标签和文本框都有Caption属性
B）标签和文本框的主要区别在于能否编辑其内容 C）标签具有AutoSize属性，而文本框没有 D）文本框具有ScrollBar属性，而标签没有
5．如果要表示一个在100～300000之间变化的整数，应使用（ ）型变量。 A）Integer B）String C）Long D）Byte 6．表达式23+23 Mod 50\\7的值是（ ）。
A）23 B）46 C）25 D）123 7．表达式String(3, \的结果为（ ）。
A）AAA B）ABC C）BBB D）CCC 8．Print \的输出结果是（ ）。
A）16=6+10 B）6+10=6+10 C）6+10=16 D）“6+10=”16 9．下列程序段是求两个数中的最大数，其中不正确的是（ ）。 A）If ab,a,b)
C）Max=a:If b>=a Then Max=b D）If b>=a Then Max=b : Max=a
10. 如下数组声明语句中数组a包含的元素个数为( )。 Dim a(3,-1 To 1,6)
A）84 B）54 C）72 D）18 11．设组合框Combo1中有5个选项，下列能删除最后一项的语句是（ ）。
A) Combo1.RemoveItem Text B) Combo1.RemoveItem Combo1.Listcount C) Combo1.RemoveItem 5 D) Combo1.RemoveItem 4 12．计时器控件能正常工作应具备的两个条件是（ ）。 A) Enabled属性为True和Interval属性为0 B) Enabled属性为False和Interval属性为0 C) Enabled属性为True和Interval属性为非0 D) Enabled属性为False和Interval属性为非0
13．窗体上有一个命令按钮Command1，编写如下事件过程：
Private Sub Command1_Click() a=1
For i=1 To 3 Select Case i Case 1,3 a=a+1
Case 2,4 a=a+2
End Select Next i Print a
End Sub
运行时，单击命令按钮，窗体上将显示（ ）。
A) 3 B) 4 C) 5 D) 6 14．窗体上有一个命令按钮Command1，编写如下事件过程：
Private Sub Command1_Click() x=IntputBox(\ y=IntputBox(\ Print x+y End Sub 运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（A）444 B）123321 C）123+321 D）出错信息 15．设数组下标从0开始，有如下过程Fun：
Private Sub Fun(a() As Integer) Dim T
Dim J As Integer
J=(Lbound(a)+Ubound(a))\\2 For i= Lbound(a) To J
T=a(i):a(i)=a(Ubound(a)-i): a(Ubound(a)-i)=T Next i
。 ）
End Sub
下列对其功能的叙述正确的是（ ）。
A) 该过程能对传入数组进行升序排序 B) 该过程能对传入数组进行降序排序 C) 该过程能对传入数组进行逆序存放 D) 以上均不对 16．窗体上有命令按钮Command1，编写如下事件过程：
Sub P(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub
Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=1: a(2)=3 a(3)=5: a(4)=7 P a()
For i=1To 4
Print a(i);spc(1); Next i End Sub
运行后，单击按钮，输出的结果为（ ）。
A) 1 3 5 7 B) 2 4 6 8 C) 2 6 10 14 D) 2 2 2 2
17．用通用对话框建立“打开文件”对话框时，指定文件列表框所列出的文件类型是文本文件的正确描述是（ ）。
A) \文本文件(.txt)|(*.txt)\C) \18．下列叙述错误的是（ ）。 A）Scale方法用来定义新坐标系
B）窗体缺省坐标原点在窗体的左下角
C）ScaleLeft和ScaleTop属性可改变坐标系的原点位置
D）ScaleWidth和ScaleHeight属性可改变其容器对象高度和宽度的刻度单位 19．设置命令按钮的（ ）属性，可使指针指向该按钮时显示提示内容。 A）Caption B）ToolTipText C）Font D）Tag 20．下列叙述错误的是（ ）。
A）只有获得焦点的对象才能接受键盘事件
B）KeyPress事件中可以识别键盘上某个键的按键码
C）在KeyDown事件中，在键盘上输入A和a被视为按下相同的键
D）在KeyUp事件中，在主键盘上取“1”和在小键盘上取“1”被视为操作了不同的键 21．窗体上有一个命令按钮Command1，编写如下事件过程：
Function fun (x As Integer) Static z y=y+1: z=z+1 fun=x+y+z End Function
Private Sub Command1_Click() Dim x As Integer x=1
For i=1 To 2 Print fun(x); Next i End Sub
运行时，单击命令按钮，窗体上将显示（ ）。
A）3 3 B）3 4 C）1 1 D）4 4
22．执行指令“Form1.Line(1500,1000)-Step(1000,500),B”后，Form1的CurrentX的值为（ ）。
A）1000 B）1500 C）500 D）2500
23．窗体上设置一个复选框，当选中或取消对应文本框内的字体,改变成粗体或取消，正确的代码是（ ）。
A）Private Sub Check1_Click() B）Private Sub Check1_Click() Text1.FontBold=True Text1.FontBold= Check1.Value
End Sub End Sub C）Private Sub Check1_Click() D）Private Sub Check1_Click() If Check1.Value=1 Then If Check1.Value= True Then Text1.FontBold=True Text1.FontBold=True End If End If End Sub End Sub 24．下列程序段的执行结果是（ ）。
Private Sub Form1_Click() For i=1 To 5
Select Case i Mod 2 Case 0
Print \ Exit For Case 1
Print \ Case Else Print \End Select Next i End Sub
A）* B）$ C）* D）$ # * $ # 25. 有如下两个过程S1和S2：
Sub S1(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t=x : x=y : y=t End Sub
Sub S2(x As Integer, y As Integer)
Dim t As Integer t=x : x=y : y=t End Sub
下列关于S1和S2 的说法,正确的是( )。
A）调用过程S1可以实现交换两个变量值，而S2不能 B）调用过程S2可以实现交换两个变量值，而S1不能 C）调用过程S1和S2都可以实现交换两个变量值 D）调用过程S1和S2都不能实现交换两个变量值 26．在命令按钮的Picture属性中选择了图片文件，在按钮上却没有显示图片的原因可能是（ ）。
A）按钮的Enabled属性为False B）按钮的Sytle属性为0
C）按钮的Default属性为False
D）按钮的DisabledPicture属性没有装入图片 27．对文本框Text1编写如下的事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer) Dim x As String
x=Chr(KeyAscii)
KeyAscii=Asc(Ucase(x)) Print String(4, KeyAscii) End Sub 程序运行后，将焦点置于文本框，如果在键盘上输入字母“a”，则窗体上显示的内容是（ ）。 A）A B）B C）AAAA D）aaaa 28．以下说法正确的是（ ）。
A）在程序执行时，如果菜单项的Enabled的属性为False，则该菜单项变成灰色，不能
被用户选择
B）菜单项的索引号必须连续
C）任何时候都可以使用“工具”菜单下的“菜单编辑器”命令打开菜单编辑器 D）只有当代码窗口为当前活动窗口时，才能打开菜单编辑器 29．下面关于多重窗体的叙述，正确的是（ ）。
A）在多重窗体程序中，可以用关键字My代表程序代码所在的窗体 B）没有启动窗体，程序不能运行
C）如果启动对象是Sub Main子过程，则程序启动时先运行该过程 D）以上都不对
30．设有语句Open \，以下叙述错误的是（ ）。 A）该语句以文件号1打开文件
B）该语句可以在当前目录下创建一个名为Datafile.txt的文件 C）执行该语句后可以向文件Datafile.txt中写入信息 D）该语句打开当前目录下一个已存在的文件Datafile.txt