1、一、单项选择题1、与老式的程序设计语言相比,Visual Basic最突出的特点是(C)。 A、结构化程序设计B、程序开发环境 C、事件驱动编程机制D、程序调试技术2、赋值语句:a=123 & MID(123456,3,2)执行后,a变量中的值是(C)。 A、12334B、123C、12334D、1573、保存一个工程最少应保存两个文献,这两个文献分别是(B)。 A、文本文献和工程文献B、窗体文献和工程文献C、窗体文献和标准模块文献D、类模块文献和工程文献4、如下能在窗体Form1的标题栏中显示VisualBasic窗体的语句是(C)。A、Form1.Name=VisualBasic窗体B、F
2、orm1.Title=VisualBasic窗体C、Form1.Caption=VisualBasic窗体D、Form1.Text=VisualBasic窗体5、为了装入一个Visual Basic应用程序,应当(D) A、只装入窗体文献(.frm)B、只装入工程文献(.vbp)C、分别装入工程文献和标准模块文献(.bas)D、分别装入工程文献、窗体文献和标准模块文献6、赋给一个数组的数据类型一定要(A)。 A、相同B、不相同C、两可D、都不对7、下面正确的赋值语句是(C)。A、x+y=30B、y=*r*rC、y=x+30D、3y=x8、Visual Basic 6.0集成环境的主窗口中不包括
3、(C)。A、标题栏B、菜单栏C、状态栏D、工具栏9、如下论述中错误的是(C)。A、Visual Basic 是事件驱动型可视化编程工具B、Visual Basic应用程序不具备明显的开始和结束语句C、Visual Basic工具箱中的所有控件都具备宽度(Width)和高度(Height)属性D、Visual Basic中控件的某些属性只能在运行时设置10、要使Print措施在Form_Load事件中起作用,要对窗体的(C)属性进行设置。 A、BackcolorB、ForeColorC、AutoRedrawD、BackStyle11、若要使命令按钮不可操作,要对(A)属性进行设制。 A、Enab
4、ledB、VisibleC、BackColorD、Caption12、如下论述中错误的是(B)。 A、一个工程中能够包括多个窗体文献B、在一个窗体文献中用Private定义的通用过程能被其他窗体调用C、在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不一样类型的磁盘文献。D、一个工程默认的开启对象是Form113、Cls措施能够清除窗体或图片框中的(C)内容。A、在设计阶段使用Picture设置的背景位图B、在设计阶段放置的控件C、在运行阶段产生的图形和文字D、以上均可14、设x=3,y=5,则如下体现式值为真的是 (C)A、(-3+5x) And (y0) B、(x0) C、(xy)
5、 Or (y0)D、x=y And y1015、为了预防用户随意将光标置于控件之上,应将进行(D)设置。 A、将控件的TabIndex属性设置为0B、将控件的TabStop属性设置为TrueC、将控件的TabStop属性设置为FalseD、将控件的Enabled属性设置为False16、要判断在文本框是否按了Enter键,应在文本框的(D)事件中判断。 A、ChangeB、KeyDownC、ClickD、KeyPress17、如下有关焦点的论述中,错误的是(A)。 A、假如文本框的TabStop属性为False,则不能接收从键盘上输入的数据B、当文本框失去焦点时,触发LostFocus事件C、
6、当文本框的Enabled属性为False时,其Tab次序不起作用D、能够用TabIndex属性变化Tab次序18、假如文本框的Enabled属性设为False,则(A)。 A、文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上。B、文本框的文本将变成灰色,用户仍然能将光标置于文本框上,不过不能变化文本框中的内容。C、文本框的文本将变成灰色,用户仍然能变化文本框中的内容。D、文本框的文本正常显示,用户能将光标置于文本框上,不过不能变化文本框中的内容。19、程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是(C)。A、MouseDownB、MouseUp C、LoadD、Click2
7、0、图像框有一个属性,能够自动调整图形的大小,以适应图像框的尺寸,这个属性是(B)。 A、AutosizeB、StretchC、AutoRedrawD、Appearance21、为了预防用户随意将光标置于控件之上,应设置的属性是(D)。 A、将控件的TabIndex属性设置为0B、将控件的TabStop属性设置为TrueC、将控件的TabStop属性设置为FalseD、将控件的Enabled属性设置为False22、无论何控件,共同具备的是(B)属性。 A、TextB、NameC、ForeColorD、Caption23、如下有关窗体的描述中,错误的是(A)。 A、执行Unload Form1
8、语句后,窗体Form1消失,但仍在内存中B、窗体的Load事件在加载窗体时发生C、当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被严禁D、窗体的Height、Width属性用于设置窗体的高和宽24、当运行程序时,系统自动执行窗体的(A)事件过程。 A、LoadB、ClickC、UnloadD、GotFocus25、窗体设计器是用来设计(B)。 A、应用程序的代码段B、应用程序的界面C、对象的属性D、对象的事件26、Visual Basic是一个面对对象的可视化程序设计语言,采取了(A)的编程机制。 A、事件驱动B、按过程次序执行C、从主程序开始执行D、按模块次序执行27
9、、确定一个控件在窗体上的位置的属性是(D)。 A、Width或HeightB、Width和HeightC、Top或LeftD、Top和 Left28、假如要变化窗体的标题,则需要设置的属性是(A)。 A、CaptionB、NameC、BackColorD、BorderStyle29、如下论述中错误的是(C)。 A、打开一个工程文献时,系统自动装入与该工程有关的窗体、标准模块等文献B、保存Visual Basic程序时,应分别保存窗体文献及工程文献C、Visual Basic应用程序只能以解释方式执行D、事件能够由用户引起,也能够由系统引起30、如下论述中错误的是(B)。 A、双击鼠标能够触发D
10、blClick事件B、窗体或控件的事件的名称能够由编程人员确定C、移动鼠标时,会触发MouseMove事件D、控件的名称能够由编程人员设定31、在Visual Basic中最基本的对象是(C)。它是应用程序的基石,是其他控件的容器。 A、文本框B、命令按钮C、窗体D、标签32、如下论述中正确的是(A)。 A、窗体的Name属性指定窗体的名称,用来标识一个窗体B、窗体的Name属性的值是显示在窗体标题栏中的文本C、能够在运行期间变化对象的Name属性的值D、对象的Name属性值能够为空33、在设计阶段,当双击窗体上的某个控件时,所打开的窗口是(C)。 A、工程资源管理器窗口B、工具箱窗口C、代码
11、窗口D、属性窗口34、Visual Basic是一个面对对象的可视化程序设计语言,采取了的编程机制是(A)。 A、事件驱动B、按过程次序执行C、从主程序开始执行D、按模块次序执行35、用来设置粗体字的属性是(C)。 A、FontItalicB、FontNameC、FontBoldD、FontSize36、假如一个工程含有多个窗体及标准模块,则如下论述中错误的是(A)。 A、假如工程中含有Sub Main过程,则程序一定首先执行该过程B、不能把标准模块设置为开启模块C、用Hide措施只是隐藏一个窗体,不能从内存中清除该窗体D、任何时刻最多只有一个窗体是活动窗体37、为了把焦点移到文本框,所使用的
12、措施是(A)。 A、SetFocusB、VisibleC、RefreshD、GetFocus38、INT(100*RND)产生的随机整数的闭区间是(A)。 A、0,99 B、1,100 C、0,100 D、1,9939、假如要在命令按钮上显示图形文献,应设置命令按钮的(B)。 A、Style属性和Graphics属性B、Style属性和Picture属性C、Caption属性D、Graphics属性40、若要使命令按钮不可操作,要对(A)属性进行设制。 A、EnabledB、VisibleC、BackColorD、Caption41、假定窗体的名称为Form1,则把窗体的标题设置为“VB_Te
13、st”的语句为(B)。 A、Form1=“VB_Test”B、Form1.Caption=“VB_Test”C、Form1.Text=“VB_Test”D、Form1.name=“VB_Test”42、如下论述中错误的是(A)。 A、在工程资源管理器窗口中只能包括一个工程文献及属于该工程的其他文献 B、以.BAS为扩展名的文献是标准模块文献C、窗体文献包括该窗体及其控件的属性D、一个工程中能够含有多个标准模块文献43、要使文本框取得输入焦点,则应采取文本框控件的哪个措施(A)。 A、GotFocusB、LostFocusC、KeyPressD、SetFocus44、如下不能在“工程资源管理器”
14、窗口中列出的文献类型是(B)。 A、.basB、.resC、.frmD、.ocx45、刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是(C)。 A、单项选择按钮B、图片框C、通用对话框D、文本框46、如下论述中错误的是(B)。 A、双击鼠标能够触发DblClick事件B、窗体或控件的事件的名称能够由编程人员确定C、移动鼠标时,会触发MouseMove事件D、控件的名称能够由编程人员设定47、如下能够触发文本框Change事件的操作是(D)。 A、文本框失去焦点B、文本框取得焦点C、设置文本框的焦点D、变化文本框的内容48、如下论述中错误的是(C)。 A、一个工程中只能有一个Sub Ma
15、in过程B、窗体的Show措施的作用是将指定的窗体装入内存并显示该窗体C、窗体的Hide措施和Unload措施的作用完全相同D、若工程文献中有多个窗体,能够依照需要指定一个窗体为开启窗体49、语句Print Abs(-62)+Int(-62)的输出成果是(A)。 A、0B、1C、-1D、-7250、假如将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为(B)。 A、0B、-1C、TRUED、FALSE51、函数String(n, str)的功效是(B)。 A、把数值型数据转换为字符串B、返回由n个字符组成的字符串C、从字符串中取出n个字符D、从字符串中第n个字符的位置开始取子字符串52、
16、语句Print Format(“Hello World”,“”)的输出成果是(C)。 A、hello WORLDB、hello worldC、HELLO WORLDD、HELLO world53、申明符号常量应当用核心字(B)。 A、StaticB、ConstC、PrivateD、Variant54、要强制显示申明变量,可在窗体模块或标准模块的申明段中加入语句(B)。 A、Option Base 0B、Option ExplicitC、Option Base 1D、Option Compare55、下列可作为Visual Basic变量名的是(D)。 A、A#AB、4AC、?xyD、const
17、A56、设a=10,b=5,c=1,执行语句Print a b c后,窗体上显示的是(B)。 A、TrueB、FalseC、1D、犯错信息57、执行x$=String(6, 124abc)后,x的值是(B)。 A、124abcB、111111C、124D、abc58、设a=6,则执行 x=IIf(a5,-1,0)后,x 的值为(D) A、5B、6 C、0 D、-159、执行语句:c$=“Glad”& Mid$(“Nice to meet you”,5,3),则变量c$的值为(C)。 A、Nice to meet youB、Glad Nice to meet youC、Glad toD、Glad
18、 60、下面(D)是合法的字符常数。 A、ABC$B、 ABCC、 ABCD、ABC61、对于语句If x=1 Then y=1,下列说法正确的是(C)。 A、x=1 和 y=1 均为赋值语句B、x=1 和 y=1 均为关系体现式C、x=1 为关系体现式, y=1 为赋值语句D、x=1 为赋值语句, y=1 为关系体现式62、设有申明:Dim X As Integer,假如Sgn(X) 的值为-1,则X的值是(D)。 A、任何整数B、0C、等于0的整数D、小于0的数63、在一行内写多条语句时,每个语句之间用(B)符号分隔。 A、,B、:C、D、;64、从键盘上输入两个字符串,分别保存在变量st
19、r1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是(D)。 A、LeftB、MidC、StringD、Instr65、设S=中华人民共和国,体现式Left(S,1)+Right(S,1)+Mid(S,3,2)的值为(B) A、中华民国B、中国人民C、中共人民 D、人民共和66、下列可作为 Visual Basic中的变量名的是(A)。 A、FilenameB、A(A+B)C、254DD、Print67、下面(A)是合法的变量名。 A、X_yzB、123abcC、IntegerD、X-Y68、如下变量命名非法的是(C)。 A、xyz123B、printaaC、booleanD、B
20、ernald69、设有变量申明:Dim TestDate As Date,为变量TestDate正确赋值的体现方式是(A)。 A、TextDate=#1/1/#B、TestDate=#“1/1/”#C、TextDate=date(“1/1/”)D、TestDate=Format(“m/d/yy”,“1/1/”)70、设a=2,b=3,c=4,d=5,体现式ab AND c=b And b10B、(ab)Or(b0)C、(a0)or(ba)And(b0)82、执行语句a=InputBox(Today,Tomorrow,Yesterday,Day before yesterday,5), 将显示一
21、个输入对话框,在对话框的输入区中显示的信息是(A)。 A、TodayB、TomorrowC、YesterdayD、Day before Yesterday83、VB提供了结构化程序设计的3种基本结构,这3种基本结构是(B)。 A、递归结构,分支结构,循环结构B、选择结构,过程结构,次序结构C、过程结构,输入、输出结构,转向结构D、分支结构,循环结构,次序结构84、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是(D)。 A、If sex=“男”And age40 And InStr(duty,“教授”)0 Then n=n+1B、If sex=“男”An
22、d age40 And (duty=“教授”Or duty=“副教授”) Then n=n+1C、If sex=“男”And age40 And Right(duty,2)= “教授” Then n=n+1D、If sex=“男”And age40 And duty=“教授”And duty=“副教授” Then n=n+185、当语句w=IIf(410,”Red”,“Green”)执行后,变量w中的值是(C)。 A、NullB、“Red”C、“Green”D、-186、赋值语句:a=123+MID(“123456”,3,2)执行后,a变量中的值是(D)。 A、“12334”B、123C、12
23、334D、15787、设有语句x=InputBox(“AAAA”,“BBBB”,“”),程序运行后,所产生的对话框的标题应为(C)。 A、AAAAB、空C、BBBBD、犯错,不能产生对话框88、下面正确的赋值语句是(C)。 A、x+y=30B、y=*r*rC、y=x+30D、3y=x89、VB提供了结构化程序设计的三种基本结构,三种基本结构是(D)。 A、递归结构、选择结构、循环结构B、选择结构、过程结构、次序结构C、过程结构、输入输出结构、转向结构D、选择结构、循环结构、次序结构90、下面程序段求两个数中的大数,不正确的是(D)。 A、Max=IIf(xy,x,y)B、If xy Then
24、Max=x Else Max=y C、Max=x:If y=x Then Max=yD、If yx Then Max=y :Max=x91、下列程序段: Dim x If x Then Print x Else Print x+1 运行后,显示的成果是(A)。 A、1B、0C、-1D、犯错92、如下不属于vb的三种基本结构的是(C)? A、次序结构B、选择结构C、递归结构D、循环结构93、语句If x=1 Then y=1,下列说法正确的是(C)。 A、x=1和y=1均为赋值语句B、x=1和y=1均为关系体现式C、x=1为关系体现式,y=1为赋值语句D、x=1为赋值语句, y=1为关系体现式9
25、4、赋值语句:a=123 & MID(“123456”,3,2)执行后,a变量中的值是(C)。 A、“12334”B、123C、12334D、15795、下面程序段显示的成果是(A)。 Dim x x=Int(Rnd)+5 Select Case x Case 5 “优秀” Case 4 Print“良好” Case 3 Print“通过” Case Else Print“不通过” End Select A、优秀B、良好C、通过D、不通过96、为了给x,y,z这3个变量赋初值1,下面正确的赋值语句是(A)。 A、x=1:y=1:z=1 B、x=1,y=1,z=1 C、x=y=z=1 D、xyz
26、=197、下列语句正确的是(C) A、If AB Then Print A不等于B B、If AB Then Printf A不等于BC、If AB Then Print A不等于B D、If AB Print A不等于B98、设有语句x$=InputBox(“输入数值”,“0”,“示例”),程序运行后,假如从键盘上输入数值10并按回车键,则下列论述中正确的是(D)。 A、变量X的值是数值10B、在InputBox对话框标题栏中显示的是“示例”C、0是默认值D、变量X的值是字符串“10”99、运行下列程序段后,显示的成果为(B) J1=4: J2=9 If J1J2 Then Print J2
27、 Else Print J1 A、4 B、9 C、13 D、49100、InputBox函数返回值的类型为(B)。 A、数值B、字符串C、变体D、数值或字符串(视输入的数据而定)101、一个数组阐明为Dim a(0 to 5,1 to 5) As Integer,则该数组共有(C) 个元素。 A、25 B、36C、30D、不确定102、数组申明语句Dim a(2 to 3, -2 to 2,3 to 5)中,数组a包括元素的个数为(C)。 A、120B、75C、30D、13103、假如在上题语句前加入 Option Base 1,则该数组共有(D) 个元素。 A、15B、16C、13 D、不确
28、定104、假如有申明 Dim a(15) As Integer,则该数组共有(B)个元素。 A、15B、16C、13D、不确定105、一个数组阐明为Dim a(5,1 to 5) As Integer,则该数组共有(C) 个元素。 A、25 B、36 C、30 D、不确定 106、在VB中,默认的数组下标的下界从0开始,要想在通用申明段界定下界,则应使用(A)。 A、Option Base B、Option ExplicitC、ExplicitD、Low Base107、如下数组申明语句,正确的是(B)。 A、Dim a3, 4 as IntegerB、Dim a(3, 4) as Integ
29、erC、Dim a(n, n) as IntegerD、Dim a34) as Integer108、赋给一个数组的数据的值的类型一定要(A)。 A、相同 B、不相同 C、两可 D、都不对 109、数组的下标可取的变量类型是(A)。 A、数值型 B、字符型 C、日期型 D、可变型110、数组申明语句Dim a(0 to 3, -2 to 2,0 to 5)中,数组a包括元素的个数为(A)。 A、120B、75C、60D、13111、假定有如下的Sub过程: Sub S (x As Single, y As Single) t = x x = t / y y = t Mod y End Sub
30、在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a = 5: b = 4 S a, b Print a, b End Sub 程序运行时,单击命令按钮得到的成果(D)。 A、5 4B、1 1C、1.25 4D、1.25 1112、用如下方式申明的变量,(B)能够在整个程序中通用? A、在窗体模块用Dim进行申明B、在窗体模块用Public进行申明C、在窗体模块用Private进行申明D、在窗体模块用Static进行申明113、在窗体上添加一个命令按钮和三个标签,编写事件过
31、程: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer N=10: z=N+z: y=y+z: x=x+z Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 程序运行后,连续三次单击命令按钮,则三个标签中显示的内容分别是(A)。 A、10 10 10B、30 30 30C、30 30 10D、10 30 30114、如下论述中错误的是(D)。 A、假如过程被定义为Static类型,则该过程中的
32、局部变量都是Static类型B、Sub过程中不能嵌套定义Sub过程C、Sub过程中能够嵌套调用Sub过程D、事件过程能够像通用过程同样由用户定义过程名115、在在窗体上添加一个命令按钮Command1和一个文本框Text1,然后编写如 下事件过程: Private Sub Command1_Click() Dim x As Integer, y As Integer, z As Integer x = 5 y = 7 z = 0 Text1.Text = Call p1(x, y, z) Text1.Text = Str(z) End Sub Private Sub p1(ByVal a As
33、 Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 程序运行后,单击命令按钮得到的成果是(A)。 A、12B、0C、Str(z)D、没有显示成果116、假如在程序中要将a定义为静态变量,且为整型数,则应使用的语句是:(B) A、Redim a As IntegerB、Static a As IntegerC、Public a As Integer D、Dim a As Integer117、如下程序的运行成果是(C) Sub s1(b() As Integer) For i = 1 To 4 b(i) = 2 * i Ne
34、xt i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer For i = 1 To 4 a(i) = i + 5 Next i s1 a() For i = 1 To 4 Print a(i) Next i End Sub A、12 14 16 18B、6 7 8 9C、2 4 6 8D、1 2 3 4118、如下程序的运行成果是(D)。 Function f(m As Integer) As Integer b = 1 Static c As Integer b = b + 1 c = c + 1 f = m * b
35、 * c End Function Private Sub Command1_Click() Dim a As Integer a = 2 Sum = 0 For i = 1 To 3 Sum = Sum + f(a) Next i Print Sum End Sub A、12B、28C、32D、24119、下列程序输出成果(C)。 Private Sub Command1_Click() For i = 1 To 10 GetValue i Next i Print GetValue(i) End Sub Private Function GetValue(ByVal a As Intege
36、r) Static S As Integer S = S + a GetValue = S End Function A、10B、65C、66D、11120、在过程定义的变量,若希望在离开该过程后,还能保存过程中局部变量的值,则应使用(D)核心字在过程中定义局部变量。 A、DimB、PrivateC、PublicD、Static121、在过程定义中用(C)表示形参的传值。 A、VarB、ByDefC、ByValD、Value122、在在窗体上添加一个命令按钮Command1和两个名称分别为Label1和 Label2的标签,然后编写如下事件过程: Private X As Integer Pr
37、ivate Sub Command1_Click() X = 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal a As Integer, ByVal b As Integer) X = a * a y = b + b End Sub 程序运行后,单击命令按钮,则两个标签label1和label2中显示的内容分别是(B)。 A、25,3B、25,6C、5,3D、5,6123、如下程序的运行成果是(C)。 Dim x As Integer, y As Integer, z A
38、s Integer Sub s1(a As Integer, b As Integer) Dim c As Integer a = 2 * a b = b + 2 c = a + b End Sub Sub s2(a As Integer, ByVal b As Integer) Dim c As Integer a = 2 * a b = b + 2 c = a + b End Sub Private Sub Command1_Click() x = 4:y = :4 z = 6 Call s1(x, y) Print x + y + z Call s2(x, y) Print x + y
39、+ z End Sub A、24 28 B、20 28C、20 18D、20 20124、如下有关过程及过程参数的描述中,错误的是(C)。 A、过程的参数能够是控件名称B、用数组作为过程的参数时,使用的是“传地址”方式C、只有函数过程能够将过程中处理的信息传回到调用的程序中D、窗体能够作为过程的参数125、如下属于Visual Basic合法的数组元素是(C) A、x8 B、x8C、s(0)D、v8126、下列论述中正确的是(C)。 A、在窗体的Form_Load事件过程中定义的变量是全局变量B、局部变量的作用域能够超出所定义的过程C、在某个Sub过程中定义的局部变量能够与其他事件过程中定义的
40、局部变量同名,但其作用域只限于该过程D、在调用过程时,所有局部变量被系统初始化为0或空字符串127、假定有如下函数过程: Function Fun(S As String) As String Dim s1 As String For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1) + s1 Next i Fun = s1 End Function 在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim str1 As String, str2 As String str1 = InputBox(请输入一个字符串) str2 = Fun(str1) Print str2 End Sub 程