VB二级历年选择题填空题答案

1

一、选择题

1.当一个工程含有多个窗体时，其中的启动窗体是______。答案 D A.启动Visual Basic时建立的窗体 B.第一个添加的窗体 C.最后一个添加的窗体 D.在\工程属性\对话框中指定的窗体

2.决定控件上文字的字体、字形、大小、效果的属性是______。答案 D

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

3.如果在窗体上已经创建好了一个文本框对象Text1，可以通过________事件获得输入键值的ASCII码。答案 C

A.KeyDown B.KeyUp C.KeyPress D.GotFocus

4.当Form窗体开始运行时，下列事件①Initialize、②Load、③Activate依次执行的顺序是_______。答案 A

A.①②③ B.③②① C.②①③ D.②①③

5.单击滚动条两端的箭头时，滚动条 Value 属性值的改变量由________属性值决定。答案 C

A.Min B.Max

C.SmallChange D.LargeChange 6.设用户界面上有两个命令按钮：Command1和Command2,则下列说法错误的是________。答案 A

A.两者的Default属性值可同时为 1 B.两者的Cancel属性值可同时为0 C.两者的Default属性值可同时为0

D.若Command1 的Default属性值为1，则Command2 的Default属性值必为0

解析：当命令按钮的Default属性为True时，按回车键可执行其click事件；当其Cancel属性为True时，按Esc时可执行其Click事件。

7.下列关于Do While …Loop 和Do…Loop Until循环执行循环体次数的描述正确的是________。答案 D

A.Do While …Loop循环和Do…Loop until循环至少都执行一次 B.Do While …Loop循环和Do…Loop until循环可能都不执行 C.Do While …Loop循环至少执行一次，Do…Loop Until循环可能不执行

D.Do While …Loop循环可能不执行，Do…Loop Until循环至少执行一次

8.循环语句For i =1 to 10 Step 1.5的执行次数是_______。答案 B

A.5 B.7 C.8 D.10

9.若有数组声明：Dim c(3, 4 To 5) As Integer,下面数组元素引用中正确的是 ________ 。答案 B

A.c(1,2) B.c(0,5) C.c(4) D.c(4,4)

10.若变量n已赋值，下面数组定义正确的是_______ 。答案 C A.Dim Arr( n ) B.Dim Arr( 2n ) C.Dim Arr( 15 ) D.Dim Arr( 2 + n ) 11.在子过程定义中用_________关键字表示传址的形参。答案 B A.Var B.ByRef C.ByVal D.ByAdd

12.使用菜单编辑器设计菜单时,必须输入菜单项的_______ 。答案 D

A.快捷键 B.标题 C.索引 D.名称 13.VB提供了_______方法，用来显示弹出菜单。答案 D A.ShowMenu B.ActiveMenu C.OpenMenu D.PopupMenu 14.Print #1,str1$ 中Pint是_________。答案 A

A.文件的写语句 B.在窗体上显示的方法

C.子程序名 D.以上均不是

15.运行时要在图形框Picture1中显示字符串\，应使用语句_______ 。答案 C

A.Picture1.Text=\B.Picture1.Print=\

C.Picture1.Print \二、填充题

1.下面事件过程是当窗体单击时，在图形框内输出如图所示的图形，在空白处填入正确的内容。π取3.14。

Private Sub Form_Click()

Picture1.Scale (-10, 10)-(10, -10)

Picture1._____(1)_____ = 5 '设置线宽 Picture1.Circle (0, 0), 4, ,______(2)_____ , -0.01 End Sub

答案 DrawWidth - 3.14 / 2 @ - 1.57

2.要判断文本框中是否按了Enter键，通常在________ 事件过程中编写程序。

答案 KeyPress

3.如果要使变量能在程序的所有窗体和所有事件过程中使用，在变量定义时应使用________ 关键字。 答案 Public

4.如果循环体中包含有另一个循环结构，这就构成了循环的________ 。 答案 嵌套

5.如果动态数组a已经设置为 a（3），并且已经赋了值，现在要重新定义该数组为a（5），而且要保留原先各元素的值，则需要通过语句 ________来实现。

答案 ReDim Preserve a(5)

6．下面的程序段实现的功能是：当在文本框中输入整数n时，在窗体上输出 n+1 行图形。 Private Sub Form_Click()

Cls

n = Val(Text1) Print Tab (9) ; \

For i = 1 To

