VB程序设计复习资料

一、填空

1、VB集成环境的工作状态主要有三种不同的模式_ ____,___ ___和__ ____。

2 创建一个新的工程可以用"文件"菜单中的__ ____命令或_ _____命令。

3 在面向对象程序设计中，__ ____是基本构成单元，并从相同类型的对象中抽出分类，对象只是类的实例。

4 面向对象程序设计中的__ ___是对一类对象进行分析.概括，得到一类对象的公共性质，并加以描述的过程。

5 __ ____是把相关的数据和代码结合成一个有机的整体，形成数据和操作代码的封装体，对外只提供一个可以控制的接口，内容大部分的实现细节对外隐蔽。

6 __ __描述了类之间的关系，这种关系使得一类可以继续另一类的属性和行为，从而，提供了通过现有的类创建新类的方法，也提高了软件复用的程度。

7 函数Str$(256.36)的值是

8 逻辑型（布尔型）数据其值只有 和 两种。

9 Mid(“什么是ASCII编码”,5,6)的结果 。

10 在VB中123456&，,1.2346E+5，1.2346D+5这3个常数分别表示 ， ，

类型。

11 VB的数组常见有三种类型：定长数组、变长数组和＿＿＿。

12

根据是否有返回值可将VB中的过程分为两类 和 。

13 处理窗体事件的过程是 。

14 操作控件时会产生相应的控件事件，处理该事件的过程是 。

15 可以用 提前结束过程，并返回到调用该过程语句的下一条语句。

16 参数定义时若有限定词ByVal，则参数传递 。

17 定义时没有修饰词或带关键字ByRef，则参数传递 。

18 形参数组只能按地址传递参数，对应的实参也必须是 。

19 过程的 是指在一个函数中直接或间接地调用自己。

20 在vb中设置大部分属性的方法有两种，这两种方法是 和 。

21 caption属性用来设置控件对象的 。

22 菜单分为 和 菜单，设计菜单需要在 中设计。

23 数据项由若干个

组成，用来表示一项数据，即一个对象的某个属性。

24 记录是文件中存取的

，由一组相关的数据项组成，用来描述一个对象，相当于登记表表格中的一行。

25 文件由具有相同

结构的一组

构成，相当于一张二维表。

26 顺序文件就是普通的文本文件，它依序把每个

存储到文件中。

27 VB为了方便进行文件的操作，增加了一个

对象，该对象提供了许多进行文件系统操作的方法，但要应用对象，须引用一个名为Scripting的类库，否则不能使用该对象。

28 顺序文件的打开方式有

、

、

三种方式。

29 随机文件以记录为单位，每条记录包含若干数据项，记录和数据项都有

的长度。

30 VB集成开发环境由 、 、 、 等组成。

31 数据库是由多个表组成的。只有将所需的 建立起来，一个数据库才算建好了。

二、单项选择题

1 窗体文件的扩展名是

第 1 页 共 9 页

A .bas B .cls C .frm D .res

2 一个工程必须包含的文件类型是

A .vbp .frm .frx B .vbp .cls .bas

C .bas .ocx .res D .frm .cls .bas

3 VB的使用目的是

A开发Windows应用程序 B图像处理 C制作WAV文件D文字处理

4 VB集成开发环境中不包括下列哪些窗口

A 工具箱窗口 B 工程资源管理器窗口 C 属性窗口 D命令窗口

5“一辆小客车在正常行进过程中被一辆大货车撞坏了”，在这句话中“客车”“小”“行进”和“被一辆大货车撞坏了”分别对应VB中的哪些术语

A对象，属性，事件，方法 B 对象，属性，方法，事件

C属性，对象，事件，方法 D属性，对象，方法，事件

6 下列哪一个属性用来标识对象名称

A Caption B Value C Text D Name

7 和传统程序设计语言相比，VB最突出的特点是

A结构化程序设计 B程序开发环境

C程序调试技术 D事件驱动编程机制

8

下列 不能作为VB的合法变量名。

B.a6 1

9 设x=-3,则表达式-4

C.-1 D.0

10 .VB中，mid(“A2B4,2,1)的值是 。

