第一章
1. Visual Basic 程序设计语言属于【 C】。
A．面向过程的语言 B．面向问题的语言 C．面向对象的语言 D．面向机器的语言 4.计算机能够直接执行的程序是【 B 】。
A．源程序 B．机器语言 C．高级语言程序 D．汇编语言程序
在面向对象的程序设计中，【 A 】是程序设计的基本单位。
A．对象 B．类 C．属性 D．方法
7. 下面符合 Visual Basic 的特点是【 C 】。
A．简单的程序设计方法 B．面向程序设计思想 C．事件驱动的编程机制 D．非结构化程序设计语言
第 2 章 Visua1 Basic 程序设计概述
一、选择题?
4． 新建一工程，将其窗体的(名称)属性设置为 MyFirst，则默认的窗体文件名为【 C 】。
A.Forml.frm B.工程 1.frm C.MyFirst.frm D.Forml.vbp
10．在 Visual Basic 集成开发环境中，如果工具箱不可见，应在【 B 】菜单中操作而使它
可见。
A.窗口 B.视图 C.编辑 D.文件
11．在设计阶段，当双击窗体上的某个控件时，所打开的窗口是【 C 】。
A.工程资源管理器窗口 B.工具箱窗口 C.代码窗口 D.属性窗口
17．要在窗体上显示图片，需设置窗体的【 C 】属性。
A.Caption B.Icon C.Picture D.ControlBox
19．将窗体的【 A 】属性设置为 False 后，运行时窗体上的按扭、文本框等控件就不会对用户的操作做出响应。
A.Enabled B.Visible C.ControlBox D.WindowState
21．在设计阶段，双击窗体 Forml 的空白处，打开代码窗口，显示【 D 】事件过程模板。
A.Form_Click B.Form_Load C.Form1_Click D.Form1_Load
22．在运行时，系统自动执行启动窗体的【 C 】事件过程。
A.Click B.GotFocus C.Load D.UnLoad
27．如果设计时在属性窗口将命令按钮的【 A】属性设置为 False，则运行时按钮从窗体上
消失。
A.Visible B.Enabled C.DisabledPicture D. Default
28．如果设计时在属性窗口将命令按钮的【 B】属性设置为 False，则运行时按钮不能响应
用户的鼠标事件。
A.Visible B.Enabled C.DisabledPicture D.Default
31．当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的【 A 】属性为 True。
A.AutoSize B.WordWrap C.Enabled D.Visible
32．设置标签边框的属性是【 A 】。
A.BorderStyle B.BackStyle C.AutoSize D.Alignment
33．将文本框的【A 】属性设置为 True 时，文本框可以输入或显示多行文本，且会在输入
的内容超出文本框的宽度时自动换行。
A.MultiLine B.ScrollBars C.Text D.Enabled
35．如果要在文本框中键入字符时只显示某个字符，如星号()，应设置文本框的【 B 】属
性。
A.Caption B.PasswordChar C.Text D.Char
39．如果将文本框的【 A 】属性设置为 True，则运行时不能对文本框中的内容进行编辑。
A.Locked B.MultiLine C.TabStop D.Visible
47．任何控件都具有【 C 】属性。
A.Text B.Caption C.(名称) D.ForeColor
48．决定控件上文字的字体、字形、大小、效果的属性是【 D 】。
A.Text B.Caption C.(名称) D.Font
二、填空题?
Red
代表红色值，则在运行时将窗体背景设置为红色应写为：VbRed 。
13. 假设某命令按钮名称为 C1，决定命令按钮表面文字的属性为 Caption，则在运行时将命令按钮表面文字改为“显示”应写为：C1.caption=”显示” 。
17. 对象的方法用于 完成某种特定的功能 。当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为 对象法，方法名 。
例如，对窗体 Form1 使用 Show 方法，应写为 Form1.show 。
对图片框 Picture1 使用清除方法 Cls，应写为 Picture1.cls 。
第 3 章 Visual Basic 语言基础
一、 选择题
1. 下列类型中不属于基本数据类型的是【 C 】。
A．字节型 B. 双精度型 C. 枚举型 D. 货币型
2. 下列字符序列中合法的变量名是【 A 】。
A．VB12 B.2Ａ C. x.y D. Single
4. 有变量定义语句 Dim a,b As Integer,变量 a 的类型和初值是【 B 】。
A．Integer, 0 B. Variant, 空值 C. String, "" D. Long, 0.0
10.表达式：12+"34"的值是【 C 】。
A．"1234" B. 12"34" C. 46 D. "46"
13.若 a=8,b=10,则下面表达式值为真的是【 A 】。
A. -7+b>a Xor b>0 B. a>b Eqv b>0
C. a<1 And b>0 D. a>b And b>10
14. x+y 小于 12 且 x-y 大于 2 的逻辑表达式是【 C 】。
A．x+y<12 Or x-y>2 B. (x+y)<12 ；（x-y)>2
C. x+y<12 And x-y>2 D. x+y<12 Xor x-y>2
17.如果 x=-3.2,则下面表达式能使 y 变量的值等于-4 的是【 A 】。
A．y=Int(x) B. y=-Abs(x) C. y=Fix(x) D. y=-Int(Abs(x))
18.若 s1="Visual Basic",下面语句中，能从串 s1 中截取子串，使 s2="Basic"的是【 B 】。
A．s2=Right(s1,8,5) B. s2=Mid(s1,8,5)
C. s2=Left(s1,8,12) D. s2=Left(s1,8,5)
25.语句 Print 55\5/5 的输出结果是【 B 】。
A．0 B. 25 C. 5 D. 1
26.设有两个变量 a,b,判断它们之一为 0，但是不能同时为 0 的逻辑表达式为【 C 】。
A．a=0 And b=0 B. a=0 Or b=0
C. a=0 Xor b=0 D. (a=0 And b<>0) And (a<>0 And b=0)
33. 表达式 Not(A+B=C-D)的类型是【 D 】。
A. 布尔表达式 B. 字符表达式 C. 算术表达式 D. 关系表达式
37. 函数 Ucase(Mid("Visual basic",8,5))的值是【 D 】。
A. visua B. basic C. VISUAL D. BASIC
38. 函数 Year(#5/30/2005#)的值是【 C 】。
A. 5 B. 30 C. 2005 D. 5/30/2005
40. 以下四类运算符，优先级最低的是【 D 】。
A. 算术运算符 B. 字符运算符 C. 关系运算符 D.布尔运算符
二、 填空题
4. 表达式 Ucase(Mid("abcdefgh"，3，4))的值是 CDEF 。
11. Visual Basic 中，用 Dim X as Integer 语句定义的变量 Y，系统默认其值为 0 。
14. 函数 String(5, "ABC")的值是 AAAAA 。
22. 关系式 X≤-5 或 X≥5 所对应的布尔表达式是x<=-5 or x>=5
第 4 章 数据输入输出
选择题
1. 以下赋值语句中正确的是【 A 】。
A. Label1.Caption = "VB" B. Text1.Text + 1 = Text1.Text
C. x = InputBox() D. a + b 4 = c
2. 以下程序段执行后，a 和 b 的值分别为【 D 】。
a = 3: b = 5
t = a: a = b: b = t
A. a 值为 3，b 值为 3 B. a 值为 3，b 值为 5
C. a 值为 5，b 值为 5 D. a 值为 5，b 值为 3
4. 在默认情况下，InputBox 函数返回值的类型为【 B 】。
A. 逻辑类型 B. 字符串型 C. 数值型 D. 日期型
6. 在窗体上画一个文本框和一个命令按钮，其名称分别为 Text1 和 Command1，然后编写 程序如下：
Private Sub Command1_Click()
str1 = InputBox("请输入")
Text1.Text = UCase(str1)
End Sub
程序运行后，单击命令按钮，若在输入对话框中输入abc，则在文本框中显示的是【 D 】。
A. 空 B. a C. abc D. ABC
9. 语句 Print 5 \ 6 Mod 2 的输出结果是【 A 】。
A. 0 B. 1 C. 2 D. 3
10. 下列 Visual Basic 的程序执行后，【 B 】选项输出的结果不是 2。
A. Print 7 \ 3 B. Print 5 Mod 2 C. Print 2 ^ 1 D. Print 6 / 3
13. 语句 Print "Sgn(-26)= ";Sgn(-26)的输出结果为【 D 】。
A. Sgn(-26) = 26 B. Sgn(-26) = -26 C. Sgn(-26) = +1 D. Sgn(-26) = -1
15. 为了给 X、Y、Z 三个变量赋值为 1，下面正确的赋值语句是【 B 】。
A. X=Y=Z B. X=1:Y=1:Z=1 C. X=1,Y=1,Z=1 D. X,Y,Z=1
19. 设窗体上有一个命令按钮 Command1，其 Click 事件过程如下：
Private Sub Command1_Click()
A = Inputbox("请输入第一个数")
B = Inputbox("请输入第二个数")
Print A + B
End Sub
程序运行后，单击命令按钮，先后在输入框中分别输入123,321，则在窗体上输出【 C 】。
A. 444 B. 321123 C. 123321 D. 132231
Intleft
End Sub
写出程序或程序段的执行结果
1.执行以下过程后，求窗体上显示的结果。89
Private Sub Command1_Click()
i = 7
Print i + 1; i + 2
End Sub
3.判断以下程序段的执行结果。 4 5 False
a = 4: b = 5
c = a = b
Print a; b; c
第 5 章 Visua1 Basic 控制结构
下面【A 】不是结构化程序设计的基本结构。
A．层次结构 B．循环结构 C．选择结构 D．顺序结构
5. 运行下列程序段后，显示的结果为【 B 】。 p1 = 63
p2 = 36
If p1 > p2 Then Print p2 Else Print p1
A. 63 B. 36 C. 55 D. 99
8. 执行下列程序，单击命令按钮后，从键盘分别输入 5 和 7，则输出结果为【 】。
Private Sub Command1_Click()
x = InputBox("请输入 x 的值")
y = InputBox("请输入 y 的值")
s = x
If x < y Then s = x
Print s s
End Sub
A. 5 B. 7 C. 25 D. 49
10. 下列 Visual Basic 程序段错误是【 D 】。
If a > 5 Then
a = a + 3
ElseIf b > 5 Then
a = a – 5
A. 没有定义变量的初始值 B. 变量名称没有意义
C. If 条件式中不能使用比较运算符 D. 没有成对的 End If
11. 有如下程序段：
A = 1: B = 2: C = 3
If B > 1 Then
6 x<0 5 0≤x<1 4 1≤x<2 3 x≥2
Y=
If A < 1 Then
C = 2
Else
C = 4
End If
End If
程序执行后，以下【 】选项是正确的结果。
A. C = 1 B. C = 2 C. C = 3 D. C = 4
15. 以下 Case 语句中错误的是【 C 】。
A. Case 1 To 9 B. Case Is > 20
C. Case Is > 20 And Is < 60 D. Case 2, 4, 6, Is > 20
19. 执行下列 Visual Basic 程序后，输出结果为【 C 】。
Private Sub Form_Click()
score = Int(Rnd 10) + 20
Select Case score
Case Is < 20: Print "Z"
Case 20 To 29: Print "Y"
Case 30 To 39: Print "X"
Case Else: Print "W"
End Select
End Sub
A. W B. X C. Y D. Z
20. 下列程序段的执行结果为【B 】。
x = 3
y = 1
For I = 1 To 3
f = x + y
x = y
y = f
Print f;
Next I
A. 4 3 6 B. 4 5 9 C. 6 3 4 D. 7 2 8
22. 下列程序段的执行结果为【 C 】。
X = 6
For K = 1 To 10 Step -2
X = X + K
Next K
Print K; X
A. -1 6 B. -1 16 C. 1 6 D. 11 31
29. 下列程序的输出结果为【 B 】。
n = 2
While n <= 3
n = n + 1
Print n;
Wend
A. 3 B. 3 4 C. 3 4 5 D. 0
31. 下面程序完成的功能的是【 C 】。
S = 0
X = 1
While X < 50
X = X + 1
S = S + X
Wend
Print S
A. 计算 2 + 3 + 4 +...+ 49 B. 计算 1 + 2 + 3 +...+ 49
C. 计算 2 + 3 + 4 +...+ 50 D. 计算 1 + 2 + 3 +...+ 50
34. 在设计循环语句时，若有以下要求：在执行循环之前先测试条件表达式 expression， 然后让代码循环执行到该条件表达式的值取“真”为止，则应使用的循环语句是【A 】。
A. do until expression
B. do …… …… Loop Loop until expression
C. do while expression D. do …… ……
Loop Loop while expression
填空题
结构化程序设计的基本结构有：顺序结构、 选择结构 和循环结构。 。
下面程序的作用是用 InputBox 函数输入一个整数，然后判断能否同时被 2 和 7 整除，如 果能则输出该数，请填空。
Private Sub Command1_Click()
Dim numX As Integer
numX = Val(InputBox("请输入一个整数"))
If num x mod 2 = 0 and num x mod 7 = 0 Then
Form1.Print
End If
End Sub
7. 下列这段程序代码将变量 A 与 B 的数值依据大小重新调整，把较大的数存放到变量 A 中， 较小的数存放到变量 B 中，则空格中应填入的程序代码为：? If B > A Then H=B B = A A = H End If
12.下列程序中，如用 For…Next 计算 1 至 100 的奇数和，则下列程序划线处，应依序填入 哪些数字。
sum = 0 For i = 1 To 100 Step 2 sum = sum + i Next i Print sum
写出程序或程序段的执行结果
1.判断下列程序段的执行结果。 a = 95 4
If a > 60 Then degree = 1
If a > 70 Then degree = 2
If a > 80 Then degree = 3
If a > 90 Then degree = 4
Print "degree="; degree
2.判断下列程序段的执行结果。
x = -5
If Sgn(x) Then
y = Sgn(x ^ 2)
Else
y = Sgn(x)
End If
Print y
第 6 章 常用控件
选择题（除特别注明“多选”外，其余均为单选题）
4．以下关于复选框的说法中，正确的是【 B 】。
复选框的 Enabled 属性用于决定该复选框是否被选中
复选框的 Value 属性用于决定该复选框是否被选中
复选框的 Checked 属性用于决定该复选框是否被选中
复选框的 Visible 属性用于决定该复选框是否被选中
要使控件与框架捆绑在一起，以下操作正确的是【 C 】。
在窗体不同位置上分别画一控件和框架，再将控件拖到框架上
B．在窗体上画好控件，再画框架将控件框起来
C．在窗体上画好框架，再在框架中画控件
D．在窗体上画好框架，再双击工具箱中的控件
要使 PictureBox 控件能够自动调整大小以显示整幅图像，可以将其【 C 】属性设置为 True。 A．Picture B．Alignment C．Stretch D．AutoSize
运行时，要清除图片框 P1 中的图像，应使用语句【 B 】。
P1.Picture=" " B．P1.Picture= LoadPicture()
C．Picture1.Picture=LoadPicture D．Picture= LoadPicture("")
要清除已经在图片框 P1 中打印的字符串而不清除图片框中的图片，应使用语句【 A 】。 A． P1.Cls B．P1.Picture= LoadPicture("") C． P1.Print " " D．P1.Picture=" "
15.在 Visual Basic 中，所有的窗体和控件都必定具有的一个属性是【 A 】。
Name B．Font C．Caption D．FillColor
17.决定控件上文字的字体、字形、大小、效果的属性是【 D 】。
Text B．Caption C．Name D．Font
为了添加 ComboBox 控件中的项目，需要使用【 C 】方法。为了删除 ComboBox 控件中 的项目，需要使用【 】方法。
Add，Remove B．AddItem，Remove
C．AddItem，RemoveItem D．Add，RemoveItem
Timer 控件的【 A 】属性决定该控件是否对时间的推移做出响应。将该属性设置为 False 会关闭 Timer 控件，设置为 True 则打开它。
A．Enabled B．Visible C．Time D．Capable
32.定时器的 Interval 属性以【C 】为单位指定 Timer 事件之间的时间间隔。
A．分 B．秒 C．毫秒 D．微秒
35.不具有输入数据功能的是【 D 】。
A．文本框 B．选项按钮 C．列表框 D．窗体
36.具有输出数据功能的控件【 C 】。
A．选项按钮控件和标签控件 B．复选框控件和文本框控件
C．标签控件和文本框控件 D．选项按钮控件和复选框控件
要在窗体上显示图片，需设置窗体的【 C 】属性。
Caption B．Icon C．Picture D．ControlBox
定时器控件每次经历一个固定的时间间隔【 B 】。
A．修改属性 B．触发事件 C．建立窗体 D．显示图片
二、 填空题
4．设置控件背景颜色的属性名称是 。
11.计时器控件只能触发 Backcolor 事件。
第 7 章 数组
选择题
2. 关于语句“Dim S(-5 To 6) As String 5”下列说法正确的是【 B 】。
A．S 是一个二维数组 B．S 是一个长度为 12 的一维数组
C．该语句无法执行，会报错 D．该语句定义了 5 个字符串类型的数组
6. 运行如下程序后，数组 a 中的值为【 D 】。
Dim a(4) As Integer For i = 0 To 4 a(i) = i + 1 Next i
?A．0 1 2 3 4 B．0 1 2 3 C．1 2 3 4 D．1 2 3 4 5
下列关于下标的说法中正确的是【 D 】。
下标必须小于上标 B．必须大于 0 C．必须是整数，否则报错 D．声明时必须使用常量
用下面语句定义的数组的元素个数是【 D 】。
Dim A (-3 To 5) As Integer
A．6 B．7 C．8 D．9
填空题
1. 设有数组声明语句： Option Base 1 Dim D(3, -1 To 2) 以上语句所定义的数组 D 为 2 维数组，共有 12 个元素，第一维下标从 1 到 3 ，第 二维下标从 -1 到 2 。
第 8 章 过 程
一．选择题
在过程调用中，参数的传递可以分为按值传递和【 】两种方式。
按名字传递 B. 按地址传递 C. 按参数传递 D. 按位置传递
3. 在参数传递过程中，Visual Basic 默认的传递方式是【 】。
A. 按值传递 B. 按地址传递 C. 按参数传递 D. 按位置传递
13.通用过程可以通过执行“工具”菜单中的【 】命令来建立。
A. 通用过程 B. 添加过程 C. 添加模块 D. 添加窗体
第 9 章 菜单、对话框及多重窗体
选择题 1． 要打开“菜单编辑器”窗口，应选择【 D 】下拉菜单的“菜单编辑器”命令。
A. 文件 B. 视图 C. 编辑 D. 工具
|
|
