VB期中练习题-答案

VB单元练习题一

一、选择题

1、 Visual Basic集成开发环境中不包括下列哪些窗口？（ D）

A. 工具箱窗口 B. 工程资源管理器窗口

C. 属性窗口 D. 命令窗口

2、 “一辆小客车在正常行进过程中被一辆大型货车撞坏了”，在这句话中，“客车”，“小”，

“行进”和“被一辆大型货车撞坏了”分别对象Visual Basic中的哪些术语？（ B ）

A. 对象、属性、事件、方法 B. 对象、属性、方法、事件

C. 属性、对象、事件、方法 D. 属性、对象、方法、事件

3、对象的特征和状态特征称为？（ C ）

A. 事件 B. 方法 C. 属性 D. 类

4、下面哪一个属性用来标识对象的名称？（D ）

A. Caption B. Value C. Text D. Name

5、下列哪个符号是合法的变量名? （ A ）

A. VB123 B. Abs C. 99Ji D. xy

6、数学式子10sin25

o

写成Visual Basic表达式是？（D）

A. 10sin25 B. 10*sin(25) C. 10*sin(25

o

) D. 10*sin(25*3.14/180)

7、Visual Basic中不存在下列哪一种数据类型？（D ）

A. 字符串类型 B. 日期类型 C. 逻辑类型 D. 指针类型

8、表达式Left(“Visual”,3)+Lcase(“AB”)的值是？（C）

A. visAB B. VisAB C. Visab D. ualab

9、表达式6+10 Mod 4*2+1的值是？（A）

A. 9 B. 11 C. 1 D. 3

10、把数值型转换为字符串型需要使用下列哪一种函数? （B）

A. Val() B. Str() C. Asc() D. Chr()

11、VB中窗体文件的扩展名是______。

(A)VBP (B)FRM(对) (C)VBW (D)PDM

(D)工程资源管理器窗口(对)

(D)FillColor

12、在设计应用程序时，通过______窗口可以查看到应用程序工程中的所有组成部分。

(A)代码窗口(B)窗体设计窗口 (C)属性窗口

(A)Name(对) (B)Font (C)Caption

13、在VisualBasic中，所有的窗体和控件都必定具有的一个属性是______。

14、对变量名说法不正确的是______。

(A)必须是字母开头，不能是数字或其他字符

(B)不能是VB的保留字

(C)可以包含字母、数字、下划线和标点符号(对)

(D)不能超过255个字符

15、以下变量名中，______是不符合VisualBasic的命名规范的。

(A)Abc901 (B)_mnu_Open_234(对) (C)price_ (D)K

16、在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：

Private Sub Command1_Click()

Dim bAs Integer

b=b+1

End Sub

运行程序，三次单击命令按钮后，变量b的值是：______。

(A)0 (B)1(对) (C)2 (D)3

17、下列程序段的执行结果为______。

X=5:Y=-20

If Not X>0 Then

X=Y-3

Else

Y=X+3

Endif

Print X-Y;Y-X

(A)-3 3(对)

是

(A)if x2=x/2 then print"偶数" else print"奇数"

(B)if x mod2=0 then print"偶数"else print"奇数"

(C)if not x mod 2<>0 then print"偶数"else print"奇数"

(D)if x2=int(x/2 )then print"偶数"else print"奇数"(对)

19、若要执行下列程序段后窗体上显示“红”字，则x可取的值为：

Select case int(x/10)

case2,4,6,8

print"黄"

case1,3,5,7,9

print"绿"

case else

print"红"

end select

(A)27 (B)38 (C)10 (D)5(对)

20、在程序代码中将图片文件装入图片框Picture1的语句是______。

(A)e=""

(B)=""

(C)e=LoadPicture("")(对)

(D)LoadPicture("")

21、大部分控件都没有的属性是______。

(A)Top (B)Name (C)Enabled (D)Interval(对)

(B)5 8 (C)3 3 (D)25 25

18、当x为偶数时，则在窗体上显示“偶数”，否则显示“奇数”，不能实现该代码段功能的

22、下列属于正确的字符串常量的是____________

(A)#ABC" (B)$ABC$ (C)'ABC'

(D)"ABC"(对)

(C)not (b>0) (D)(a>b) or (b>0)(对)

23、设a=8,b=10，则以下表达式的值为真的是____________

(A)(-3+5>a) and (b>0) (B)a>=b and b>12

24、语句Z=y+1代表________

(A)将变量Z存入变量y中，再加上1的表达式

(B)变量Z取得y+1的值(对)

(C)变量Z取得变量y的值，然后再加上1的一个表达式

(D)将变量Z存入变量y+1中