Print Tab ( ) ; \?1); \?1) ; \ Next i End Sub 答案 n,9-i

7.在一个窗体上有多个单选按钮，使用________ 控件可将这些单选按钮分成一组一组，相互之间不会影响。 答案 框架@Frame

8.随机文件的写操作用________ 语句实现。 答案 Put

9.当图片框（PictureBox）控件Picture1的Picture属性已经加载了一幅图片后，在程序运行时，可以通过

Picture1.Picture=________ ，将图片清除。 答案 LoadPicture(\

2

一、选择题

1.如果要向工具箱中加入ActiveX控件，可以使用\工程\菜单中的_______ 命令。答案 B

A.引用 B.部件 C.属性 D.程序

2.设用户界面上有两个命令按钮：Command1和Command2，则下列说法错误的是_________。答案 A

A.两者的Default属性值可同时为 True B.两者的Cancel属性值可同时为 False C.两者的Default属性值可同时为 False

D.若Command1 的Default属性值为 True，则Command2 的Default属性值必为False

3.要使一个标签透明且不具有边框，则应_________。答案 A A.将其BackStyle属性设置为0，BorderStyle属性设置为0 B.将其BackStyle属性设置为0，BorderStyle属性设置为1 C.将其BackStyle属性设置为1，BorderStyle属性设置为0 D.将其BackStyle属性设置为1，BorderStyle属性设置为1

4.为了取消窗体的最大化功能，需要设置______ 属性为False。答案 D

A.ControlBox B.MinButton C.Enabled D.MaxButton

5.设用户界面上有一个单选按钮和一个复选框，程序运行时，它们都处于被选中状态，则不能在窗体上正确地输出\的语句是________。答案 B

A.If Option1.Value Then Print 1

B.If Check1.Value = True Then Print 1 C.If Check1.Value Then Print 1

D.If Option1.Value = True Then Print 1

Option1.Value(false/true) Check1.Value(0/1/2)

7.若x= -3，执行If x Then x=0 Else x=1 后x的结果为

_______。答案 C

A.实时错误 B.编译错误 C.x=0 D.x=1 非零数都表示true

8.在Visual Basic中，若要将控制权交给操作系统则通过__________的语句。答案 D

A.End B.Exit Do C.Exit Sub D.DoEvents

9.对于一个命令按钮控件数组Commandl，以下对该数组的说法正确的是_________。答案 D

A.控件数组中的所有命令按钮的Caption属性值相同 B.在代码中访问命令按钮时，只需使用名称Command1 C.控件数组中的命令按钮的大小都相同

D.控件数组中的命令按钮共享相同的事件过程

11.在子过程定义中用_________关键字表示传址的形参。答案 B A.Var B.ByRef C.ByVal D.ByAdd

12.将数据项\加到组合框Combo1中成为第一项的语句是_______ 。答案 A

A.Combo1.AddItem \B.Combo1.AddItem \C.Combo1.AddItem text,\D.Combo1.AddItem \

13.要使Timer控件的Timer()事件有效运行，必须使其_______。答案 B

A.Enabled为True或Interval为非零 B.Enabled为True且Interval为非零

C.Enabled为True或Interval为零 D.Enabled为True且Interval为零

14.当文件指针到达文件尾部时，_______ 函数的值为真。答案 B A.LOF() B.EOF() C.LOC() D.LEN() 15.VB坐标系的默认原点在窗体的_______。答案 A

A.左上角 B.右上角 C.左下角 D.右下角 二、填充题

1.已知窗体 Form1 的CurrentX = 100，执行了命令Line Step(200, 200) - (500, 400)后，CurrentX 的值为_____________ 。答案 500 2.设有以下定义语句：Dim m, n As Single 则变量 m 的数据类型是________。 答案 变体型@Variant

3.在VB中，表示日期／时间型常量所使用 的定界符是_________。 答案 #

4.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()

Dim x As Integer, n As Integer x = 1

Do While x < 10 x = x * 3 Loop

Text1.Text = x End Sub

程序运行后，单击命令按钮，在文本框中显示的值是________。 答案 27

5.复选框的文本标题是通过________属性设置的。 答案 Caption 6.Visual Basic提供了三种对数据文件的访问方式，它们是随机访问方式、_____和二进制访问方式。 答案 顺序访问方式

7.已知窗体 Form1 的CurrentX = 100，执行了命令Line Step(200, 200) - (500, 400)后，CurrentX 的值为_____________ 。 答案 500

8.数组a中存放有8个整数，下列程序用于计算该数组中所有偶数元素的平均值。 Dim a

a = Array(1, 5, 12, 3, 22, 6, 17, 18) s = 0: n = 0 For i = 0 To 7

If a(i) Mod 2 =__(1)__ Then s = ___(2)____ n = n + 1 End If Next i

Print s / n 答案 0 s + a(i)

9．下面的程序段实现的功能是：当在文本框中输入整数n时，在窗体上输出 n+1 行图形。

Private Sub Command1_Click() Cls

n = Val(Text1)

For i = n To 1 Step -1

Print Tab(9 - i); \ Next i

Print Tab(9); \End Sub 答案 n To 1 Tab(9); \

3

一、选择题

1.在VB有两种程序的运行模式，它们是_______ 。

A.编译运行模式和解释运行模式 B.类运行模式和对象运行模式

C.工程运行模式和窗体运行模式 D.窗体运行模式和控件运行模式 答案 A

2.要求改变窗体的标题内容，应当通过窗体的______属性来实现。 A.Caption B.Name C.Text D.Label 答案 A

3.为了防止用户随意将光标置于控件之上，应进行 _________ 设置。

A.将控件的TabIndex属性设置为0 B.将控件的TabStop属性设置为True

C.将控件的TabStop属性设置为False D.将控件的Enabled属性设置为False 答案 D

4.若要将某命令按钮设置为窗体的默认命令按钮。则应设置命令按钮的属性 ________ 为True。

A.Value B.Cancel C.Default D.Enabled 答案 C

5.下面所列的控件中，其值既能在程序设计时设定，又能在程序运行时通过赋值改变的是________。

A.Drive1.Drive B.Text1. Visible C.Dir1.Path D.Command1.Index 答案 B

6.下列控件中无法响应Click事件的是________。

A.驱动器列表框 B.文本框 C.标签 D.时钟

答案 D

7.在Visual Basic代码中，将多个语句合并在一行上的并行符是________ 。

A.撇号（'） B.冒号（：） C.感叹号（！） D.问号（?） 答案 B

8.在Visual Basic中注释语句使用_____________符号来标志。 A.# B.* C.' D.@ 答案 C

9.若有数组声明：Dim c(3, 4 To 5) As Integer,下面数组元素引用中正确的是 ________ 。

A.c(1,2) B.c(0,5) C.c(4) D.c(4,4) 答案 B

10.有定义：Dim Li(-3 to 3,10) As Integer，则下面错误的语句是_________。

A.Li(0,0)=1 B.Li(-3,10)=1 C.Li(3,10)=1 D.Li(-3,3,10)=1 答案 D

11.在子过程定义中用_________关键字表示传址的形参。 A.Var B.ByRef C.ByVal D.ByAdd 答案 B

12.复选框（CheckBox）对象是否被选中，是由其_______ 属性决定的。

A.Caption B.Name C.Value D.Enabled 答案 C

13.复选框（CheckBox）对象是否被选中，是由其___________属性决定的。

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

答案 C

14.Print #1,str1$ 中Pint是_________。

A.文件的写语句 B.在窗体上显示的方法

C.子程序名 D.以上均不是 答案 A

15.执行命令 Circle（600，600），500，，，，3 将绘制_______。 A.圆 B.圆弧 C.椭圆 D.扇形 答案 C

二、填充题

1.下面事件过程是当窗体单击时，在图形框内输出如图所示的图形，在空白处填入正确的内容。

Private Sub Form_Click()

Picture1.Scale (-10, 10)-(10, -10)

Picture1._____(1)_____ = 5 ' 设置填充样式

____(2)_____ (0, 0), 4, , -3.14 / 2, -3 * 3.14 / 2 End Sub

答案 FillStyle Picture1 . Circle

2.在程序设计中，将文本框控件Text1用作输入密码，当键盘输入任何一键时，都显示\，需要设置________ 属性。 答案 PasswordChar

3.表达式20 / 4 - 3 ^ 2 * 6 \\ 2 mod 7 \\ 2 的值是________。 答案 5

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

Private Sub Command1_Click()

Dim array1(10,10) As Integer Dim i,j As Integer For i=1 To 3 For j=2 To 4

array1(i,j)=i+j Next j Next I

Text1.Text=array1(2,3)+array1(3,4) End Sub

程序运行后，单击命令按钮，在文本框中显示的值是______。 答案 12

5.ReDim 语句用于确定________ 数组的大小。 答案 动态

6.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：

Private Sub Command1_Click() Dim x,y,z As Integer x=5 y=7 z=0

Text1.text=\Call P1(x,y,z) Text1.Text=Str(x) End Sub

Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer)

