1、vb单选、操作部分一、单项选择题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=VisualB
2、asic窗体B、Form1.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)属性进行设
4、制。 A、EnabledB、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
5、) C、(xy) 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、当文本框失去焦点时，触发LostF
6、ocus事件C、当文本框的Enabled属性为False时，其Tab顺序不起作用D、可以用TabIndex属性改变Tab顺序18、如果文本框的Enabled属性设为False，则(A)。 A、文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上。B、文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容。C、文本框的文本将变成灰色，用户仍然能改变文本框中的内容。D、文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容。19、程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是(C)。A、MouseDownB、MouseUp C、Load
7、D、Click20、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是(B)。 A、AutosizeB、StretchC、AutoRedrawD、Appearance21、为了防止用户随意将光标置于控件之上，应设置的属性是(D)。 A、将控件的TabIndex属性设置为0B、将控件的TabStop属性设置为TrueC、将控件的TabStop属性设置为FalseD、将控件的Enabled属性设置为False22、不论何控件，共同具有的是(B)属性。 A、TextB、NameC、ForeColorD、Caption23、以下关于窗体的描述中，错误的是(A)。 A、执行Unlo
8、ad Form1语句后，窗体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、按
9、模块顺序执行27、确定一个控件在窗体上的位置的属性是(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、双
10、击鼠标可以触发DblClick事件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、工
11、具箱窗口C、代码窗口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,则把窗体的标题设
13、置为“VB_Test”的语句为(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、一个工程中只能有一个
15、Sub Main过程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个字符的位置开始取子
16、字符串52、语句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
17、、constA56、设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 to
18、D、Glad 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、从键盘上输入两个字符串，分别保
19、存在变量str1、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、bool
20、eanD、Bernald69、设有变量声明:Dim TestDate As Date,为变量TestDate正确赋值的表达方式是(A)。 A、TextDate=#1/1/2002#B、TestDate=#“1/1/2002”#C、TextDate=date(“1/1/2002”)D、TestDate=Format(“m/d/yy”,“1/1/2002”)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 bef
21、ore yesterday,5), 将显示一个输入对话框，在对话框的输入区中显示的信息是(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 Th
22、en n=n+1B、If sex=“男”And 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变量中的值是（
23、D）。 A、“12334”B、123C、12334D、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=II
24、f(xy,x,y)B、If xy Then 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为赋值语句
25、D、x=1为赋值语句， y=1为关系表达式94、赋值语句：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
26、=1,z=1 C、x=y=z=1 D、xyz=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
27、 If J1J2 Then Print J2 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）
28、个元素。 A、15B、16C、13 D、不确定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 Integer
29、B、Dim a(3, 4) as IntegerC、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 /
30、y y = t Mod y End Sub 在窗体上添加一个命令按钮，然后编写如下事件过程： 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、如
32、果过程被定义为Static类型，则该过程中的局部变量都是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 Pri
33、vate Sub p1(ByVal a As 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 =
34、1 To 4 b(i) = 2 * i Next 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 +
35、 1 c = c + 1 f = m * b * 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 GetV
36、alue(ByVal a As Integer) 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的标签，然后编写如下事件过程： P
37、rivate X As Integer Private 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 Inte
38、ger, y As Integer, z As 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
39、 s2(x, y) Print x + y + 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)
个人主页