25、执行下面的语句后，所产生的信息框的标题是___________。

A=MsgBox("AAAAA",3,"BBBBB")

(A)BBBBB(对) (B)AAAAA (C)空 (D)出错，不能产生信息框

26、执行下列代码，分别输入12和89，输出结果是_____。

Private Sub Form_Click()

a=InputBox("D")

b=InputBox("E")

Print a+b

End Sub

(A)101 (B)DE1289

(C)DE (D)1289(对)

(D)Interval

27、为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是_______。

(A)Enabled(对)

(A)Int(Rnd*7)

(B)Visible (C)Timer

28、下列表达式，哪一个可以产生1到6之间的随机整数（包括1和6）___。

(B)Int(Rnd(6)+1) (C)Int(Rnd*6) (D)Int(Rnd*6+1)(对)

29、执行下列程序，从键盘输入10，运行结果是_________。

PrivateSubCommand1_Click()

S=InputBox("请输入一个数字：")

Select Case S

Case Is>0

Print ">0"

Case Is>3

Print ">3"

Case Is>5

Print ">5"

End Select

End Sub

(A)>0(对) (B)>3 (C)>5 (D)>0

30． VB6.0共有3个版本，它们分别是_______

A． 学习版、标准版和企业版 B． 学习版、专业版和企业版

C． 学习版、标准版和网络版 D． 标准版、专业版和中文版

31． VB的集成开发环境中有___c____工作状态

A． 一种 B． 两种 C． 三种 D． 四种

32． VB6.0的集成开发环境不包括___D____

A． 窗体窗口 B． 工具箱 C． 代码窗口 D． 过程窗口

33． VB6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是___B____

A． 设计状态 B． 编写代码状态 C． 运行状态 D． 中断状态

34． 用VB设计的应用程序，文件的扩展名中不含____D___

A． .Frx B． .Bas C． .Vbp D． .Form

35． 以下说法正确的是___B____

A． 属性窗口包括：标题栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明

B． 属性窗口包括：标题栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明

C．属性窗口包括：菜单栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明

D．属性窗口包括：菜单栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明

36．VB中，强制变量声明的语句是___A____。

A．Option Explicit B．Option Base C．REM D．PUBLIC

37． VB6.0集成开发环境有三种工作状态，工作状态显示在_______。

A． 状态栏的最左方 B． 状态栏的最右方

C． 状态栏的中括号内 D． 标题栏的中括号内

38． 在界面设计时，双击窗体中的对象后，VB将显示的窗口是______。

A． 立即窗口 B． 代码窗口 C． 属性窗口 D． 项目（工程）窗口

39． 下述选项中，属于VB的程序设计方法是____B___。

A． 面向对象、顺序驱动 B． 面向对象、事件驱动

C． 面向过程、事件驱动 D． 面向过程、顺序驱动

40．VB集成开发环境中，功能键F5的功能是___D____。

A． 进入帮助窗口 B． 进入编辑状态

C． 进行上下窗口的切换 D． 运行程序

41．VB设计的应用程序，扩展名为.Vbp的文件是____C__。

A． 窗体文件 B． 类文件 C． 工程文件 D． 标准模块文件

42．VB 设计的应用程序，扩展名为.Frm的文件是__A____。

A． 窗体文件 B．类文件 C． 工程文件 D． 标准模块文件

43．用VB可视化程序设计语言设计应用程序的主要工作是完成___B___。

A． 设计流程和编写代码 B． 设计界面和编写代码

C． 设计算法和编写代码 D． 设计程序和编写代码

44．在VB 6.0中，12345&的数据类型是（B）

A． 整数型 B． 长整数型 C． 字符常数 D． 双精度常数

45．在VB6.0中，语句Dim M1#,Abc,Xyz As Single定义的M1、Abc 和Xyz的类型分别是（D）

A．双精度、整数型、单精度 B．双精度、单精度、单精度

C．双精度、整数型、整数型 D．双精度、可变类型、单精度

46．在VB6.0中，下列不正确的Integer型常数是_____A__________。

A． 32768 B． 0 C． 037% D． –22222

47．在VB6.0K ，12345678#的类型是__B____。

A． 整数型 B．长整数型 C． 字符常数 D．双精度常数

6．在VB6.0中，合法的字符串常数是______B______。

A． ABC$ B．“3+4” C． ‘ABC’ D．‘3+4’

48．方法PRINT 2030输出结果是 ——D——。

A． “2030” B．2030

C． 出现错误信息 D． 0

49．假定Bln1是逻辑型变量，下面赋值语句中正确的是__D___.

A． Bln1=’True’ B．Bln1=.True.