A.2B B.0 C.2 D.4

11. 在VB中，合法的常量是 。

A.‟xxx‟ B.2/3 C.5e

12. VB表达式Sqr(9)+Int(-5.4)*Sgn(6.8)-Fix(3.1)的值是 。

A.-6 B.-5 C.35 D.30

13. 函数Int(Rnd*80)+10是在 范围内的整数。

A.[10，90] B.[10,89] C,[11，90] D.[11.89]

14. 要声明一个长度为256个字符的定长字符串变量str,下列语句正确的是 。

str As String B. .DIM str As String（256）

C. .DIM str As String[256] D. .DIM str As String*256

15.要声明a为变体型变量的是 。

A. DIM a,b As Integer B. .DIM a As String

C. DIM a As Integer a As Currency

16.下列正确的表达式是 .

A.‟‟ok‟‟=text =‟‟x+y‟‟

+1=3 =dim

17.下列 语句可以交换变量x和y的值。

A.x=(x+y)/2：y=(x-y)/2 B.x=t：t=y:y=x

C.x=x+y:y=x-y:x=x-y D.x=y：y=x

18.表达式Len(Str(2000-1999))-95的正确结果是 。

A.0 B.1 C.2 D.3

第 2 页 共 9 页

19.下列日期型数据正确的是 。

A.@January10,1979@ B . # January10,1997#

C.” January10,1997‟‟ D. & January10,1997&

20.下面说法不正确的是 。

A．变量名的长度不能超过255个字符

B. 变量名可以包含小数点或内嵌的类型声明字符

C. 变量名不能使用关键字

D.变量名第一个字符必须是字母

21.变量L的值为-8，则-L^2的值为 。

A.64 B.-64 C.16 D.-16

22.关于货币型数据的说明，正确的是 。

A.货币型数据有时可以表示成整型数据

B．货币型数据与浮点型数据完全不一样

C. 货币型数据是由数字和小数点组成的字符串

D.货币型数据是小数点位置固定的实数型

23.如果一个变量未经定义就直接使用，则该变量的类型为 。

r n t

24.下面的4个VB6.0下的表达式语法正确的是 。

A.a>b. find. b<>c B.a>bAND<>c

C.a>bANDb<>c D.a>bc

25.可以同时删除字符前导和尾部空白的函数是 。

26. 表达式4567/8Mod9的值是 。

A.4 B.5 C.6 D.7

27. 已知A$=‟‟12345678‟‟,则表达式Val(Left$(A$,4)+Mid$(a$,4,2))的值为 。

A.123456 B.123445 C.8 D.6