c=a+b End Sub

程序运行后，如果单击命令按钮，则在文本框中显示的内容是________。 答案 5

7.菜单项只有一个事件，即________ 事件。 答案 Click

8.Visual Basic提供了三种对数据文件的访问方式，它们是顺序访问方式__________和二进制访问方式。 答案 随机访问方式

9.已知窗体 Form1 的 CurrentX = 1000，执行了命令 PSet Step(200, 200) 后，CurrentX 的值为_____________ 。 答案 1200

4

一、选择题

1.对象可以识别和响应的某些行为称为_______。答案 D A.属性 B.方法 C.函数 D.事件 2.下列控件中可自动设置滚动条是__________。

A.复选框 B.框架 C.文本框 D.标签框 答案 C

3.为了使标签覆盖背景，应把BackStyle属性设置为______ 。 A.0 B.1 C.True D.False 答案 B

4.下列关于\控体\属性的说法正确的是（ ）

A.单击窗体中的某控件，在属性窗口中的属性列表框中找到所要设置的属性，即可设置其属性值。 B.所有对象都具有同样的属性

C.控件的属性只能在设计时设置，不能在运行时修改 D.控件的每一个属性都具有同样的默认值 答案 A

5.从随机文件中读取数据的命令是________。

A.Input B.Print C.Get D.Put 答案 C