C． Bln1=#True# D．Bln1=3<4

50．在以下运算符中，优先级最低的是（C）

A． / B．

C． Mod D．^

51．VB6.0中，执行下面的四个语句时出现错误的是（C）

A． x=SGN(0) B． x=SQR(1)

C． x=LOG(0) D． x=SIN(1)

52．VB 6.0表达式COS（0）+ABS（-1）+INT（RND（1））的值是( )

A． 1 B．–1

C． 0 D．2

53．设a为整型变量，不能正确表达数学关系6

A． 6

C． a>6 And a<15 D． a>6 And Not (a>=15)

54．骰子是一个正六面体，用1~6这六个数分别代表这六面，掷一次骰子出现的数可表示为

（D）

A． INT（RND（6）+1） B．INT（RND*6）

C． INT（RND（1）*7） D．INT（RND（1）*6+1）

55．逻辑运算符And,Or和Not的优先顺序，从高到低是____C___

A． Or-And-Not B．And-Not-Or

C． Not-And-Or D．Not-Or-And

56．计算b的自然对数使用的Visual Basic表达式是____A_____

A． Log(b) B．Lg(b)

C． Loge(b) D．Lge(b)

57．方法Print 28 Mod –15 输出结果是____D____

A． “28 Mod –15” B． 28 Mod –15

C． -13 D．13

58．已字母A的ASCII码为十进制的65，表达式Asc（“A”）+Asc（“C”）的值是_______B__

A． 6567 B．132

C． “AC” D．AC

59．若X=5、Y=6，则表达式X+Y=11的值是___C___

A． X+Y=11 B．11

C． True D．False

60．下列执行语句后，V的值是____B____

A$=”54321”

V=Val(Mid$(A$,3,2))

A． 43 B．32

C． 432 D．0

61．执行下列语句后，E、F、G的值分别是______

E=5:F=4:G=3

E=F:F=G:G=E

A． 3 4 5 B． 4 3 4

C． 4 5 4 D． 4 5 5

62．m,n是整数，且n>m,在下面四个语句中，能将x赋值为一个m~n之间（含m,n）的任意

整数，即满足m<=x<=n的是_______

A． x=INT(RND*(n-m+1))+m B．x=INT(RND*n)+m

C． x=INT(RND*m)+n D．x=INT(RND*n-m)+m

63．VB6.0表达式Log(1)+ABS(-1)+Int(Rnd(1))的值是 _______

A． -1 B． 0

C． 1 D． 2

64．VB表达式10^-2的值是_______

A． –100 B．0.01

C． 100 D．–0.01

65．VB6.0表达式Len(Left(“abcd”,2)+Right(“济南学院”，2))的值为_________

A． 2 B． 4

C． 6 D． 8

66． Load事件是在窗体被装入工作区时（D）触发的事件。

A． 用户 B． 程序员

C． 手工 D． 自动

67． 修改控件属性，一般可以使用属性窗口，也可以通过（D）为属性赋值。

A． 命令 B． 对象

C． 方法 D． 代码

68．下面是窗体的四个属性，在界面设计时，改变属性值就看不到窗体变化的属性是_____。

A． Top B． Width

C． Left D． Enabled

69．下面四个选项，不是事件的是_____。

A． Load B． Enabled

C． Unload D． DblClick

70．以下叙述正确的是_______。

A． 窗体（名称）属性是用来标识窗体的

B． 窗体（名称）属性的值显示在窗体的标题栏中

C． 可以在运行期间改变窗体的（名称）

D． 窗体的（名称）属性值可以为空

71．决定窗体标题条显示内容的属性是______。

A． (名称) B． Text

C． Caption D． Top

72．若要使某文本框获得控制焦点，可使用的方法是_______。

A． LostFocus B． Point

C． SetFocus D． GotFocus

73．以下选项中，不是Visual Basic6.0缺省控件名称的是______。

A． Command1 B． Textl

C． labell D． Change

74．若要将某命令按钮设置为默认命令按钮，则应设置为True 的属性是_________。

A． Enabled B． Cancel

C． Default D． Value

75．命令按钮不能响应的事件是_____。

A． DblClick B． click

C． MouseDown D． MouseUp

二、填空题

1、下列哪些可以作为变量?

12fd x13 r2 a2 23a2

2、下列哪些可以作为常量？并说明是数值型还是字符型、逻辑型、日期型？

“asdf” asdf "1234" 1234 #2008/11/10# true false a3

3、把下列数学式子写成VB表达式

(x+y+z)/sqr(x^2+y^2+z^2)

2*sin((x+y)/2)*cos((x-y)/2)

4、计算下列VB表达式的值(要求写出步骤)