28. Print DateAdd(„‟ m‟‟1#1/30/2000#)语句显示的结果是 。

A.00-2-29 B.00-2-28 C.00-2-30 D.00-1-31

29. 表达式DateDiff(„‟y‟‟,#12/30/1999#,#1/13/2000#)的结果是 。

A.1 B.11 C.14 D.99

30. 表达式Len(„‟123程序设计ABC‟‟的值是 。

A.10 B.14 C.20 D.17

31.表达式LenB(„‟123程序设计ABC‟‟)的值是 。

A.10 B.14 C.20 D.17

32.设有如下语句;Str=InputBox(„‟输入‟‟,‟‟ „‟,‟‟练习‟‟),从键盘上输入字符串“示例”后，Str的值是 。

A .输入 B.“ ” C.“练习” D.“示例”

33若要退出For循环，可使用的语句为 。

Do For

34 定有一下情绪段，则语句Print i*j的执行次数是 。

For i=1 to 3

For j =5 to 1 Step -1

Print i*j

第 3 页 共 9 页

Next j,i

A.15 B.16 C.17 D. 18

35针对语句 If I=1 then J=1，下列说法正确的是 。

A.I=1 和J=1 均为赋值语句 B.均为关系表达式

C.I=1 为关系表达式，J=1为赋值语句

D.I=1 为赋值语句，J=1 为关系表达式

36执行以下语句后，a的值是 。

Dim a AS Integer

a = 1

Do Until a = 100

a = a +2

Loop

A.99 B.100 C.溢出 D.101

37.下列数组声明语句中正确的是 。

A．dim a[2;3] as integer a[2,3] as integer

a(2;3) as integer a(2,3) as integer

38.在使用变长加粗时，如果要改变数组的大小而又不丢失数组中的数据，应使用关键字 。

A．private ve

39.控件数组中的名字是由下列那个属性决定的 。

A．text ex

40.下列关于控件数组的说法中正确的是 。

A.控件数组的每一个成员的caption属性都不相同

B.控件数组的每一个成员都执行相同的事件过程

C.控件数组的每一个成员的index属性都不相同

D.对于已经建立的多个相同类型的控件不能组成控件数组

41 .语句Dim arr（-3 To 4,2 To 6）As Integer定义的数组元素有 。

A.45个 B.40个 C.11个 D.54个

42.一下关于变量作用域的叙述中，正确的是 。

A. 窗体中凡被声明为Private的变量只能在某个指定的过程中使用

B. 全局变量必须在标准模块中声明

C. 模块级变量只能用Private关键字声明

D. Static类型变量的作用域是它所在的窗体或模块文件

43.一个工程中含有窗体Form1、Form2和标准模块Model1.如果在Form1中有语句Public X

As Integer，在Model1中有语句Public X As Integer，则以下叙述中正确的是 。

A. 变量X、Y的作用域相同 B. Y的作用域是Model1

C.. 在Form1中可以直接使用X D. 在Form2中可以直接使用X和Y

44.使用过程是为了 。

A.是程序模块化 B.是程序易于阅读

C.提高程序运行速度 D.便于系统的编译

45.有一子程序定义为Private Sub tt（x,y），正确的调用格式是 。

A. Call tt 1,2 B. Call sub 1,2 C. tt 1,2 D. sub 1,2

46 .根据变量的作用域，可以讲变量分为3类，分别为（ ）。

第 4 页 共 9 页

A. 局部变量、模块变量和全局变量 B. 局部变量、模块变量和标准变量

C. 局部变量、模块变量和窗体变量 D. 局部变量、标准变量和全局变量

47.在Visual Basic应用程序中，以下描述正确的是 。

A. 过程的定义可以嵌套，但过程的调用不能嵌套

B. 过程的定义不可以嵌套，但过程的调用可以嵌套

C. 过程的定义和过程的调用均可以嵌套

D. 过程的定义和过程的调用均不能嵌套

48 .以下说法错误的是 。

A. 函数过程没有返回时 B. 子过程没有返回值

C. 函数过程可以带参数 D.子过程可以带参数

49. 使用visual basic编程时，工具箱中的工具称为 。

A 事件 B 工具 C 控件 D 窗体

50. 改变窗体的标题时，应当在属性窗口中改变 的属性。

A caption B name C text D label

51. 窗体能影响的事件是 。

A avtiveform B drive C load D change

52. 若要求从文本框中输入密码时在文本框中只显示“*”号，则应在此文本框的属性窗口中设置 。

A text属性值为* B caption属性值为* C password属性值为空 D passwordchar属性值为*

53. 控件可自动设置滚动条。

A 复选框 B 框架 C 文本框

54. 能够改变复选框中背景颜色的属性是 。

A value B fontcolor

窗体的子菜单最多有 级。

A．3 B.4 C.5 D.6

C backcolor D font

D 标签框

57.多窗体程序是由多个窗体组成的。在默认的情况下，VB在应用程序执行时，总是把

（）制定为启动窗体。

A．不包含任何控件的窗体 B.设计时的第一个窗体 C.包含控件最多的窗体

D.命令为Form的窗体

58 VB提供 类文件。

A、1 B、2 C、3 D、4

59需要在文件中查找某个数据，必须严格按照从头到尾的顺序搜索，才能定位到要找的数据，这种文件是 类型的文件。

A、二进制 B、随机 C、数据库 D、顺序

60 获取一个驱动器的当前目录的函数是 。

A、Loc（） B、FreeFile（） C、Seek（） D、CurDir（）

61 是用来显示指定目录下的文件列表控件。

A、DirListBox B、DriveListBox C、FileListBox D、TextBox

62列表框有多个事件，其中 是当文件列表框的Path属性值发生变化时触发。

A、Click B、DblClick C、PathChange D、PatternChange

63 文件保存的数据是无格式的字节序列，文件中没有记录或数据项这样的结构。

A、顺序 B、二进制 C、随机 D、数据库

64如果在程序中已打开多个文件，再打开文件时，为了避免文件号重复，可使用 函第 5 页 共 9 页

数取得这个文件号。

A、FileExists（） B、Seek（） C、Lof（） D、FreeFile（）

三、写出程序输出结果

1、

Private Sub Form_Click()

Dim i As Integer, sh As String, ch As String

Ch = "abc"

For i = 1 To Len(ch)

Sh = sh & Mid (ch,i,1)

i = i + 1

Print sh

Next

End Sub

2、

Private Sub Form_Click()

Dim i As Integer, p As Integer ,n As Integer

p = 3: n = 20

For i =1 To n Step p

p = p +2

n = n - 3

i = i + 2

If p >=10 Then Exit For

Next i

Print i,p,n

End Sub

3、

Private Sub Form_Click()

Dim str1 As String, str2 As String, I As Integer

Str1 = "ab"

For I = Len(str1) To 1 Step -1

Str1 = str1 & Chr(Asc(Mid(str1,I,1)) + I)

Next I

Print strl

End Sub

4、

Dim A(10),B(5)

For i=1 To 10

A(i)=i

Next i

第 6 页 共 9 页

For j=1 To 5

B(j)=j*20

Next j

A(5)=B(2)

Print” A(5)=”;A(5)

5、

Dim a

a=Arry(1,2,3,4,5,6,7,8)

i=0

For k=100 To 90 Step -2

s=a(i)^2

If a(i)>3 Then Exit For

i=i+1

Next k

Print k;a(i);s

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：

Private Sub Command1_Click（）

n=

Select Case n

Case 1 To 20

x=10

Case 2, 4, 6

x=20

Case Is<10

x=130

Case 10

x=40

End Select

=x

End Sub

程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（ ）。

四、程序填空

A.

下面程序段的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入，输出结果。请将程序段补充完整。

Dimx, amax, aminAsSingle

第 7 页 共 9 页

x = InputBox ("Enterascore")

amax = x

amin = x

Do While______________________

Ifx>amax Then

aman = x

End If

If__________________ Then

amin=x

EndIf

x = InputBox ("enterascore")

Loop

Print "max=";amax, "min=";amin

B. 下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，如果能则输出该数及平方值。请将程序段补充完整。

Private Sub Form_Click()

Dim numX As Integer

numx =Val(InputBox("请输入一个整数"))

If___________________ Then

___________

End If

End Sub

C. 下面程序是计算Sn的值。Sn=a+aa+aaa+„+aaa„a，其中最后一项为n个。例如，若a=5，则Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。

Private Sub Command1_Click()

Dim a As Integer, n As Integer, Cout As Integer

Dim Sn As Long, Tn As Long

Cout =1

Sn=0

Tn=0

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

_____________________________

Do

Tn=Tn * 10 + a

Sn=Sn + Tn

Count=Count + 1

_____________________________

a,n,Sn

End Sub

第 8 页 共 9 页

下面是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。

Sub RecArea （L，W）

Dim S As Double

S=L*W

MsgBox“TotalAreais”&Str（S）

End Sub

PrivateSubCommand1_Click（）

DimM，N

M=InputBox（“宽度？”）

M=Val（M）

N=Val（N）

End Sub

五、编程

1.编写过程求1!+2!+3!+4!+„+20!。

2.编写程序完成如下功能：分别将字符串a和字符串b中的字符倒置。然后按交叉的顺序将两个字符数组合并到字符数组c中，过长的部分直接连接在c尾部（例如，若字符串a的内容为“abcdefgh”，字符串b的内容为“1990”，则结果为“h0g9f9e1dcba”）。

3.编写过程，求100~300中所有的素数，并将其存放在一个数组中。

4.编写过程，判断一字符串是否是回文（例如“ababa”是回文，而“abdfa”不是）。

第 9 页 共 9 页