VB试题库精简版

VB试题库 一、选择题

1．能被对象所识别的动作与对象可执行的活动分别称为对象的________。 A．方法、事件 B．事件、方法 C．事件、属性 D．过程、方法 2. 在过程中可以用________语句定义变量。

A．Dim、Private B．Dim、Static C．Dim、Public D．Dim、Static、Private 3．用窗体的________属性来设置窗体的标题。 A．style

B．Text

C．Caption

D．Name

4．若在应用程序中用“Private Sub Sub1(X As Integer，Y As Single)”定义了子程序Sub1，调用程序中的变量I、J均为Integer型，则正确调用子程序Sub1的Call语句是________。 ①Call Sub1(I，I) ③Call Sub1(3.14，234) A．①③

②Call Sub1(3.1415，I) ④Call Sub1(\，\C．①②③ D．无

B．③④

5．下面表达式的值为True的是________。

A．Mid(\，1，12)=Right(\，12) B．\

C．Int(134.69)>=Cint(134.69)

D．78.9／32.77<=97.5／43.97 And –45.4>-4.98 6．以下有关对象属性的说法中正确的是________。 A．对象所有的属性都罗列在属性窗口列表中 B．不同对象不可能有同名属性 C．不同对象的同名属性取值一定相同

D．对象的某些属性既可在属性窗口中设置，也可通过程序代码设置或改变

ex?sin3x7．代数表达式lnx?y对应的Visual Basic表达式是________。

A．Log(Abs((Exp(3.14159)+Sin(x)^3)／(x+Y))) B．Ln(Abs((Exp(3.14159)+Sin(x)^3)／(X+Y))) C．Log(Abs(Exp(3.14159)+Sin(x)^3)／(X+Y)) D．Log|(Exp(3.14159)+Sin(x)^3)／x+y|

8． VB集成开发环境有三种工作状态，不属于三种工作状态之一的是________。

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

9．若在一个应用程序窗体上，依次创建了CommandButton、TextBox、Label等控件，则运行该程序显示窗体时，________会首先获得焦点。

A．窗体 B．CommandButton C．Label ① Public A(5) As Integer ③ Public St As String*10 A．2 B．3 ________中安排适当的单选按钮，即可实现。

A．框架控件（Frame）或图像控件（Image） B．组合框（ComboBox）或图像控件（Image）

C．组合框（ComboBox）或图片框控件（PictureBox） D．框架控件（Frame）或图片框控件（PictureBox） 1

D．TextBox

10．在窗体模块的通用声明处用下面的语句声明变量、数组，正确的语句有________个。

② Public N As Integer ④ Private b() As Integer

D．1

C．4

11．单选按钮（OptionButton）用于一组互斥的选项中。若一个应用程序包含多组互斥条件，可在不同的

12．下面的语句或方法中错误的有________个（其中m和n都为Integer型变量）。 ① Dim Arry(m, n) As Integer ② n=32764+5 ③ Print m=m+n;m+n ④ ChDrive \

A．1 B．2 13．下列说法不正确的是________。

A．VB允许将一个数字字符串赋值给一个数值型的变量 B．VB允许使用未经说明的变量，其类型都是Variant类型 C．Cls方法只清除运行时在窗体或图形框中显示的文本或图形 D．事件过程既可建在窗体模块中，也可建在标准模块中 14．运行程序产生死循环时，________可以终止程序运行。

A．按【Ctrl】+【C】键 C．按【Ctrl】+【Break】键

B．按【Ctrl】+【Z】键 D．单击“停止运行”按钮

C．3

D．4

15．VB集成开发环境可以________。

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

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

16．在VB中最基本的对象是_________，它是应用程序的基石，也是其他控件的容器。 A．文本框 B．命令按钮 Click事件过程名分别为_________。

A．Form_Click()、Command1_Click() B．Frm1_Click()、Command1_Click() C．Form_Click()、Cmd1_Click() 体。

A．不包含任何控件的窗体 C．命名为Frm1的窗体 A．Print 局部变量。

A．Dim

B．Private

C．Public

D．Static

21．下列表达式中，值为True的是________。

A．Ucase(\．14／2＼3<10 Mod 4 C．Mid(\．Not(Sqr(4)-3>=-2) 22．下列_________说法是不正确的。

A．当程序正常结束时，所有没用Close语句关闭的文件都会自动关闭 B．在关闭文件或程序结束之前，可以不用Unlock语句对已锁定的记录解锁 C．可以用不同的文件号同时打开一个随机文件

D．用Output模式打开一个顺序文件，即使不对它进行写操作，原来内容也被清除 23．代数表达式

x?lnxa?by?e?t?sin(x?2)，对应的Visual Basic表达式是__________。

C．窗体 D．标签

17．应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，窗体和命令按钮的

D．Frm1_Click()、Cmd1_Click()

18．多窗体程序由多个窗体组成。在缺省情况下，VB在执行应用程序时，总是把_________指定为启动窗

B．设计时的第一个窗体 D．包含控件最多的窗体

D．RemoveItem

19．使用________方法可将新的列表项添加到一个列表框中。

B．AddItem C．Clear

20．若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用________关键字在该过程中定义

A．Sqr((x+Log(x))／(a+b))+Exp(-t)+Sin((x+y)／2) B．Sqr( x+Log(x))／(a+b))+Exp(-t)+Sin((x+y)／2) 2

C．Sqr((x+Ln(x))／(a+b))+Exp(-t)+Sin(x+y)／2) D．Sqr((x+Log(x))／(a+b))+Exp(-t)+Sin(x+y／2)

24．在程序中可以通过复选框和单选按钮的__________属性值来判断它们的当前状态。 A．Caption B．Value 键和该字母键就可打开该命令菜单。 A．下划线 B．&

C．$

D．@

26．在多窗体程序中，可以在标准模块或某个窗体模块的通用声明处，分别用_______语句定义一个在所有窗体模块都可以引用的变量IntA。 A．Private IntA As Integer B．Public IntA As Integer C．Public IntA As Integer

Public IntA As Integer

Private IntA As Integer Public IntA As Integer

C．Checked

D．Selected

25．在使用菜单编辑器创建菜单时，可在菜单名称中某字母前插入_________符号，那么在运行程序时按【Alt】

D．Private IntA As Integer Private IntA As Integer

27．在应用程序中用“Private Function Fun(x As Integer，y As Single)”定义了函数Fun。调用函数Fun的过程中的变量I、J均定义为Integer型，能正确引用函数Fun的是_______。 ①Fun(I，J) A．①③

②Call Fun(I，3.65) ③Fun(3.14，234) B．②③④ C．①②③

④Fun(\，\D．①②③④

28．若在应用程序的标准模块、窗体模块和过程Sub1的说明部分，分别用“Public G As Integer”、“Private G As Integer”和“Dim G As Integer”语句说明了三个同名变量G。如果在过程Sub1中使用赋值语句“G=3596”，则该语句是给在________说明部分定义的变量G赋值。 A．标准模块 C．窗体模块 A．对象、值、属性 C．对象、属性、值

B．过程Sub1

D．标准模块、窗体模块和过程Sub1 B．对象、方法、属性 D．属性、对象、值 C．.bas

D．.frx

29．有程序代码“Text1．Text=\Basic\，其中的Text1、Text和\Basic\分别代表_________。

30．VB工程文件的扩展名是________。

A．.frm B．.vbp 都将光标定位在文本框Text1上。 A．Text1．Text=\ C．Form1．SetFocus 行时会出错的是________。 A．Inta=4.6

B．B1=#True#

31．窗体上有多个控件，在Form_Activate()事件过程中添加__________语句，就可确保每次运行程序时，

B．Text1．SetFocus D．Text1．Visible=True

32．在程序中分别将变量Inta、B1、St和D定义为整型、布尔型、字符串型和日期型，下列赋值语句在执

C．St=5 ＆ 123.5 D．D=#10／05／01#

33．在窗体Form1中用“Public Sub Fun(x As Integer，Y As Single)”定义过程Fun，在窗体Form2中定义了变量i为Integer，J为Single，若要在Form2的某事件过程中调用Form1中的Fun过程，则下列语句中正确的语句有_________个。 ①Call Fun(i，j) ③Form1．Fun (i)，j

A．1

②Call Form1．Fun(i，i) ④Form1．Fun i + 1，(j)

D．4

B．2 C．3

34．以下有关变量作用域的说法中，错误的是__________。 A．只有在标准模块中用Public语句说明的变量才是全局变量 B．在过程中不能使用Public语句说明全局变量

C．在标准模块的通用声明处可用Private语句说明模块级变量 D．在窗体的通用声明处可用Private语句说明窗体级变量 3

35．语句Print \输出的结果是_________。 A．\B．出现错误信息

A．过程框 B．属性窗口

C．5*20

D．100

36．在代码窗口中，当从对象列表框中选定了某一对象后，在________中会列出适用该对象的事件。

C．事件列表框 D．工具栏

37．若磁盘文件C:\\Data1.Dat不存在，下列打开文件语句中，会产生错误的是________。

A．Open \ B．Open\ C．Open \ D．Open \38．不能作为容器使用的对象是__________。

A．图像框

B．框架

C．图片框

D．窗体

39．以下有关数组的说明中，错误的是__________。

A．根据数组说明的方式，可将数组分为动态数组和静态数组 B．在过程中，不能用Private语句定义数组

C．利用ReDim语句重新定维时，不得改变已经说明过的数组的数据类型 D．数组重新定维后，原有的数组元素内容将不予保留

40．窗体的Name属性为Frm1，在窗体模块通用声明处和过程Sub1中分别用“Public K As Integer”和“Dim K As Integer”声明了两个同名变量K，则在过程Sub1中要访问窗体模块变量K，可采用_________。 A．Frm1．K B．Form．K

C．Form1．K

D．K

41．名为Sort的Sub子过程的形式参数为一数组，以下的定义语句中正确的是________。 A．Private Sub Sort(A() As Integer) B．Private Sub Sort(A(10) As Integer) C．Private Sub Sort(ByVal A() As Integer) D．Private Sub Sort(A( ，) As Integer)

42．可以在_________中，使用语句Public PubStr As String*20定义一个定长字符串。 A．窗体模块

B．标准模块

C．类模块

D．三者均可

43．以下有关由多个窗体和标准模块组成的应用程序设计方法的叙述中，错误的是_______。 A．在缺省情况下，设计时的第一个窗体被指定为启动窗体 B．通过人为设置，可指定任一窗体为启动窗体

C．通过人为设置，可指定标准模块中的Main()过程为启动过程 D．通过人为设置，可指定窗体模块中的Main()过程为启动过程

44．在过程中有语句For I=N1 To N2 Step N3，在该循环体内有下列四条语句，其中_______会影响循环执行的次数。

①N1=N1+I ②N2=N2+N3 ③I=I+N3 ④N3=2*N3 A．①②

B．①②③

C．③

D．①②③④

45．假设窗体上已有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先要执行的操作是________。

A．单击窗体上没有控件的地方 C．双击任一个控件

B．单击任一个控件

D．双击窗体上没有控件的地方

46．在以下有关对象属性的叙述中，错误的是_________。 A．一个对象的属性可分为外观、行为等若干类 B．不同属性可能具有不同的数据类型

C．一个对象的所有属性都可在属性窗口的列表中进行设置 D．属性窗口中的属性列表既可按字母排列也可按类别排列

4

47．数学算式

12x?5y?d3?m2e?xsinx的VB算术表达式是_________。

A．(12*X+5*Y-Sqr(Abs(d^3-m^2)))／Exp(-x)／Sin(x) B．(12*x+5*Y-Sqr(Abs(d^3-m^2)))／Exp(-x)*Sin(x) C．(12*X+5*Y-Sqr(Abs(d^3-m^2))／Exp(-x)／Sin(x) D．(12*X+5*Y-Sqr(Abs(d^3-m^2)))／e^(-x)／Sin(x) 48．表示“X>Y>Z”，正确的VB逻辑表达式是_________。 A．X>Y And Y>Z C．X>Y Or Y>Z

B．X>Y>Z D．X>Y And >Z

49．窗体上有一个文本框控件Text1，假设已存在三个整型变量a、b和c，且变量a的值为5，变量b的值为7，变量c的值为12。以下的______语句可以使文本框内显示的内容为：5+ 7=12 A．Text1．Text=a+b=c B．Text1．Text=\

C．Text1=a & \D．Text1=\

50．调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时，以下不是按值传递的语句是_________。

A．Call Convert((X)) C．Convert (X)

B．Call Convert(X*1) D．Convert X

51．程序中的不同过程之间，不能通过________进行数据传递。

①全局变量 ②窗体或模块级变量 ③形参与实参结合 ④静态变量 A．①②④ B．①②③ C．②④ 52．下列关于数组的叙述中，错误的是__________。 A．在过程中可以用Dim语句对形参数组进行声明 B．数组是同类变量的一个有序的集合 C．数组元素可以是控件

D．数组在使用之前，必须先用数组说明语句进行说明

53．要向已有数据的c:\\test\\test．txt文件添加数据，正确的文件打开命令是________。 A．Open \ B．Open \ C．Open \ D．Open \54．以下________情况不会进入中断状态。 A．在程序运行中，按【Ctrl】+【C】键 B．程序运行中，发生了运行错误

C．用户在程序中设置了断点，当程序运行到断点时 D．采用单步调试方式，每运行一个可执行代码行后

55．使用_________方法，可以将列表框List1中的所有项删除掉。 A．Listl.Text=\ Const N As Integer=4 Dim L As Integer ①Dim X(L) AS Integer ②Dim A(K) As Integer Const K As Integer=3 ③Dim B(N) As Integer 5

B．AddItem

C．RemoveItem

D．Clear

56．某过程的说明语句中，正确的数组说明语句是__________。

D．④

④Dim Y(2000 to 2008)As Integer

A．①②④ B．①③④ C．③④ _________一定可以将Hello显示在当前窗体上。 A．Form.Print \ C．Debug.Print \ 58．执行以下语句后，a的值是__________。 Dim a As Integer a=l

Do Until a=100

a=a+2 Loop A．99

B．100

C．溢出 D．101

B．If Option1.Value=True Then

59．以下语句中，不能正确执行的是_________。

A．If Option1.Value Then

C．Check1.Value=0 D．Check1.Value=True 60．以下使用方法的代码中，正确的是________。 A．Label1.SetFocus C．Text1.SetFocus

B．Form1.Clear D．Combo1.Cls B．Me.Print \D．Form2.Print \

D．②③

57．在多窗体的应用程序中，当前窗体模块的Form_Click事件过程中包含如下语句，单击该窗体，其中

61．在程序中将变量Inta、Bl、St和D分别定义为Integer型、Boolean型、String型和Date型，下列赋值语句中，正确的是_________。 A．Inta=\ C．St=5+\ A．List1．Clear C．Combo1．Cls

B．D=#10／05／01#

D．B1=#True#

62．以下使用方法的语句中，正确的是_________。

B．Form1．C1ear D．Picture1．C1ear

63．以下所列的7个控件中，具有Caption属性的有_________个。

PictureBox(图片框)、Frame(框架)、OptionButton(单选按钮)、ListBox(列表框)、TextBox(文本框)、Form(窗体)、DriveListBox(驱动器列表框) A．3 B．4

C．2 D．5

64．以下有关对象属性的说法中错误的是________。 A．所有的对象都具有Name(名称)属性

B．只能在执行时设置或改变的属性为执行时属性

C．对象的某些属性只能在设计时设定，不能使用代码改变 D．Enabled属性值设为False的控件对象在窗体上将不可见

65．在窗体的通用声明处有语句“Dim A() As Single”，以下在某事件过程中重定义此数组的一组正确语句是_________。

A．ReDim A(3，3) B．ReDim A(3，3)

ReDim A(4，4) As Integer ReDim Preserve A(4, 4) C．ReDim A(3) D．ReDim A(3, 3)

ReDim A(3，3) As Integer ReDim Preserve A(3, 4) 66．下面有关数组的说法中，正确的是。 A．数组的维下界不可以是负数

B．模块通用声明处有Option Base 1，则模块中数组定义语句Dim A(0 To 5)会与之冲突 6

C．模块通用声明处有Option Base 1，模块中有Dim A(0 T0 5)，则A数组第一维维下界为0 D．模块通用声明处有Option Base 1，模块中有Dim A(0 To 5)，则A数组第一维维下界为1 67．在文本框Text1中输入数字12，在文本框Text2中输入数字34，执行以下语句，只有_______可使文本框Text3中显示46。

A．Text3．Text=Text1．Text ＆ Text2．Text B．Text3．Text=Val(Text1．Text)+Val(Text2．Text) C．Text3．Text=Text1．Text+Text2．Text

D．Text3．Text=Val(Text1．Text) & Val(Text2．Text)

68．在窗体模块的通用声明处有如下语句，会产生错误的语句是__________。 ①Const A As Integer=25 ③ReDim B(3)As Integer A．①② B．①③

②Public St As String*8 ④Dim Const X As Integer=10

C．①②③ D．②③④

②Private Sub Test(Sarray() As String*5)

69．下列定义Sub过程的语句中，正确的语句是_________。 ①Private Sub Test(St As String*8) A．①② B．①④ A．圆 A．Dim

③Private Sub Test(Sarray() As String) ④Private Sub Test(St As String)

C．②③④ D．①②③④

70．VB中利用Circle方法不可以画__________。

B．直线 C．弧 D．椭圆

C．Private

D．Static D．％

71．在窗体模块的通用声明段中声明变量时，不能使用________关键字。

B．Public

72．日期类型(Date)在程序中运用时，日期类型必须用________符号括起来。 A．# 73．有如下程序：

Private Sub Command1_Click() S=Fix(-23.1) E=Int(23.1) Print Sin(E+S) End Sub

运行时输出的结果是_________。

A．-1 B．0 C．1 D．23 74．有如下程序：

Private Sub Command1_Click()

X=10

Print IIf(X>5，1，5)

B．@

C．$

End Sub

运行后的输出结果是________。

A．5 B．1 C．2 75．VB表达式Sqr(a+b)^ 3*2中优先进行运算的是________。 A．Sqr函数 B．+

C．^

D．*

76．在VB中可以作为容器的是 。

A．Form、TextBox、PictureBox

B．Form、PictureBox、Frame

C．Form、TextBoX、Label D．PictureBox、TextBox、ListBox 77．VB中除窗体能显示图片外，下面列出的控件中可以显示图片的控件有 。

①PictureBox ②Image 7

③TextBox

D．6

④CommandButton A．①②③④

⑤OptionButton ⑥Label

B．①②⑤⑥ C．①②④⑤ D．①②④⑥

78．针对语句If I=1 Then J=1，下列说法正确的是________。

A．I=1和J=1均为赋值语句 B．I=1和J=1均为关系表达式 C．I=1为关系表达式，J=1为赋值语句 D．I=1为赋值语句，J=1为关系表达式

79．在某过程中已说明变量a为Integer类型、变量s为String类型，过程中的以下四组语句中，不能正常执行的是 ________。

A．s=2*a+1

D．a=2:s=16400*a

A．32768,1.34D2, \B．3276, 123.56, 1.2E-2, #True# C．&HABCE, 02-03-2002, False, D-3 D．ABCDE, #02-02-2002#, E-2

81．下面有关数组处理的叙述中，错误的是________。

①在过程中用ReDim语句定义的动态数组，其下标的上下界可为赋了值的变量。 ②在过程中，可以使用Dim、Private和Static语句定义数组。 ③用ReDim语句重新定义动态数组时，不得改变该数组的数据类型。 ④可用Public语句在窗体模块的通用说明处定义一个全局数组。 A．①②③④ B．①③④

C．①②③

D．②④

82．第一次显示某窗体时，将引发一系列事件，事件发生的正确顺序是________。

A．Load - Initialize - Activate

B．Initialize - Load - Activate D．Initialize - Activate - Load

C．Load - Activate- Initialize

B．s=\

C．s=2*a>3

80．下面所列四组数据中，全部是正确的VB常数的是________。

83．定义两个过程Private Sub1(St() As String)和Private Sub2(Ch() As String*6)，在调用过程中用Dim S(3) As String*6,A(3) As String定义了两个字符串数组。下面调用语句中正确的有________。

①Call Sub1(S) ②Call Sub1(A) ③Call Sub2(A) ④Call Sub2(S) A．①②

B．①③

C．②③

D．②④

84．运行下面程序，单击命令按钮Command1，则立即窗口上显示的结果是________。

Private Sub Command1_Click()

Dim A As Integer, B As Boolean, C As Integer, D As Integer A=20/3 : B=True : C=B : D=A+C Debug. Print A, D, A=A + C

End Sub

A．7 6 False B．6.6 5.6 False

85．要设置窗体上各控件的属性，可在________中进行。

A．窗体布局窗口 C．属性窗口

B．工程资源管理器窗口 D．窗体窗口

C．7 6 A=6 D．7 8 A=8

86．在程序代码中，将图片文件“abc.jpg”装入图片框Picture1的语句是________。

A． Picture1.Picture = \B． Picture1.image = \

C． Picture1.Picture = LoadPicture(\8

D． LoadPicture(\

87．若编写的过程要被多个窗体及其对象调用，应将这些过程放在哪一类模块中？

A. 窗体模块 B. 标准模块 A．Interva1 B．Enabled A．Show

B．Unload

C. 工程

D. 类模块

D．Text D．Hide

D. Cancled

88．要设置定时器控件的定时时间，需设置的属性是_________。

C．Value

89．若要将窗体从内存中卸载，其实现的方法是_________。

C．Load C. Default Ｃ．TextBox

90．在程序运行过程中，要想使可操作的按钮变成看得见但不可操作，则应设置为False的属性是_________。

A. Visable B. Enabled 91．无法响应Click事件的控件是________。 Ａ．Label

Ｂ．Timer

Ｄ．DriveListBox D．Int(Rnd*6+1)

92．下列表达式能产生1～6自然数的是__________。

A．Int(Rnd(6)+1) B．Int(Rnd*6) C．Int(Rnd*7) 93．对于某对象的SetFocus和GotFocus描述中，正确的是________。 Ａ．SetFocus是方法，GotFocus事件

Ｂ．SetFocus是事件，GotFocus是事件

Ｃ．SetFocus是方法，GotFocus是方法 Ｄ．SetFocus是事件，GotFocus是方法

94．设a为Integer型变量，s为Single变量，把3.75赋值给s后，再执行下列某一语句，则在文本框中显示的结果与执行语句a＝s:Text1=a的结果相同的有________个。

①a=Int(s):Text1=a ② a=Fix(s):Text1=a

③a=CInt(s):Text1=a ④ a=Format(s, \Ａ．１

Ｂ．２

Ｃ．３ Ｄ．４

95．下列语句运行时系统给出错误提示的是________。

Ａ．Print -32000-769 Ｂ．Print \Ｃ．Print \ Ｄ．Print 3=2=4 96．描述Ｘ、Ｙ中有一个小于Ｚ的逻辑表达式是________。

Ａ．X

Ａ．控件数组由一组具有共同名称和相同类型的控件组成 Ｂ．控件数组中的每一个控件共享同样的事件过程

Ｃ．控件数组中的每个元素的下标由控件的Index属性指定 Ｄ．同一控件数组中的元素只能有相同的属性设置值 98．以下有关数组作为形参的说明中，错误的是________。

A．调用过程时，只需把要传递的数组名填入实参表 B．使用动态数组时，可用ReDim语句改变形参数组的维界 C．在过程中也可用Dim语句对形参数组进行说明 Ｄ．形参数组只能按地址传递

99．下列能够正确表示条件“x≤Y

B．X<=Y And Y

C．X≤Y or Y

100．以下有关过程的说法中，错误的是___________。

Ａ．在Sub或Function过程中不能再定义其他Sub或Function过程

Ｂ．在调用过程时，与使用ByRef说明的形参对应的实参只能按地址传递方式结合 Ｃ．递归过程既可以是递归Function过程，也可以是递归Sub过程 Ｄ．在调用过程时，形参为数组的参数对应的实参只能是数组 9

101．数学式[(7.5x?e?3)x?1.5]x?1对应的VB表达式是________。

B．((7.5 * x + Exp(-3)) * x-1.5) * x-1

D．((7.5*x+Exp-3)*x-1.5)*x-1

D. \

A．((7.5x + E(-3)) * x-1.5) * x-1 C．((7.5 x + Exp(-3)) x-1.5) * x-1

A.10+6=10+6 B. 10+6=16

102．方法Print \输出的结果是_________。

C. 16=10+6

103．若要将窗体隐藏，其实现的方法是________。

A．Show B．Unload C．Load D．Hide

104．VB6.0表达式Cos(0)+Abs(1)+Int(rnd(1))的值是__________。

A. 2 B.–1 C. 0

D. 1

105．在下图中，要在窗体Form1标题栏出现“小程序”字样，窗体属性应设置为________。

A．Form1．Name=\小程序\

B．Form1．Visible=\小程序\

D．Form1．Show=\小程序\

C．Form1．Caption=\小程序\

106．在VB中，下列关于控件的属性或方法中，搭配错误的有________个。

①Timer1.Interval ②List1.Cls ③Text1.Print ④List1.RemoveItem ⑤VScroll1.Value ⑥Picture1.Print A．0 B．1 A．List1.ListCount C．Dir1.Path

C．2

D．3

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

B．Text1.Index D．Label1.Visible

108．下面________语句，可以将列表框List1中的当前选定的列表项的值替换成\。 A．List1.AddItem \ B．List1.Text=\

C．List1.List(List1.ListIndex)=\ D．前三项均可 109．函数CInt(-3.5),Int(-3.5),Fix(-3.5)的值分别是________。

A．-3,-4 , -3 B．-4, -4, -3 A．Text1 = a/b*a

C．Text1 = \ A．0.001*Int(x+0.005)

C．0.001*Int(1000*x+5) A．在窗体模块中不可以定义全局数组

B．可以使用Erase语句释放所有数组所占据的存储空间

C．语句Dim X(3.6+2) As Integer定义了一个维上界是6的一维整型数组 D．形参数组的类型可以是定长字符串类型 113．以下关于事件的说法中，正确的是________。 A．事件是由系统预先定义好的，能够被对象识别的动作 B．事件过程都是无参(没有形式参数)的过程 C．在事件过程中可以声明全局变量

D．不同类型的对象所能识别的事件一定不相同

114．窗体上放置有名为Drive1与Dir1的驱动器列表框与文件夹列表框，需要在选定驱动器列表框中的列10

C．-3,-4 , -4 D．-4, -3, -3 B．Text1 = a*a/b D．Text1 = a & b & a B．0.001*(1000*x+0.5) D．0.001*Int(1000*(x+0.0005))

110．设整型变量a、b 的当前取值分别为200与20，以下赋值语句中不能正确执行的是_________。

111．对正实数X 的第四位小数四舍五入的VB表达式是________。

112．下列有关数组的说法中，不正确的是________。

A．-36 B．1

C．-1 D．-72

176．如果x=4，那么以下运算结果为False的表达式是_________。 A．（x<=4） And (x>=6) C．（x >=4） Xor (x>=6) A．5

y=2001

n=y \\ 4 + y \\ 400 – y \\ 100 A．495 A．Text

B．505 B．Locked

C．500

D．485

D．MultiLine

179．要使程序运行时文本框能输入多行数据应设置的属性是。

C．Hide

180．可用Print方法在窗体中显示文本信息，若想清除这些信息，可用的方法是_________。

A. Cls B. Clear

C. RemoveItem D. Delete

B．单击鼠标右键 D．双击任何一个对象

D．％

181．_______操作可以打开属性窗口。 A．按下F4键 C．双击代码窗口 A．#

B．（x >=4） Or (x>=6) D．Not (x<>4)

C．500

D．5000

177．如果要求设置定时器时间间隔为0.5秒，那么它的Interval属性应该等于_________。

B．50

178．以下程序段执行后，整型变量n 的值为。

182．日期类型(Date)在程序中运用时，日期类型必须用________符号括起来。

B．@

C．$

183．下列窗体名中哪个是合法的? A．_aform B．3frm A．Visual

C．f_1 D．frm 4

C．Default D．Cancel

C．1,234.567 D．01,234.57

184．要把一个命令按钮设置成无效，应设置其________属性值。

B．Enabled

185．执行语句“Print Format(1234.567, \”，正确的输出结果是_________。

A．1234.57 186．设有如下语句：

str1 = InputBox(\输入\练习\

从键盘上输入字符串\示例\后，str1的值是________。 A．\输入\

B．\

C．\练习\．\示例\

187．以下有关文件的说法中，正确的是_________。 A．打开随机文件时，参数Len的值可任意设置

B．若以Output、Append、Random或Binary方式打开一个不存在的文件，系统会出错 C．在Input方式下，不能使用不同文件号同时打开同一个文件

D．在一个过程中，一个文件号有可能被用于打开不同的文件

（在 Binary、Input 和 Random方式下可以用不同的文件号打开同一文件，而不必先将该文件关闭。在Append 和Output 方式下，如果要用不同的文件号打开同一文件，则必须在打开文件之前先关闭该文件。） 188．已知XB，则下列表达式中，结果为True的是。

A．Sgn(X-Y)+Sgn(A-B)=-1 C．Sgn(Y-X)+Sgn(A-B)=2

B．Sgn(X-Y)+Sgn(A-B)=-2 D．Sgn(Y-X)+Sgn(A-B)=0

B．1,234.57

189．VB6.0规定，不同类型的数据占用存储空间的长度是不同的。下列各组数据类型中，满足占用存储空间从小到大顺序排列的是_________。

A. Byte, Integer, Long, Double B. Byte, Integer, Double, Boolean

C. Boolean, Byte, Integer, Double

D. Boolean, Byte, Integer, Long

190．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 16

C. x= int(rnd*m)+n A．事件过程

D. x = int(rnd*(n-m)+m

C．Sub过程

D．函数过程

191．不能脱离控件(包括窗体) 而独立存在的过程是_________。

B．通用过程

192．Sub过程与Function过程最根本的区别是_________。

A．Sub过程可以用Call语句或直接使用过程名调用，而Function过程不可以 B．Function过程可以有形参，Sub过程不可以

C．Sub过程不能用过程名返回值，而Function过程能通过过程名返回值 D．两种过程参数的传递方式不同

193．设A=10，B=20,则可以实现交换变量A,B值的程序是_________。

A.A=10: B=20 B.A=10: B=20 C.A=10: B=20 D.A=10: B=20 B=A C=A A=B C=A

A=B B=C B=A A=B

A=B

B=C

194．在窗体模块的通用声明处，可以使用________语句说明数组。

①Public A(10) As Integer ②Dim A(10) As Integer ③Private A(10) As Integer ④Static A(10) As Integer A．①②

B．②③

C．③④

D．①④

195．使用Public Const语句声明一个全局的符号常量时，该语句应在________。

A．事件过程中

B．窗体模块的通用声明段中

D．通用过程中 B．Print 5 + 9 =15 D．Print \B．面向过程 D．面向对象

C．标准模块的通用声明段中

196．下列语句中不能正确执行的是_________。 A．Print 32758 + 10 C．Print \

A．面向机器 C．面向问题

197．VB是一种________的可视化程序设计语言。

198．下面逻辑表达式的值为True的是_________。 A.\ B.\C.\ D. 12>12.1 199．一个窗体名不能包含________。

A．空格和标点符号 B．小写字母 C．数字

Private Sub Command1_Click() C=MsgBox(\学习\，4，\．0\

D．下划线

200．单击如图所示的信息对话框“否(N)”按钮，执行下列程序后，输出结果为________。

Print C End Sub A．7

B．4

C．\学习\D．\C．整型

D．双精度类型

201．VB变量名abc!的类型是________。 A．字符串类型

B．单精度类型

202．复选框的Value属性为1表示________。

A.没有选中该复选框 17

B. 该复选框状态不定

C.该复选框被禁用 Sub Proc1(x As Integer) A．s=Proc1(3)

D. 该复选框被选中

203．假设已通过下列Sub语句声明了Proc1过程。若要调用该过程，可以采用________语句。

B．Proc1 32765 D．Call Proc1(40000)

C．Print Proc1(100) A．工具箱 A．用户 A．Global

204．双击窗体中的对象后，VB将显示的窗口是________。

B．工程窗口 B．程序员

C．代码窗口D．属性窗口

205．Load事件是在窗体被装入工作区时________触发的事件。

C．手工D．自动

C．Static

D．Public

206.声明一个变量为局部变量应该用________。

B．Private

207．下列有关对象的叙述中，正确的是。

A．对象由属性、事件和方法构成

B．对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置 C．对象的事件一定就是由VB预先设置好的人工干预的动作 D．对象的方法是对象响应某个事件后所执行的一段程序代码

208.函数Cint、Int、Fix都返回数值，以下能正确地描述他们返回值的大小关系的是________。

A. Cint(-4.51) = Int(-4.51) < Fix(-4.51) Fix(-4.51)

C. Cint(-4.51)< Fix(-4.51) < Int(-4.51) Cint(-4.51)

209.下面的属性中，用于自动调整图像框中图形大小以适应图像控件的是________。

A．Picture

B．CurentY

C．AutoSize

D．Stretch

210．求圆的内接正多边形的面积公式为nRsin(π/n)Rcos(π/n)，其对应的VB6．0算术表达式是________。其中n为大于2的正整数，R为圆半径，π为圆周率。 A．n*r*sin(3.14159／n)*r*cos(3.14159／n) B．n×R×sinπ／n×R×cosπ／n

C．n×R×sin(4.13159／n)×R×cos(4.13159／n)

D．nRsin(π／n)Rcos(π／n) 211．下列程序

Private Sub Command1_Click() A=InputBox(\请输入\ B=InputBox(\请输入\Print A+B End Sub

运行时输入3和4输出的结果是________。 A．7 B．34

C．3+4

D．出错

212．下面有关数组处理的叙述中，不正确的是________。 ①控件数组可由多个控件组成，这些控件具有相同的名字 ②控件数组中的元素可以是不同类型的控件

③用ReDim语句重新定义动态数组时，不得改变该数组的数据类型 ④可用Public语句在窗体模块的通用说明处定义一个全局数组 A．①②③④

B．②④

C．①②③ D．①③④

213．要使过程调用结束后返回两个结果，下面的过程语句正确的是_________。 18

D. Int(-4.51) < Fix(-4.51) =

B. Int(-4.51)< Cint(-4.51)<

A．Sub Proc1(ByVal n，ByVal m) C．Sub Proc1(n，m)

B．Sub Proc1(n，ByVal m)

D．Sub Proc1((n)，m)

214．以下有关文件的说法中，错误的是________。

A．在Open语句中缺省For子句，则按Random方式打开文件 B．可以用Binary方式打开一个顺序文件

C．在Input方式下，可以使用不同文件号同时打开同一个顺序文件

D．用Binary方式打开一个随机文件，每次读写数据的字节长度取决于随机文件的记录长度 215．默认属性是Text的控件是_________。 A.文本框 B. 标签框

C. 单选框 D. 复选框

C.事件 D.属性

216．VB预先定义好的，对象可以执行的动作称为_________。

A.方法 B.对象 217．以下关于数值常量的说法中，错误的是。 A．八进制数的表示方法是在数字前面加&O B．十六进制数的表示方法是在数字前面加&H

C．在浮点数值中使用D来分隔尾数和指数时，系统将把该数值作为单精度型数处理

D．32768是合法的数值常量

218．若要将窗体加载到内存中，其实现的方法是_________。

A.show B.Unload C.Load D.Hide 219．以下所列的8个控件中，具有Caption属性的有________个。

CheckBox(复选框)、ComboBox(组合框)、HscroliBar(水平滚动条)、DirListBox(文件夹列表框)、Image(图像框)、Frame(框架)、Label(标签)、Line(线条)

A．5

B．4

C．3

D．2

220．VB中除窗体能显示图片外，下面列出的控件中可以显示图片的控件有________。

①PictureBox ②Image ③TextBox ④CommandButton ⑤OptionButton ⑥Label1 A．①②③④

B．①②⑤⑥

C．①②④⑤

D．①②④⑥

221．以下控件对象中，具有Picture属性的是__________。

①PictureBox ②Frame ③OptionButton ④CommandButton ⑤ListBox ⑥CheckBox ⑦Label A．①③④⑥

B．①②⑤⑥⑦

C．①③④⑤⑥

D．①②③④⑤⑥

222．在程序中将变量I、T、S、D分别定义为Integer类型、Boolean类型、String类型和Date类型，下列赋值语句正确的是_________。 A．D = #10/05/05# C．I =\

B．T = #True# D．S = 5 + \

223．以下选项中，不是VB6.0事件名称的是_________。

A.Load B.Click C.KeyPress D.Hscroll1 224．下列事件过程

Private Sub Command1_Click()

MsgBox Str(123 +456)

End Sub

运行时，在输出对话框中显示的提示信息是_________。

A. 123+123 ① vbCrLf A．0 19

B.\C.显示出错信息 D. 579 ② 1#

③ π

④ \

⑤ 1E-5

225．以下所列表示中，不可用作VB合法常量的个数有________个。

B．1

C．2

D．4

226．下列表达式中，运算结果与函数Mid(s，i，i)的返回值相同的是________。

A．Left(s, i) ＆ Right(s, Len(s) - i) C．Left(Right(s, i), Len(s) –i+1) ① 4096 * 2 ^ 3 A．4

B．Left(Right(s, Len(s) –i+ 1), i) D．Left(s, Len(s)-i) ＆ Right(s, i)

③ 6553 * 5 + 0.5 * 6 ④32768+12

D．1

227．以下表达式中，能够被正确计算的表达式有________个。

② CInt(5.6) * 5461 + 2

C．2

B．3

228．计算下面的表达式，其值是________。

CInt(-3.5) * Fix(-3.81) + Int(-4.1) * (5 Mod 3) A．2

B．1

C．-1

D．6

229．下面关于对象作用域的说法中，正确的是________。

A．在窗体模块中定义的全局过程，在整个程序中都可以调用它 B．分配给已打开文件的文件号，仅在打开该文件的过程范围内有效

C．过程运行结束后，过程的静态变量的值仍然保留，所以静态变量作用域是整个模块 D．在标准模块中定义的全局变量的作用域比在窗体模块中定义的全局变量的作用域大 230．下面有关数组的说法中，________是错误的。

A．在模块中由于未使用Option Explicit语句，所以数组不用先定义就可以使用，只不过是Variant类型

B．过程定义中，形参数组可以是定长字符串类型

C．Erase语句的作用是对固定大小数组的值重新初始化或收回分配给动态数组的存储空间 D．定义数组时，数组维界值可以不是整数

231．在下列控件中，不具有Change事件的控件有________个。

① DriveListBox A．0 B．1 232．算术表达式

② DirListBox C．2

③ FileListBox

④ ListBox

D．3

e2?x?5lnx?sin3(2x)sinx?cosx2的VB表达式是________。

A．(e^(2*π*x-5)*log(x)+(sin(2x))^3)/sqr(abs(sin(x)-cos(x^2))) B．(exp(2*3.14159*x-5)*log(x)+(sin(2*x))^3)/sqr(abs(sin(x)-cos(x^2))) C．(exp(2*π*x-5)*ln(x)+(sin(2*x))^3)/sqr(abs(sin(x)-cos(x^2))) D．(e^(2* 3.14159*x-5)*ln(x)+(sin(2*x))^3)/sqr(abs(sin(x)-cos(x^2)))

233．创建一个名为“文件”的菜单项，欲使其可用Alt+F方式访问，则在菜单编辑器的标题文本框中应输入________。

A．文件($F)

?B．文件(&F) C．文件(#F) D．文件(%F)

x?e3234．数学表达式Sin27?x?yA．Sin(27)+Sqr(x+Exp3)/(x+y)

的VB算术表达式为________。

B．Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y) C．Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y) D．Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y) 235．以下说法不正确的是________。

A．使用不带关键字Preserve的ReDim语句可以重新定义数组的维数 B．使用不带关键字Preserve的ReDim语句可以改变数组各维的上、下界 C．使用不带关键字Preserve的ReDim语句可以改变数组的数据类型

D．使用不带关键字Preserve的ReDim语句可以对数组中的所有元素进行初始化 20

a(i) = n Exit For End If Next i

If i > 10 Then a(i) = n For i = 1 To 11 Print a(i); Next i End Sub

21．Private Function fact(n As Integer) As Long

Dim i As Integer, k As Integer fact = 1 k = 2

For i = n To 1 Step -1 fact = fact * k k = k + 2 Next I End Function

Private Sub Command1_Click()

Dim y As Single, n As Integer, temp As Single n = 1 Do

temp = 1 / fact(n)

If temp <= 0．00001 Then Exit Do y = y + temp n = n + 1 Loop

Print \End Sub 22．Option Explicit

Option Base 1

Dim A(4, 5) As Integer Private Sub Command1_Click()

Dim i As Integer, j As Integer, Sum As Integer Randomize For i = 1 To 4 For j = 1 To 5

A(i, j) = Int(Rnd * 10) Text1 = Text1 & Str(A(i, j)) Next j

Text1 = Text1 & vbCrLf Next i End Sub 36

Private Sub Command2_Click()

Dim i As Integer, j As Integer, Sum As Integer For i = 1 To 4 Sum = 0 For j = 1 To 5

Sum = Sum + A(i, j) Next j

Text2 = Text2 + Str(Sum) + vbCrLf Next i End Sub

37

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