5*3*62 45

0

8/4*2.5/1.25*(3.7+2.5) 24.8

184*4.0^2/1.6

253 Mod 3*2 2

263 Mod 0.4*Sqr(25) 0

8/4*5/2.5*(3.25+6.75) 40

a^2+2*a*b+b^2

(((2*x+y)^3)/3)^(1/4)

3*72

14/5*2

155*2

27^1/3

27^(1/3)

10

5.6

1

9

3

1

a=234

z1=”abc”

n=”姓名”

sqr(100)4*2

5、按下列要求写出赋值语句

(1)把数值234赋给变量a

(2)把字符串abc赋给变量z1

6、写出下列函数的值

Int(-3.14159) -4

Sqr(sqr(16)) 2

7、随机产生a-b范围内(包括b)整数的公式：Int((b - a + 1) * Rnd + a)

8、写出输入输出语句

输出对话框：要求使用图标，标题为：”输出对话框” ，对话框中的内容是”你输错了”

(3)把标签Lblts的内容改为”姓名”

A = MsgBox("你输错了", 16, "输出对话框")

VB单元练习题二

1.下列叙述中正确的是(C)

A.只有窗体才是Visual Basic中的对象

B.只有控件才是Visual Basic中的对象

C.窗体和控件都是Visual Basic中的对象

D.窗体和控件都不是Visual Basic中的对象

2.确定一个控件在窗体上的位置的属性是(D)

或Height

B. Width和Height

或Left

和Left

3. 为了同时改变一个活动控件的高度和宽度，正确的操作是 (A)

A.拖拉控件4个角上的某个小方块

B.只能拖拉位于控件右下角的小方块

C.只能拖拉位于控件左下角的小方块

D.不能同时改变控件的高度和宽度

4、用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，

这称为：（ A ）

A、面向对象的程序设计 B、结构化程序设计

C、事件驱动的编程机制 D、可视化程序设计

5、VB6共有三个版本，按功能从弱到强的顺序排列应是（ C ）

A、学习版、专业版和工程版 B、学习版、工程版和专业版

C、学习版、专业版和企业版 D、学习版、企业版和专业版

6、VB集成开发环境有三种工作状态，不属于三种工作状态之一的是（ B ）

A、设计状态 B、编写代码状态 C、运行状态 D、中断状态

7、工程文件的扩展名是（B）

Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.frx

8、窗体文件的扩展名是（A）

Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.frx

9、VB集成开发环境可以（ D ）

A、编辑、调试、运行程序，但不能生成执行程序

B、编辑、生成可执行程序、运行程序，但不能调试程序

C、编辑、调试、生成可执行程序，但不能运行程序

D、编辑、调试、运行程序，也能生成执行程序

10、标准模块文件的扩展名是（C）

Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.vbg

11．用于获得字符串S从第5个字符开始的3个字符的函数是（A ）。

A．Mid(S,5,3) (S,5,3) (S,5,3) (S,5,3)

12.用于从字符串左边截取字符的函数是（D）。

A、Ltrim( ) B、Trim( ) C、Instr( )

D、Left( )

13.用于去掉字符串左右两边的空格的函数是（B）。

A、Ltrim( )

B、Trim( )

C、Left( ) D、Instr( )

14. 假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“VB Test”的语句为(B)

A. Form1 = "VB Test" B. Caption ="VB Test"

1．Text = "VB Test" ="VB Test"

15 下列说法中正确的是：为了保存一个Visual Basic应用程序，应当 (D)

A.只保存窗体模块文件(.frm) B.只保存工程文件(.vbp)

C.分别保存工程文件和标准模块文件(.bas) D.分别保存工程文件、窗体文件和标准模

块文件

16. 要使一个标签框对象能够显示所需要的文本，应设置该对象的那一个属性的值？( A)

A. Caption B. Text

C. Name ze

17. 要使一个命令按钮称为图形式命令按钮，应设置该队象的哪一个属性值？(B)

e

cture edPicture

18. 为使计时器对象每隔5秒钟产生一个时钟事件（Timer事件），则其Interval属性值应

设置为(D)

A.5 B.300 C.500 D.5000

19. 一个标准的VB应用程序至少要包含一个(C)对象。

A.文本框 B.标签框 C.窗体 D.命令按钮

20. 要使一个文本框对象能够显示多行文字，应设置该对象的(B)属性值为 True.

ine e

21、双击窗体中的对象后，VB将显示的窗口是（ C ）

A、工具箱 B、项目（工程）窗口 C、代码窗口 D、属性窗口

22、下述选项中，属性VB的程序设计方法是（ B ）

