C) D)
29.设有如下事件过程：
Private Sub Command1_Click() For i＝1 To 5 j＝i Do
Print \ j＝j－1 Loop Until j＝0 Next i End Sub
运行程序，输出\*\的个数是( )。 A) 5 B) 15 C) 20 D) 25
30.设有如下函数：
Function DelSpace(ch As String)As Integer Dim n%， st$， c$ st＝\ n＝0
For k＝1 To Len(ch)
c＝Mid(ch， k， 1) If c<>\ st＝st & c Else
n＝n＋1 End If Next k ch＝st
DelSpace＝n End Function
函数的功能是( )。
A) 统计并返回字符串ch中字符的个数
B) 删除字符串ch中的空格符，返回删除字符的个数 C) 统计并返回字符串ch中非空格字符数
D) 删除字符串ch中除空格符外的其他字符，返回删除字符的个数
31.以下叙述中错误的是( )。
A) 在通用过程中，多个形式参数之间可以用逗号作为分隔符 B) 在Print方法中，多个输出项之间可以用逗号作为分隔符 C) 在Dim语句中，所定义的多个变量可以用逗号作为分隔符 D) 当一行中有多个语句时，可以用逗号作为分隔符
32.设a＝4，b＝5，c＝6，执行语句Print a
)。
B) False C) 出错信息 D) 0
33.执行下列语句：
strInput＝InputBox(\请输入字符串\，\字符串对话框\，\字符串\
将显示输入对话框。此时如果直接单击\确定\按钮，则变量strInput的内容是( )。 A) \请输入字符串\ B) \字符串对话框\ C) \字符串\D) 空字符串
34.执行语句 Dim X， Y As Integer 后( )。 A) X和Y均被定义为整型变量
B) X和Y均被定义为变体类型变量
C) X被定义为整型变量，Y被定义为变体类型变量 D) X被定义为变体类型变量，Y被定义为整型变量
35.以下关系表达式中，其值为True的是( )。 A) \
B) \C) \＝\ D) \
36.执行以下程序段：
a$＝\b$＝\＋＋\
c$＝UCase(Left$(a$， 7))& b$ & Right$(a$， 12) 后，变量c$的值为( )。 A) Visual BASIC Programming B) VISUAL C＋＋Programming C) Visual C＋＋Programming D) VISUAL BASIC Programming
37.在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为\宋体\和\黑体\；1个复选框(名称为Check1，标题为\粗体\)和1个文本框(名称为Text1，Text属性为\改变文字字体\)，窗体外观如图所示。程序运行后，要求\宋体\单选按钮和\粗体\复选框被选中，则以下能够实现上述操作的语句序列是( )。
A) Option1.Value＝False Check1.Value＝True
B) Option1.Value＝True Check1.Value＝0
C) Option2.Value＝False Check1.Value＝2
D) Option1.Value＝True Check1.Value＝1
38.假定通过复制、粘贴操作建立了一个命令按钮数组Command1，以下说法中错误的是( )。 A) 数组中每个命令按钮的名称(Name属性)均为Command1 B) 若未做修改，数组中每个命令按钮的大小都一样 C) 数组中各个命令按钮使用同一个Click事件过程 D) 数组中每个命令按钮的Index属性值都相同
39.下面控件中，没有Caption属性的是( )。 A) 复选框 B) 单选按钮 C) 组合框 D) 框架
40.用来设置文字字体是否斜体的属性是( )。 A) FontUnderline B) FontBold C) FontSize D) FontItalic
41.设有如图所示窗体和以下程序：
Private Sub Command1_Click() Text1.Text＝\End Sub
Private Sub Text1_LostFocus() If Text1.Text<>\ Text1.Text＝\ Text1.SetFocus End If End Sub
程序运行时，在Text1文本框中输入\Basic\(如图所示)，然后单击Command1按钮，则产生的结果是( A) 文本框中无内容，焦点在文本框中 B) 文本框中为\Basic\，焦点在文本框中 C) 文本框中为\Basic\，焦点在按钮上
)。
D) 文本框中为\Visual Basic\，焦点在按钮上
42.下列叙述中正确的是( )。
A) MsgBox语句的返回值是一个整数
B) 执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作 C) MsgBox语句的第一个参数不能省略
D) 如果省略MsgBox语句的第三个参数(Title)，则信息框的标题为空
43.语句Dim a(－3 To 4,3 To 6)As Integer 定义的数组的元素个数是( )。 A) 18 B) 28 C) 21 D) 32
44.以下关于过程及过程参数的描述中，错误的是( )。 A) 过程的参数可以是控件名称
B) 调用过程时使用的实参的个数应与过程形参的个数相同(假定不含可变参数) C) 只有函数过程能够将过C程中处理的信息返回到调用程序中 D) 窗体可以作为过程的参数
45.以下变量名中合法的是( )。 A) x2－1 B) print C) str_n D) 2x
46.把数学表达式 A) (5x＋3)/(2y－6) B)
表示为正确的VB表达式应该是( )。
C) D) (x*5＋3)/(y*2－6)
47.下面有关标准模块的叙述中，错误的是( )。 A) 标准模块不完全由代码组成，还可以有窗体
B) 标准模块中的Private过程不能被工程中的其他模块调用 C) 标准模块的文件扩展名为.bas
D) 标准模块中的全局变量可以被工程中的任何模块引用
48.可以产生30～50(含30和50)之间的随机整数的表达式是( )。 A) Int(Rnd*21＋30) B) Int(Rnd*20＋30)
C) Int(Rnd*50－Rnd*30) D) Int(Rnd*30＋50)
49.在程序运行时，下面的叙述中正确的是( )。
A) 用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_Load事件过程 B) 用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程 C) 只装入而不显示窗体，也会执行窗体的Form_Load事件过程
D) 装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程
50.窗体上有名称为Command1的命令按钮和名称为Text1的文本框
Private Sub Command1_Click() Text1.Text＝\程序设计\ Text1.SetFocus End Sub
Private Sub Text1_GotFocus() Text1.Text＝\等级考试\ End Sub
运行以上程序，单击命令按钮后( )。
A) 文本框中显示的是\程序设计\，且焦点在文本框中 B) 文本框中显示的是\等级考试\，且焦点在文本框中 C) 文本框中显示的是\程序设计\，且焦点在命令按钮上 D) 文本框中显示的是\等级考试\，且焦点在命令按钮上
51.设窗体上有名称为Option1的单选按钮，且程序中有语句：
If Option1.Value＝True Then
下面语句中与该语句不等价的是( )。 A) If Option1.Value Then B) If Option1＝True Then C) If Value＝True Then D) If Option1 Then
52.设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是( )。
A) 程序运行时，若使滚动块向左移动，滚动条的Value属性值就增加 B) 程序运行时，若使滚动块向左移动，滚动条的Value属性值就减少 C) 由于滚动条的Max属性值小于Min属性值，程序会出错
D) 由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动
53.下面哪个属性肯定不是框架控件的属性( )。 A) Text B) Caption C) Left D) Enabled
54.下列关于通用对话框CommonDialog1的叙述中，错误的是( )。
A) 只要在\打开\对话框中选择了文件，并单击\打开\按钮，就可以将选中的文件打开 B) 使用CommonDialog1.ShowColor方法，可以显示\颜色\对话框
C) CancelError属性用于控制用户单击\取消\按钮关闭对话框时，是否显示出错警告 D) 在显示\字体\对话框前，必须先设置CommonDialog1的Flags属性，否则会出错