6.VB中利用Circle 方法可以画________。

A.点 B.直线

C.直角矩形 D.圆角矩形 答案 A

7.下列_____________组语句可实现将变量x、y互换。 A.x = y : y = x

B.y = y + 2 * x : x = y - 2 * x : y =(y - x) / 2 C.x = x + y : x = x - y : y = x - y

D.y = y + 2x : x = y - 2x : y =(y - x) / 2

答案 B

8.在任意形式的 Resume 或 On Error 语句之后以及在错误处理子程序内的 Exit Sub、Exit Function、或 Exit Property 语句之后，将 Err 对象的属性重新设置为_________ 。

A.零 B.长度为零的字符串 (\

C.零或长度为零的字符串 (\答案 C

9.若变量n已赋值，下面数组定义正确的是_______ 。

A.Dim Arr( n ) B.Dim Arr( 2n ) C.Dim Arr( 15 ) D.Dim Arr( 2 + n ) 答案 c

10.下面数组声明语句错误的是__________。

A.Dim a%(-5 to -3) B.Dim a%(-1 to 2,3) C.Dim n%,a%(n) D.Dim a(-1 to 0) as Integer 答案 C

11.在子过程定义中用_________关键字表示传址的形参。 A.Var B.ByRef C.ByVal D.ByAdd 答案 B

12.触发滚动条Scroll事件的操作是：__________。

A.单击滚动条箭头 B.单击滚动条箭头与滚动块之间的空白区

C.拖曳滑块 D.以上操作均可 答案 D

13.设置复选框或单选按钮标题对齐方式的属性是______ 。 A.Align B.Alignmen C.Sorted D.Value 答案 B

14.当文件指针到达文件尾部时，_______ 函数的值为真。 A.LOF() B.EOF()

C.LOC() D.LEN() 答案 B

15.为了让加载的图片能随图像框控件Image1的大小自动缩放，需要设置Image1的_______ 。

A.Stretch属性设置为True B.Stretch属性设置为False

C.AutoSize属性设置为True D.AutoSize属性设置为False 答案 A

二、填充题

1.若VB的执行程序在 C:\\VB 文件夹内，App.Path 可返回_____________。 答案 C:\\VB

2.标签的 Alignment 属性值设置为 1 的含义是_____________。 答案 右对齐

3.表达式Ucase(Mid(\的值是___________ 。 答案 CDEF

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

Private Sub Command1_Click() Dim i As Integer, j As Integer

Dim a(10, 10) As Integer, s As Integer For i = 1 To 2 For j = 1 To 2

a(i, j) = (i - 1) * 2 + j s = s + a(i, j) Next j Next i Print s End Sub

程序运行后，单击命令按钮，窗体上显示的是_______。 答案 10

6.在Visual Basic中声明静态变量的关键字是_____________。

答案 Static

7.如果窗体上已编辑好菜单，为了能在窗体上使用右键弹出菜单，可在窗体的MouseUp事件中通过其参数Button= ________来判断已经按下了鼠标的右键。 答案 2 8.Visual Basic提供了三种对数据文件的访问方式，它们是顺序访问方式、__________和随机访问方式。 答案 二进制访问方式

9.已知窗体Form1 的 CurrentX = 400，执行了命令Line Step(200, 200) - Step (500, 400)后，CurrentX的值为_____________ 。 答案 1100

5

一、选择题

1.一只漂亮的酒杯被摔碎了，则漂亮，酒杯，摔，碎了是__________。答案 D

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

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

2.以下叙述中正确的是_________。答案 A

A.窗体的Name属性指定窗体的名称，用来标识一个窗体 B.窗体的Name属性的值是显示在窗体标题栏中的文本 C.可以在运行期间改变对象的Name属性的值 D.对象的Name属性值可以为空

3.决定窗体有无控制菜单的属性是______ 。答案 A

A.ControlBox B.MinButton C.Enabled D.MaxButton 4.下列各组控件都具有Caption属性的是（ ）答案 C

A.窗体、文本框 B.标签、定时器 C.窗体、标签 D.文本框、定时器 5.设A=\，则表达式Val(Left(A,4)+Mid(A,4,2))的值为______。答案 B

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

?6.在窗体的通用声明处有语句 Dim Arr() As integer ，以下在某事件过程中重定义此数组的一组正确语句是：________ 。答案 A A.ReDim Arr(2,2):ReDim Arr(2,2)

B.ReDim Preserve Arr(2,3): ReDim Preserve Arr(3,3) C.ReDim Arr(2):ReDim Arr(3,3) As Long D.ReDim Arr(2,2):ReDim Arr(3,3) As Double 7.InputBox函数返回值的类型为_______。答案 B

A.数值 B.字符串

C.变体 D.数值或字符串（视输入的数据而定）

8.在使用 InputBox时，必须设置的参数是_____________。答案 B A.缺省 B.提示 C.标题 D.无

9.对于一个命令按钮控件数组Commandl，以下对该数组的说法正确的是_________。

A.控件数组中的所有命令按钮的Caption属性值相同 B.在代码中访问命令按钮时，只需使用名称Command1 C.控件数组中的命令按钮的大小都相同

D.控件数组中的命令按钮共享相同的事件过程 答案 D

10.下面数组声明语句正确的是__________。

A.Dim a[3,3] as Integer B.Dim a(3,3) as Integer

C.Dim a[n,n] as Integer D.Dim a(3)(3) as Integer 答案 B

11.在子过程定义中用_________关键字表示传址的形参。 A.Var B.ByRef C.ByVal D.ByAdd 答案 B

12.使用菜单编辑器设计菜单时,必须输入菜单项的_______ 。 A.快捷键 B.标题 C.索引 D.名称 答案 D

13.设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是________。 A.menu1.Enabled=True B.Munu1.Enabled=False

C.Menu1.Visible=True D.Menu1.Visible=False 答案 B

14.Print #1,str1$ 中Pint是_________。

A.文件的写语句 B.在窗体上显示的

方法

C.子程序名 D.以上均不是 答案 A

15.运行时要在图形框Picture1中显示字符串\，应使用语句_______ 。

A.Picture1.Text=\B.Picture1.Print=\

C.Picture1.Print \答案 C

二、填充题

1.当进入VB集成环境，发现没有显示\工具箱\窗口，应选择___（1）_____菜单的 ____（2）_____ 选项，使\工具箱\窗口显示。 答案 视图，工具箱

2.窗体上放置了若干个文本框和命令按钮，当窗体装入后，要将焦点自动定位到文本框Text1上，则在设计时需要将Text1控件的___（1）___ 属性设置为 ___（2）___。 答案 Tabindex，0

3.写出表示x是5或7的倍数的VB表达式___________ 。 答案 x mod 5=0 or x mod 7 =0 4.下面的程序段计算e的近似值：

n=Val(Text1.Text) t=1

____(1)____ For i = 1 To n t=t*i

e=____(2)____ Next i Print e

答案 e=1，e + 1/t

5.已定义了一个数组a，使用___________函数可表示数组 a 的上界。

答案 Ubound

6.VB程序中有两类过程：用户自定义过程和__________过程。 答案 事件

7.在设计工具栏时，除了要使用工具栏（Toolbar）控件外，为了在工具栏按钮上显示个性化图象，同时还需要使用________ 控件。 答案 ImageList 8.Visual Basic提供了三种对数据文件的访问方式，它们是顺序访问方式__________访问方式和二进制访问方式。 答案 随机

9.用Pset方法在窗体上进行画点操作，则点的大小由_____________属性确定。 答案 DrawWidth

6

一、选择题

1.编译一个工程的目的是__________。答案 C A.将工程的程序翻译成可以看懂的文件 B.将工程的程序重新正确编排

C.将工程的程序生成计算机能够执行的机器代码，使之能够脱离VB继承开发环境独立运行

D.检查工程中有无错误的机器代码，以便工程能够脱离VB继承开发环境独立运行

2.下列事件中窗体能响应的是________。答案 C

A.ActiveFrom B.Drive C.Load D.Change 3.能够将文本框控件隐藏起来的属性是__________。答案 B A.Clear B.Visible C.Hide D.New 4.下列关于事件的叙述中不正确的是（ ）答案 D A.事件是系统预先为对象定义的能被对象认别的动作 B.事件可分为用户事件与系统事件两类

C.VB为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写

D.VB中所有对象的默认事件都是Click

5.变量名的定义规则，下面_______是错误定义的变量名。答案 A A.Mod B.Mark_2 C.Break D.Cmd

6.在VB中若使用一个一维数组的数组名作为用户自定义函数的实参，则传递给形参的是________。答案 A

A.数组第一个元素的地址 B.数组第一个元素的值

C.数组中全部元素的值 D.数组元素的个数 7.执行语句：a =

InputBox(\yesterday\将显示一个输入对话框，在对话框的输入区中显示的信息是_________。答案 C

A.Today B.Tomorrow C.Yesterday D.Day before yesterday

8.Visual Basic提供的On Error Resune next错误陷阱语句表示______________。答案 C

A.当发生错误时，使程序转跳到语句标号为0的程序块。 B.当发生错误时，不使用错误处理程序块。

C.当发生错误时，忽略错误行，继续执行下一语句。 D.当发生错误时，终止本过程执行，继续执行下一过程。

9.若有数组声明：Dim c(3, 4 To 5) As Integer,下面数组元素引用中正确的是 ________ 。答案 B

A.c(1,2) B.c(0,5) C.c(4) D.c(4,4) 10.以下关于数组的说法，不正确的是_________。答案 C A.静态数组在声明时大小必须固定 B.动态数组在声明时大小可以不确定

C.运行时可改变动态数组或静态数组的大小 D.默认情况下数组的下界为0

11.在子过程定义中用_________关键字表示传址的形参。答案 B A.Var B.ByRef C.ByVal D.ByAdd 12.VB提供了_______方法，用来显示弹出菜单。答案 D A.ShowMenu B.ActiveMenu C.OpenMenu D.PopupMenu 13.将数据项\添加到列表框(List1)中成为第一项应使用_________语句。答案 A

A.List1.AddItem \\

C.List1.AddItem 0, \\

14.当文件指针到达文件尾部时，_______ 函数的值为真。答案 B A.LOF() B.EOF() C.LOC() D.LEN()

15.VB坐标系的默认原点在窗体的_______。答案 A

A.左上角 B.右上角 C.左下角 D.右下角 二、填充题

2.在程序代码Label1.Caption = \中，表示对象的是 _____（1）______，表示属性的是 _____（2）______。 答案 Label1,Caption

3.写出表示字符变量c是字母字符(大小写不区分)的VB表达式： 答案 Ucase(c)>=\

4.在窗体上画一个命令按钮，名称为Commandl，单击命令按钮时，执行如下事件过程：

Private Sub Command1_Click() a$ = \ b$ = Right(a$, 8) c$ = Mid(a$, 1, 8)

MsgBox a$, , b$, c$, 1 End Sub

则在弹出的信息框的标题栏中显示的信息是______ 答案 hardware

5.数组a中有6个元素，统计前一个元素小于后一个元素出现的次数，结果存放在变量n中。 Dim a()

a = Array(2, 5, 4, 8, 12, 3) n=0

For i=0 To 4

If a(i)_____(1)_____ Then n=____(2)____ Next i Print n

答案 < a(i+1),n + 1

7.当用户单击鼠标右键时，MouseDown、MouseUp和MouseMove事件过程中的Button参数值为 _________。

答案 vbRightButton@@2

8. 为了使文件列表框File1和目录列表框Dir1之间能产生同步效果,必须在______________事件过程中加入语句File1.path = Dir1.path 。 答案 Dir1_Change

9. 为了使一个Picture控件能自动根据装入的图片调整大小，应设置该控件的__________属性为True。 答案 AutoSize

7

一、选择题

1.Visual Basic程序设计的完整的步骤是__________。

A.可视性程序设计 B.代码程序设计

C.可视性程序设计和代码程序设计 D.界面设计 答案 C

2.以下能够触发文本框 Change 事件的操作是___________。 A.文本框失去焦点 B.文本框获得焦点

C.设置文本框的焦点 D.改变文本框的内容 答案 D

3.下列事件中命令按钮能响应的是_________。

A.DblClick B.Click C.Load D.Scroll 答案 B

4.要在窗体添加一\控件\，下列说法正确的是（ ） A.单击工具箱中的控件，将指针移到窗体上，双击鼠标 B.双击工具箱中的控体，即在窗体中央出现该控件 C.单击工具箱中的控件，将指针移到窗体上，再单击 D.用鼠标左键拖动工具箱中的某控件到窗体中适当位置 答案 B

5.决定一个窗体有无控制菜单的属性是______。

A.MinButtom B.Caption C.MaxButton D.ControlBox 答案 D

6.设窗体上有一个标签（Label1）,若要使该标签的背景透明，应设置其________属性。

A.ForeColor B.BackStyle C.BackColor D.BorderStyle 答案 B

7.下列关于Do While …Loop 和Do…Loop Until循环执行循环体次

数的描述正确的是________。

A.Do While …Loop循环和Do…Loop until循环至少都执行一次 B.Do While …Loop循环和Do…Loop until循环可能都不执行 C.Do While …Loop循环至少执行一次，Do…Loop Until循环可能不执行

D.Do While …Loop循环可能不执行，Do…Loop Until循环至少执行一次 答案 D

8.Visual Basic有三种工作模式，它们分别是_________模式。 A.设计、编译和运行 B.编译、运行和调试

C.设计、运行和调试 D.设计、运行和中断

答案 D

9.若变量n已赋值，下面数组定义正确的是_______ 。

A.Dim Arr( n ) B.Dim Arr( 2n ) C.Dim Arr( 15 ) D.Dim Arr( 2 + n ) 答案 C

10.下列叙述中正确的是_____________。

A.数组是用户自定义的数据类型 B.数组元素在内存中的存放形式是连续的

C.数组在使用时可以采用隐式声明 D.动态数组再声明时原有数据必定丢失 答案 B

11.在子过程定义中用_________关键字表示传址的形参。 A.Var B.ByRef C.ByVal D.ByAdd 答案 B

12.将数据项\加到组合框Combo1中成为第一项的语句是_______ 。

A.Combo1.AddItem \B.Combo1.AddItem \C.Combo1.AddItem text,\

D.Combo1.AddItem \答案 A

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

A.Value B.Fontcolor C.Backcolor D.Font 答案 C

14.Print #1,str1$ 中Pint是_________。

A.文件的写语句 B.在窗体上显示的方法

C.子程序名 D.以上均不是 答案 A

15.执行命令 Circle（600，600），500，，，，3 将绘制_______。 A.圆 B.圆弧 C.椭圆 D.扇形 答案 C

二、填充题

2.当焦点进入文本框Text1时，要自动选定文本框第3到第8个位置上的6字符，则需要通过代码Text1.SelStart = 2 和 Text1.SelLength =______ 来实现。 答案 6

3.表达式Len(\程序设计\的值是_____________。 答案 6

5.下面程序段实现的是：将二维数组每一列的元素之和输出。请在空白处填入正确的内容。

Dim a%(1 To 5, 1 To 5),sum% ……

For k1 = 1 To 5 ____(1)____ For k2 = 1 To 5

sum = ____(2)____ Next

Print sum

Next

答案 sum = 0，sum+a(k2,k1)

6.Visual Basic 中有三种类型的模块，它们分别是：类模块、标准模块和________。 答案 窗体模块

7.当源对象被拖动到目标对象上方时，在目标对象上将引发_______事件，释放时又会引发 ________ 事件。 答案 DragOver，DragDrop

8.__________函数可返回某文件的字节数。 答案 LOF

9.当PictureBox(图形框)大于所设置的图片时，______________属性的值为True，图形框所发生的作用与Image(图像框)当Stretch属性值为False时相同。 答案 autosize

8

一、选择题

1.如果在立即窗口中执行以下操作： a = 8 (是回车键，下同) b = 9

Print a > b

则输出结果是_________。

A.-1 B.0 C.False D.True 答案 C

2.为了使标签覆盖背景，应把标签的__________属性设置为1 。 A.BackStyle B.BackColor C.BorderStyle D.Appearance 答案 A

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

A.Text B.Name

C.Caption D.BackStyle 答案 C

4.下列（ ）属性是每个控件都有的。

A.Name B.Caption C.Font D.Interval 答案 A

5.改变驱动器列表框的Drive属性值将激活_______ 事件。 A.Change B.Scroll C.KeyDown D.KeyUp 答案 A

?6.要使一个命令按钮成为图形命令按钮，则应设置其哪一属性值______。

A.Picture B.Style

C.DownPicture D.DisabledPicture 答案 B

7.循环语句For i =1 to 10 Step 1.5的执行次数是_______。 A.5 B.7

C.8 D.10 答案 B

8.执行语句 receive = MsgBox(\后，所产生的信息框的标题是______ 。

A.BBBB B.空 C.AAAA D.出错，不能产生信息框 答案 A

9.对于一个命令按钮控件数组Commandl，以下对该数组的说法正确的是_________。

A.控件数组中的所有命令按钮的Caption属性值相同 B.在代码中访问命令按钮时，只需使用名称Command1

C.控件数组中的命令按钮的大小都相同 D.控件数组中的命令按钮共享相同的事件过程 答案 D

10.数组声明语句Dim a(4,-1 To 2, 3)中的数组a包含了_________个数组元素。

A.80 B.11 C.120 D.60 答案 A

11.在子过程定义中用_________关键字表示传址的形参。 A.Var B.ByRef C.ByVal D.ByAdd 答案 B

12.要使Timer控件的Timer()事件有效运行，必须使其_______。 A.Enabled为True或Interval为非零 B.Enabled为True且Interval为非零

C.Enabled为True或Interval为零 D.Enabled为True且Interval为零 答案 B

13.如果 ComboBox 的下拉部分包含5行，并且最顶上的项为突出显示，则在按动向下方向键_________次之前不发生Scroll 事件。 A.1 B.4

C.5 D.6 答案 D

14.当文件指针到达文件尾部时，_______ 函数的值为真。 A.LOF() B.EOF() C.LOC() D.LEN() 答案 B

15.为了让加载的图片能随图像框控件Image1的大小自动缩放，需要设置Image1的_______ 。

A.Stretch属性设置为True B.Stretch属性设置为False

C.AutoSize属性设置为True D.AutoSize属性设置为False 答案 A

二、填充题

1.下面事件过程是当窗体单击时，在图形框内输出如图所示的图形，在空白处填入正确的内容。 Private Sub Form_Click()

Picture1.Scale (-10, 10)-(10, -10)

Picture1._____(1)_____ = 5 ' 设置填充样式

____(2)_____ (0, 0), 4, , -3.14 / 2, -3 * 3.14 / 2 End Sub

答案 FillStyle，Picture1 . Circle

2.当焦点进入文本框Text1时，要自动选定文本框开始的5个字符，则需要通过代码 Text1.SelStart = ______ 和 Text1.SelLength = 5来实现。 答案 0

3.写出产生一个\～\范围内的大写字符VB表达式： 答案 Chr(int(Rnd*10+68))

4.Print \语句中的 st 将从第_____________列开始打印。 答案 3

5.语句 a = Array(10, 20, 30): Print a(2) 执行结果在窗体上显示___________。 答案 30

7.为了改变计时器控件的时间间隔，应该修改该控件的___________ 属性。 答案 interval

8.要覆盖一个已存在的顺序文件中原有的数据，在Open 语句中以______________模式打开。 答案 output

9.在窗体Form1上用命令Line (100, 200)-(600, 900), , BF绘制了矩形后，CurrentX的值为_____________ 。 答案 600

本文来源：https://www.bwwdw.com/article/19ep.html