A、面向对象、顺序驱动 B、面向对象、事件驱动

C、面向过程、事件驱动 D、面向过程、顺序驱动

23、下面是窗体的四个属性，在界面设计时，改变属性值看不到窗体变化的是（ D ）

A、Top B、Width C、Left D、Enabled

24、下面四个选项，不是事件的是（ B ）

A、Load B、Enabled C、Unload D、DblClick

25、用来设置窗体背景图片的属性是（ B ）

A、Moveable B、Picture C、ForeColor D、WindowState

26、在VB6中的每一个对象都具有自己的属性、___C____和方法。

A、控件 B、函数 C、事件 D、公用过程

27．计算结果为0的表达式是（B ）。

A． Int(3.4)+Int(-3.8) (3.4)+Fix(-3.8)

C．Fix(3.4)+Fix(-2.8) (3.4)+Int(-3.8)

28. 假设A=3，B=7，C=2，则表达式 NOT ( BA 的值是(B)

C.表达式错误 D.不确定

29.在表达式 y = InputBox ( a, b, c ) 中，a,b,c分别为输入函数对话框的(B)（A）（C）。

A.标题 B.提示 C.预设值 D.帮助文件名

30.在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a = InputBox("Enter the First integer")

b = InputBox("Enter the Second integer")

Print b + a

End Sub

程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是

(D)

A.579 B.123 C.456 D.123456

31.在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

Dim a, b As Integer

a = InputBox("Enter the First integer")

b = InputBox("Enter the Second integer")

Print b + a

End Sub

程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是

(A)

A.579 B.123 C.456 D.123456

32.执行下面的语句后，所产生的信息框的标题是

a=MsgBox("AAAA"，，"BBBB"，""，5)(A)

B.空 D.出错，不能产生信息框

33.假定x的值为5，则在执行以下语句时，其输出结果为"Result"的Select Case语句是(C)

A. Select Case x

Case 10 To 1

Print "Result"

End Select

Case x

Case Is ＞ 5, Is ＜ 5

Print "Result"

End Select

C. Select Case x

Case Is ＞ 5, 1, 3 To 10

Print "Result"

End Select

D. Select Case x

Case 1, 3, Is ＞ 5

Print "Result"

End Select

34. 假定有以下循环结构

Do Until条件

循环体

Loop

则正确的描述是 (B)

A.如果"条件"是一个为0的常数，则一次循环体也不执行

B.如果"条件"是一个为0的常数，则无限次执行循环体

C.如果"条件"是一个不为0的常数，则至少执行一次循环体

D.不论"条件"是否为"真"，至少要执行一次循环体

35.以下程序段的输出结果为

x=1

y=4

Do Until y ＞ 4

x=x*y

y=y+1

Loop

Print x (B)

A.1 B.4 C.8 D.20

36. 执行下面的程序段后，x的值为

x=5

For i = 1 To 20 Step 2

x=x+i5

Next i (A)

A.21 B.22 C.23 D.24

37. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

x=0

Do Until x = -1

a=InputBox("请输入 A的值")

a=Val(a)

b=InputBox("请输入B的值")

b=Val(b)

x=InputBox("请输入x的值")

x = Val(x)

a=a+b+x

Loop

Print a

End Sub

程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 (A)

A.2 B.3 C.14 D.15

38．如果要在文本框中键入字符时，只显示某个字符，如星号(*)，应设置文本框的( )属性。

A．Caption

B．PasswordChar

C．Text D．Char

39.退出For循环可使用的语句为（ A ）。

A、

Exit For

B、End For C、Exit Do D、End Do

40.退出Do…Loop循环可使用的语句为（ C ）。

A、Exit For B、End For

C、Exit Do

D、End Do

41.退出函数过程可使用的语句为（ D ）。

A、Exit sub B、End sub C、End Function

D、Exit Function

42.退出sub过程可使用的语句为（ A ）。

A、

Exit sub

B、End sub C、End Function D、Exit Function

43. 在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：

Private Sub Form_Load()

= ""

us

For i=1 To 10

Sum = Sum + i

Next i

= Sum

End Sub

上述程序的运行结果是 （C）

A.在文本框Text1中输出55 B.在文本框Text1中输出0

C.出错 D.在文本框Text1中输出不定值

44.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属

性为Command1)，然后编写如下事件过程：

Private Sub Command1_Click()

x=0

Do While x ＜ 50

x=(x+2)*(x+3)

n=n+1

Loop

= Str(n)

= Str(x)

End Sub

程序运行后，单击命令按钮，在两个文本框中显示的值分别为 (B)

A.1和0 B.2和72 C.3和50 D.4和168

45.在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：