Text1.Text = \End Sub
Private Sub Command2_Click() Text1.Text = \End Sub
首先单击Command2按钮，然后再单击Command1按钮，在文本框中显示（A ） A．AB B．CD C．ABCD D．CDAB
18、可获得当前系统日期的函数是（A ）
Ａ、Date( ) Ｂ、Time( ) Ｃ、IsDate( ) Ｄ、Year( ) 19、X是小于100的非负数，用VB表达式表达正确的是（C ） A、0≤X≤100 B、0<=X<100 C、0<=X and X<100 D、0≤X<100 20、以下能够触发文本框Change事件的操作是 D A、文本框失去焦点 B、文本框获得焦点 C、设置文本框的焦点 D、改变文本框的内容
21、要使标签中显示的文本居中显示， 应设置Alignment 的值为：（C ） A、 0 B、 1 C、2 D、3 22、下面四项中不属于面向对象系统的三要素的是：（A） A、变量 B、事件 C、属性 D、方法
23、对象的性质，来描述和反映对象特征的参数是对象的（ A） A、属性 B、方法 C、事件 D、过程 24、文本框没有（D ）属性
A、Enabled B、Backcolor C、Visible D、Caption 25、下述选项中，属于VB的程序设计方法是 （B） A、面向对象、顺序驱动 B、面向对象、事件驱动 C、面向过程、事件驱动 D、面向过程、顺序驱动
26、用于获得字符串S从第2个字符开始的3个字符的函数是（A ） A．Mid$(S,2,3) B、Middle(S,2,3) C、Right$(S,2,3) D、Left$(S,2,3) 27、确定一个窗体或控件大小属性是（B ）
A．Width或Height B．Width和Height C．Top或Left D．Top和Left 28、要使窗体的标题为“演示实例”，应修改窗体的（A )属性。 A．Caption B．Tip C．Item D．Text 29、下面语句中错误的是（B ）
A． Redim Preserve Matrix(10,Ubound(Matrix,2)+1) B． Redim Preserve Matrix(Ubound(Matrix,1)+1,10) C． Redim Preserve DynArray(Ubound(DynArray)+1) D． Redim DynArray(Ubound(DynArray)+1)
30、在MsgBox函数中哪一个参数是必须的（A ） A．prompt B．buttons C．title D．context
31、在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： Private Sub Command1_Click()
a = UCase$(Text1.Text) + Left$(Text2.Text，2) Print a End Sub
Private Sub Form_Load() Text1.Text = \Text2.Text = \End Sub
程序运行后，单击命令按钮，输出结果为（B ） A．ab12 B．AB12 C．AB56 D．ab56
32、下列关于属性设置的叙述正确的是（ D） A． 所有的对象都有同样的属性
B． 控件的属性只能在设计时修改，运行时无法改变 C． 控件的属性都有同样的默认值
D． 引用对象属性的格式为：对象名称 . 属性
33、在窗体中添加一个名称为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
程序运行后，如果单击命令按钮，窗体中显示的内容是（D ） A．3 3 B．3 4 C．3 D． 3
34、下列叙述中不正确的是（ B） A． VB中的函数功能类似于Sub过程 B． Sub过程不可以递归
C． 子过程不返回与其特定子过程名相关联的值
D． 过程是没有返回值的函数，又常被称为Sub过程，在事件过程或其他子过程中可以按名称调用过程
35、退出For循环可使用的语句为（ A ）
Ａ、Exit For Ｂ、Exit Do Ｃ、End For Ｄ、End Do
按哪个键和单击该命令按钮36、当一个命令按钮的Default属性设置为True时，
作用相同。（D ）
37、当我们输入代码时，VB可以自动检测下面那个错误：（A ） A、语法错误 B、编译错误 C、运行错误 D、逻辑错误
38、下列哪个属性决定命令按钮是否能够接受用户的输入，即命令按钮是否可用：（C ）
A、Caption B、Style C、Enabled D、Name 39、以下叙述中正确的是（A ）
A、窗体的Name属性指定窗体的名称，用来标识一个窗体 B、窗体的Name属性的值是显示在窗体标题栏中的文本
C、可以在运行期间改变对象的Name属性的值 D、对象的Name属性值可以为空
40、以下选项中，不属于文本框的属性是（ D ）。
A．Enabled B Caption C.Name D Min 41、假定窗体的名称为（Name属性）为form1，则把窗体的标题设置为“VBTEST”的语句正确的是（B ）
A．form1=“VBTEST” B．Caption=“VBTEST”
C．form1.test=“VBTEST” D．form1.name=“VBTEST” 42、清除列表框中的所有项目，应调用（C ）方法。
A. Cls B. RemoveAt C. Clear D. Remove
（A ） 43、VB项目文件即工程文件的扩展名是：
A、VBP B、FRM C、VBW D、FRX
44、若窗体上有一个文本框txt_Show，如果想要在程序运行后，在文本框中便会出现“Hello!”字样，应在 （ A）事件过程中写如下代码：txt_Show.Text=”hello! A 、Form_Load B、Command1_Click C 、Form_Click D、Form_Dbclick 45、下面哪个窗口用来浏览和设置窗体和控件的属性：（D ）
A、窗体窗口 B、工程资源管理器 C、工具箱 D、属性窗口 46、下面说法正确的是：（B ） A、窗体文件的扩展名.vbp
B、一个窗体对应一个窗体文件 C、VB中一个工程只包含一个窗体
D、VB中一个工程最多可以包含256个窗体 47、以下说法错误的是： （ D ） A、方法是对象的一部分
B、方法是一种特殊的过程和函数
C、方法的调用方式是 对象名称．方法名称 D、在调用方法时，对象名时不可缺少的 48、在代码编辑器中，若一条语句过长，可以用什么续行符来换行书写语句：（B ）
A、一个下划线“_” B、一个空格加一个下划线“_” C、一个连字符“-” D、一个空格加一个连字符“-” 49、下列选项中，更改哪个属性，可以对窗体的标题内容进行修改：（D ） A、Text B、Name C、Font D、Caption
50、在VB集成环境中创建应用程序时，除了工具箱、窗体窗口、属性窗口外，必不可少的窗口是：（C ）
A、窗体布局窗口 B、立即窗口 C、代码窗口 D、监视窗口 51、VB预先设置好的，能够被对象识别的动作是 （C ）
A、属性 B、方法 C、事件 D、过程 52、为了使标签框的大小根据里面显示的内容的长度进行扩展或缩小，应对（C ）属性进行设置
A、Alignment B、Backstyle C、Autosize D、Backcolor
53、当一个命令按钮的Cancel属性设置为True时，按哪个键和单击该命令按钮作用相同。（C ）
A、Ctrl B、Tab C、Esc D、回车
54、要改变新建对象的名称，应使用属性: ( C ) A、Font B、ForeColor C、Name D、Height
55、VB的工程资源管理器可管理多种类型的文件，下面叙述不正确的是（C ） A． 窗体文件的扩展名为.frm，每个窗体对应一个窗体文件
B． 标准模块是一个纯代码性质的文件，它不属于任何一个窗体
C． 用户通过类模块来定义自已的类，每个类都用一个文件来保存，其扩展名为.bas
D． 资源文件是一种纯文本文件，可以用简单的文字编辑器来编辑
56、在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序： Private Sub Command1_Click( ) a=Text1.text b=Text2.text C=Lcase(a) D=Ucase(b) PrintC;D End Sub
程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是（A） A．abcEFG B．abcefg C．ABCefg D．ABCEFG 57、以下关于窗体描述正确的是（B ） A． 只有用于启动的窗体可以有菜单
B． 窗体事件和其中所有控件事件的代码都放在窗体文件中 C． 窗体的名字和存盘的窗体文件名必须相同
D． 开始运行时窗体的位置只能是设计阶段时显示的位置 58、有关列表框的属性和方法的正确描述是（ D） A． 列表框的内容由属性Item Data来确定
B． 当多选属性（MultiSelect）为True时，可通过Text属性获得所有内容 C． 选中的内容应通过List属性来访问
D． 选中的内容应通过Text属性来访问，并且每次只能获得一条内容 59、如果变量a、b、c均为整型，下列程序段的输出结果为（C ） a=2 b=3 c=a*b
Print a & “*” & b & “=”& c
A．c=6 B．a*b=c C．2*3=6 D．a*b=6
60、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Print Tab(1); \第一\Print Tab(6); \第二\End Sub
程序运行后，如果单击命令按钮，在窗体上显示的内容是（□表示空格）（C ） A．第一□□第二 B．第一第二□□ C．第一□□□第二 D．第一□第二
61、如果希望一个窗体在显示的时候没有边框，应该设置的属性是（C ）
A． 将窗体的标题（Caption）设成空字符 B． 将窗体的Enabled属性置成False C． 将窗体的BorderStyle属性置成None D． 将窗体的ContalBox置成False 62、设有如下程序： Option Base 1
Private Sub Form_Click() Dim a(10), P(3) As Integer k = 5
For i = 1 To 10 a(i) = i Next i
For i = 1 To 3 P(i) = a(i * i) Next i
For i = 1 To 3 k = k + P(i) * 2 Next i Print k End Sub
程序运行后，单击窗体，则在窗体上显示的是（A ） A．33 B．35 C．37 D．38
63、以下不属于键盘事件的是（ C ）
Ａ、KeyDown Ｂ、KeyUp Ｃ、Unload Ｄ、KeyPress 64、当用户在窗体上单击鼠标时，不会触发的事件是（D ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 65、下列逻辑表达式中，能正确表示条件“x,y都是奇数”的是（C ） A．x Mod 2 =1 Or y Mod 2 =1 B．x Mod 2 =0 Or y Mod 2=0 C．x Mod 2 =1 And y Mod 2 =1 D．x Mod 2 =0 And y Mod 2=0
66、在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程： Private Sub Command1_Click() x = 0
Do While x < 10 x = (x - 2) * (x + 3) n = n + 1 Loop
Text1.Text = Str(n) Text2.Text = Str(x) End Sub
67、程序运行后，单击命令按钮，在两个文本框中显示的值分别为（B ） A．1和0 B．2和24 C．3和50 D．4和68
68、在窗体上添加标签Label1后，标签控件默认的名称Name为：（ A ） A、Label1 B、Label C、Text D、Text1
VB6.0程序设计教程复习题
