大学VB考试题库

1、大学 VB 考试题库一、单项选择题1、与传统的程序设计语言相比,Visual Basic 最突出的特点是（ C）。A、结构化程序设计 B、程序开发环境C事件驱动编程机制 D、程序调试技术2、赋值语句： a=123& MID（"123456",3,2） 执行后， a 变量中的值是（ C）。A、"12334" B 、 123 C、 12334 D、 1573、 保存一个工程至少应保存两个文件，这两个文件分别是（ B）。A、文本文件和工程文件 B、窗体文件和工程文件C窗体文件和标准模块文件D、类模块文件和工程文件4、以下能在窗体 Forml的标题栏中显

2、示"VisualBasic 窗体"的语句是（C）。A、Form1.Name="VisualBasic 窗体 "B、Form1.Title="VisualBasic 窗体 "C、Form1.Caption="VisualBasic 窗体"D、Form1.Text="VisualBasic 窗体 "5、为了装入一个 VisualBasic 应用程序，应当 （ D）A、只装入窗体文件（.frm ）B只装入工程文件（.vbp）C分别装入工程文件和标准模块文件（ .bas）D分别装入工程文件、窗体文件和标

3、准模块文件6、 赋给一个数组的数据类型一定要（A）。A、相同B、不相同C、两可D、都不对7、 下面正确的赋值语句是（C）。A x+y=30 B、y= n *r*r C、y=x+30 D、3y=x8、VisualBasic 6.0 集成环境的主窗口中不包括 （C）。A、标题栏B、菜单栏C、状态栏D、工具栏9、以下叙述中错误的是 (C) 。A、Visual Basic 是事件驱动型可视化编程工具B、Visual Basic 应用程序不具有明显的开始和结束语句C、Visual Basic 工具箱中的所有控件都具有宽度( Width )和高度( Height )属性(计时器)D、Visual Basi

4、c 中控件的某些属性只能在运行时设置10、要使 Print 方法在 Form_Load 事件中起作用，要对窗体的 (C) 属性进行设置 。A、 Backcolor B 、 ForeColorC、 AutoRedraw D、 BackStyle11、 若要使命令按钮不可操作，要对 (A) 属性进行设 制。A、 Enabled B、 VisibleC、 BackColor D 、 Caption12、以下叙述中错误的是 (B) 。A、一个工程中可以包含多个窗体文件B在一个窗体文件中用 Private定义的通用过程能被其他窗体调用C在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁

5、盘文件。D 个工程默认的启动对象是Forml13、Cls 方法可以清除窗体或图片框中的 (C) 内容 。A、在设计阶段使用 Picture设置的背景位图B在设计阶段放置的控件C在运行阶段产生的图形和文字D以上均可14、设 x=3,y=5, 则以下表达式值为真的是 (C)A、 (-3+5>x) And (y>0) B 、 (x<0) Eqv (y>0)C、 (x>y) Or (y>0)D 、 x>=y And y>1015、 为了防止用户随意将光标置于控件之上，应将进行(D) 设置。A、将控件的Tablndex属性设置为0B将控件的TabStop属

6、性设置为TrueC将控件的TabStop属性设置为FalseD将控件的Enabled属性设置为False16、 要判断在文本框是否按了Enter 键，应在文本框的 (D) 事件中判断。A、Change B、KeyDown C、 Click D、 KeyPress17、 以下关于焦点的叙述中，错误的是(A) 。A、如果文本框的 TabStop属性为False，则不能接收从键盘上输入的数据B当文本框失去焦点时，触发 LostFocus事件C当文本框的Enabled属性为False时，其Tab顺序不起作用D可以用TabIndex属性改变Tab顺序18、如果文本框的 Enabled 属性设为 Fals

7、e ，则 (A) 。A、文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上。B文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的 内容。C文本框的文本将变成灰色，用户仍然能改变文本框中的内容。D文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容。19、 程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是(C) 。A、 MouseDown B、 MouseUpC、 Load D、 Click20、 图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸， 这个属性是 (B) 。A、 Autosize B、 StretchC、

8、AutoRedraw D 、 Appearance21、 为了防止用户随意将光标置于控件之上，应设置的属性是(D) 。A、将控件的TabIndex属性设置为0B将控件的TabStop属性设置为TrueC将控件的TabStop属性设置为FalseD将控件的Enabled属性设置为False22、不论何控件，共同具有的是(B) 属性。A、Text B、 NameC、 ForeColor D 、 Caption23、以下关于窗体的描述中，错误的是(A) 。A、执行Unload Forml语句后，窗体 Forml消失，但仍在内存中B窗体的Load事件在加载窗体时发生C当窗体的Enabled属性为Fal

9、se时，通过鼠标和键盘对窗体的操作都被禁止D窗体的Height、Width属性用于设置窗体的高和宽24、 当运行程序时，系统自动执行窗体的(A) 事件过程。A、 Load B、 ClickC、 Unload D 、 GotFocus25、窗体设计器是用来设计 (B) 。A、应用程序的代码段 B、应用程序的界面C对象的属性 D、对象的事件26、VisualBasic 是一种面向对象的可视化程序设计语言，采取了 (A) 的编程机制。A、事件驱动B、按过程顺序执行C从主程序开始执行 D、按模块顺序执行27、 确定一个控件在窗体上的位置的属性是(D) 。A、 Width 或 Height B 、 Wi

10、dth 和 HeightC Top 或 Left D、Top 和 Left28、 如果要改变窗体的标题，则需要设置的属性是(A) 。A、 Caption B 、 NameC、 BackColor D 、 BorderStyle29、以下叙述中错误的是 (C) 。A、打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B保存Visual Basic 程序时，应分别保存窗体文件及工程文件C、 Visual Basic 应用程序只能以解释方式执行D事件可以由用户引发，也可以由系统引发30、以下叙述中错误的是 (B) 。A、双击鼠标可以触发 DbICIick事件B窗体或控件的事件的名称可

11、以由编程人员确定C移动鼠标时，会触发 MouseMove事件D控件的名称可以由编程人员设定31、在 VisuaIBasic 中最基本的对象是 (C) 。它是应用程序的基石，是其他控件的容器。A、文本框B、命令按钮C窗体D、标签32、以下叙述中正确的是 (A) 。A、窗体的Name属性指定窗体的名称，用来标识一个窗体B窗体的Name属性的值是显示在窗体标题栏中的文本C可以在运行期间改变对象的Name属性的值D对象的Name属性值可以为空33、 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是(C) 。A、工程资源管理器窗口 B、工具箱窗口C代码窗口 D、属性窗口34、VisuaIBasic

12、是一种面向对象的可视化程序设计语言，采取了的编程机制是 (A) 。A、事件驱动B、按过程顺序执行C从主程序开始执行 D、按模块顺序执行35、用来设置粗体字的属性是 (C) 。A、 FontItaIic B 、 FontNameC、 FontBoId D、 FontSize36、 如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是(A) 。A、如果工程中含有 Sub Main过程，则程序一定首先执行该过程B不能把标准模块设置为启动模块C用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体D任何时刻最多只有一个窗体是活动窗体37、 为了把焦点移到文本框，所使用的方法是(A) 。A、SetF

13、ocus B、 VisibleC、 Refresh D 、 GetFocus38、 INT (100*RND)产生的随机整数的闭区间是(A)。A、0 ，99 B、1 ，100C、0 ，100 D 、1，9939、 如果要在命令按钮上显示图形文件，应设置命令按钮的(B)。A、 Style 属性和 Graphics 属性 B、 Style 属性和 Picture 属性C、 Caption 属性 D、 Graphics 属性40、 若要使命令按钮不可操作，要对(A)属性进行设制。A、 Enabled B、 VisibleC、 BackColor D 、 Caption(B) 。41、假定窗体的名称为

14、 Forml,则把窗体的标题设置为"VB_Test”的语句为A Form仁"VB_Test”B、Forml.Caption= “VB_Test”C、 Form1.Text= “VB_Test” D、F=“VB_Test”42、以下叙述中错误的是 (A) 。A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件B以.BAS为扩展名的文件是标准模块文件C窗体文件包含该窗体及其控件的属性D个工程中可以含有多个标准模块文件43、 要使文本框获得输入焦点，则应采用文本框控件的哪个方法(A) 。A、GotFocus B、LostFocusC、KeyPre

15、ss D 、SetFocus44、 以下不能在“工程资源管理器”窗口中列出的文件类型是(B) 。A、.bas B、.res C、.frm D 、.ocx45、 刚建立一个新的标准 EXE工程后，不在工具箱中出现的控件是(C)。A、单选按钮B、图片框 C、通用对话框D、文本框46、以下叙述中错误的是 (B) 。A、双击鼠标可以触发 DbICIick事件B窗体或控件的事件的名称可以由编程人员确定C移动鼠标时，会触发MouseMove事件D控件的名称可以由编程人员设定47、 以下能够触发文本框Change事件的操作是(D)。A、文本框失去焦点 B、文本框获得焦点C设置文本框的焦点D改变文本框的内容4

16、8、以下叙述中错误的是 (C)。A、一个工程中只能有一个Sub Main过程B窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体C窗体的Hide方法和Unload方法的作用完全相同D若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体49、 语句 PrintAbs(-6A2)+I门皓6人2)的输出结果是(A)。A、 0 B、 1 C、 -1 D、 -72(B) 。50、 如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为A、 0 B、 -1 C、 TRUE D、 FALSE51、函数 String(n,"str") 的功能是 (B) 。A、把数值型数

17、据转换为字符串B返回由n个字符组成的字符串C从字符串中取出n个字符D从字符串中第n个字符的位置开始取子字符串52、 语句 PrintFormat( “Hello World ”, “>”)的输出结果是(C)。A、 hello WORLD B 、 hello worldC、 HELLO WORLD、 HELLO worldA、Static B 、 Const C 、 Private D 、Variant54、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句(B) 。A、 Option Base 0 B、 Option ExplicitC、 Option Base 1 D 、 O

18、ption Compare55、下列可作为 VisualBasic 变量名的是 (D) 。A、A#A B、4A C、?xy D 、 constA56、 设a=10, b=5, c=1，执行语句 Printa > b > c后，窗体上显示的是 (B)。A、 True B 、 False C 、 1 D 、出错信息57、执行 x$=String(6,"124abc") 后， x 的值是 (B) 。A、 124abc B 、 111111 C、 124 D、 abc58、设 a=6,则执行 x=llf(a>5,-1,0) 后，x 的值为(D)A、 5 B 、 6

19、 C、 0 D 、 -159、 执行语句：c$= “Glad” & Mid$( “Nice to meet you ” ,5,3)，则变量c$ 的值为(C)。A、 Nice to meet you B 、 Glad Nice to meet youC、 Glad to D 、 Glad60、下面 (D) 是合法的字符常数 。A、 ABC$ B、 " ABC" C 、 ' ABC' D 、 ABC61、 对于语句 lfx=1 Then y=1 ，下列说法正确的是(C)。A、x=1 和 y=1 均为赋值语句B、x=1 和 y=1 均为关系表达式C、x=1

20、 为关系表达式， y=1 为赋值语句D、x=1 为赋值语句， y=1 为关系表达式62、 设有声明：DimX As Integer,如果Sgn(X)的值为-1，则X的值是(D)。A、任何整数B、0 C、等于0的整数D、小于0的数63、 在一行内写多条语句时，每个语句之间用(B) 符号分隔。A、， B 、： C 、 D 、；64、从键盘上输入两个字符串，分别保存在变量str1 、 str2 中。确定第二个字符串在第个字符串中起始位置的函数是 (D) 。A、Left B 、Mid C 、String D 、 Instr65、 设S="中华人民共和国”，表达式Left (S,1 ) +Ri

21、ght (S,1 ) +Mid (S,3,2 )的值为(B) A、 "中华民国 " B 、 "中国人民 "C、 "中共人民 " D 、 "人民共和 "66、下列可作为 Visual Basic 中的变量名的是 (A) 。A、 Filename B 、 A(A+B) C 、 254D D、 Print67、下面 (A) 是合法的变量名。A、 X_yz B、 123abc C、 Integer D 、 X-Y68、 以下变量命名非法的是(C)。A、 xyz123 B 、 printaa C 、 boolean D 、

22、Bernald69、设有变量声明 :DimTestDate 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，表达式 a>bAND c<=d 的值是(B)。A、 True B 、 False C 、 -1 D 、 171、表达式 6*8Mod 9的值是 (B) 。A、 4 B 、 3 C

23、 、 6 D 、 772、 假设变量 bool_x 是一个布尔型 ( 逻辑型 ) 的变量，则下面正确的赋值语句是(D)A、 bool_x = "False" B 、 bool_x = .False.C、 bool_x = #False# D 、 bool_x = False73、设 a= “VisualBasic ”，下面使 b= “Basic ”的语句是(B)。A、 b=Left(a,8,12) B 、 b=Mid(a,8,5)C、 b=Rigth(a,5,5) D 、 b=Left(a,8,5)A、32548.5 B 、 32,548.5 C 、032,548.50 D

24、 、32,548.5075、以下声明语句中错误的是 (D) 。C、A、Const var1=123 B 、 Dim var2 = 'ABC'Dim x_y_z% D 、 Static var3 As Integer76、可以同时删除字符串前导和尾部空白的函数是(C) 。A、Ltrim B 、 Rtrim C 、 Trim D 、Mid77、下列可为合法变量名的是(D) 。A、 Integer B 、 False C 、 public D 、thanksgiving78、变量未赋值时，数值型变量的值为( A) 。A 0 B、空C、1 D、无任何值79、表达式 16/4-2人5*8

25、/4 Mod 52 的值为(B)。A、 14 B、 4 C、 20 D、 2确的 80、下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40岁条件的人数， 不正语句是( D)。A If sex=" 男"And age v 40 And (duty=" 教授"Or duty=" 副教授")Then n=n+1B If sex=" 男"And age v 40 And InStr(duty," 教授")>0 Then n=n+1C If sex=" 男"And

26、 age v 40 And Right(duty,2)=" 教授 ” Then n=n+1D If sex=" 男"And age v 40 And duty=" 教授"And duty="副教授 ” Then n=n+181、 设a=3,b=5，则以下表达式值为真的是(B)。A、a>=b And b>10B、(a>b)Or(b>0)C、(a<0)or(b<0)D、(-3+5>a)And(b>0)82、执行语句 a=InputBox("Today","Tom

27、orrow","Yesterday","Daybeforeyesterday",5),将显示一个输入对话框，在对话框的输入区中显示的信息是 (A) 。A、 TodayB、TomorrowC、YesterdayD、Day before Yesterday 83、VB提供了结构化程序设计的 3种基本结构，这3种基本结构是（B）。A、递归结构，分支结构，循环结构B选择结构，过程结构，顺序结构C过程结构，输入、输出结构，转向结构D、分支结构，循环结构，顺序结构确的语句是（D）。A、 If sex="男” And agev40 And InSt

28、r（duty,"教授” ）>0 Then n=n+1B、 If sex="男” And agev40 And （duty="教授” Or duty="副教授”）Then n=n+1C、 If sex=“男” And agev 40 And Right（duty,2）=“教授” Then n=n+1D、 If sex=“男” And agev 40 And duty= “教授” And duty= “副教授” Then n=n+1面 If 语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正84、变量w中的值是（C）。85、当语句w

29、=IIf（4>10, ” Red” , “ Green” ） 执行后，A、NullB、“ Red”C、“ Green”D、-186、 赋值语句： a=123+MID（“123456”,3,2） 执行后，a 变量中的值是（ D）。A、“ 12334”B、123C、12334D、15787、设有语句 x=InputBox（ “AAAA”，“BBBB”，“” ）, 程序运行后，所产生的对话框的标 题应为 （C） 。A、 AAAAC、BBBBD出错，不能产生对话框88、下面正确的赋值语句是（C）。A、x+y=30B y= n *r*rC、y=x+30D、3y=x89、 VB提供了结构化程序设计的

30、三种基本结构，三种基本结构是（D）。A、递归结构、选择结构、循环结构B选择结构、过程结构、顺序结构C过程结构、输入输出结构、转向结构D选择结构、循环结构、顺序结构90、 下面程序段求两个数中的大数，不正确的是（D）。A Max=llf（x > y,x,y）B If x > y Then Max=xElse Max=yC、Max=x：lf y > =x Then Max=yD、If y > x Then Max=y ：Max=x91、下列程序段： Dim x If x Then Print x Else Print x+1运行后，显示的结果是 （A）。A、1B、0C、-1

31、D出错92、以下不属于 vb 的三种基本结构的是（ C）？A顺序结构B选择结构C递归结构D循环结构93、语句 Ifx=1 Then y=1, 下列说法正确的是（ C）。A x=1和y=1均为赋值语句B x=1和y=1均为关系表达式C x=1为关系表达式，y=1为赋值语句a变量中的值是（C）。D、x=1为赋值语句，y=1为关系表达式94、赋值语句： a=123& MID （“ 1 23456”,3,2） 执行后，A、“12334”B、123C、12334D、15795、下面程序段显示的结果是（ A）。Dim xx=Int（Rnd）+5Select Case xCase 5“优秀”Case

32、 4Print “良好”Case3Print “通过”Case ElsePrint “不通过”EndSelectA、优秀B良好C通过D、不通过96、为了给 x,y,z 这3个变量赋初值 1，下面正确的赋值语句是（ A）。A、x=1 ： y=1： z=1B、x=1,y=1,z=1C、x=y=z=1D、xyz=197、下列语句正确的是（ C）A If A 工 B Then Print"A 不等于 B"B、 If A<>B Then Printf A不等于 BC、 If A<>B Then Print "A不等于 B"D If A 工

33、B Print"A 不等于 B"98、设有语句 x$=InputBox（ “输入数值”，“ 0”，“示例” ）, 程序运行后，如果从键盘上输入数 值10并按回车键，则下列叙述中正确的是（D） 。A、变量X的值是数值10B在InputBox对话框标题栏中显示的是"示例”C、0是默认值D变量X的值是字符串“ 10”99、运行下列程序段后， 显示的结果为（ B） J1 =4: J2=9 If J1<J2 Then Print J2 Else PrintJ1A、4B、9C、13D、49100、InputBox 函数返回值的类型为 （B） 。A、数值B字符串C变体D数

34、值或字符串（视输入的数据而定） 101 、一个数组说明为 Dima（0 to 5 ，1 to 5） As Integer ，则该数组共有（ C） 个元素。A、25B、36C、30D不确定102、数组声明语句 Dima(2 to 3, -2 to 2,3 to 5)中，数组 a 包含元素的个数为 (C) 。A、120B、75C、30D、13103、如果在上题语句前加入 Option Base 1 ，则该数组共有( D) 个元素。A、15B、16C、13D、不确定104、如果有声明 Dim a(15) As Integer，则该数组共有(B)个元素。A、15B、16C、13D、不确定105、一个数

35、组说明为 Dima(5 ， 1 to 5) As Integer ，则该数组共有( C) 个元素。A、25B、36C、30D、不确定106、在 VB 中，默认的数组下标的下界从 0开始，要想在通用声明段界定下界， 则应使用 ( A)。A、Option BaseB、Option ExplicitC、ExplicitD、Low Base107、如下数组声明语句，正确的是 (B) 。A、Dim a3, 4 as IntegerB、Dim a(3, 4) as IntegerC、Dim a(n, n) as IntegerD、Dim a34) as Integer108、赋给一个数组的数据的值的类型一

36、定要( A)。A、相同B不相同C两可D都不对109、数组的下标可取的变量类型是( A)。A、数值型B字符型C日期型D可变型110、 数组声明语句 Dima(0 to 3, -2 to 2,0 to 5)中，数组 a 包含元素的个数为 (A) 。A、120B、75C、60D、13 111、假定有如下的 Sub 过程： SubS (x As Single, y As Single) t = x x = t / y y = tMod y End Sub 在窗体上添加一个命令按钮，然后编写如下事件过程： Private SubCommand1_Click() Dim a As Single Dim b

37、 As Singlea = 5: b = 4 S a, b Print a, b End Sub 程序运行时，单击命令按钮得到的结果(D)。B、1 1C、1.25 4D、1.25 1112、用以下方式声明的变量，(B)可以在整个程序中通用?A、在窗体模块用Dim进行声明B、在窗体模块用Public进行声明C、在窗体模块用Private进行声明D、在窗体模块用Static进行声明113、在窗体上添加一个命令按钮和三个标签， 编写事件过程: Sub Commanc1_Click() Static yAs Integer Dim z As Integer Label1.Caption = xLabe

38、l2.Caption = y Label3.Caption = z Enc Sub 三次单击命令按钮，则三个标签中显示的内容分别是(A)。Private x As Integer Private N=10: z=N+z: y=y+z: x=x+z 程序运行后，连续A、10 10 10B、30 30 30C、30 30 10D、10 30 30114、以下叙述中错误的是 (D) 。A、如果过程被定义为 Static类型，则该过程中的局部变量都是Static 类型B、Sub 过程中不能嵌套定义Sub 过程C、Sub 过程中可以嵌套调用Sub 过程D、事件过程可以像通用过程一样由用户定义过程名115

39、、在在窗体上添加一个命令按钮Commanc和一个文本框 Textl，然后编写如 下事件过程:Private Sub Command1_Click()Dim x As Integer, y As Integer, z AsInteger y = 7z = 0Text1.Text =""Call p1(x, y, z)Text1.Text = Str(z)End Sub Private Subp1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + bEnd Sub程序运行后，单击命令按钮得到的结果是( A

40、)。A、12B、0C、Str(z)D没有显示结果116、如果在程序中要将 a 定义为静态变量，且为整型数，则应使用的语句是： ( B)A、Redim a As IntegerB、Static a As IntegerC、Public a As IntegerD、Dim a As Integer117、以下程序的运行结果是( C)Subs1(b() As Integer)For i = 1 To 4b(i) = 2 * iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As IntegerFor i = 1 To 4a(i) = i

41、+ 5Next iFor i = 1 To 4Print a(i)NextiEndSubA、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 StaticcAs Integer b = b + 1 c = c + 1 f = m * b * c End Function Private SubCommand1_Click()Dim a As Integer a = 2 Sum = 0 For i = 1 To 3 Sum = Sum + f(a)

42、Next i Print Sum EndSubA、12B、28C、32D、24119、下列程序输出结果（ C）。Private Sub Command1_Click()For i = 1 To 10GetValue iNext iPrint GetValue(i)End SubPrivate FunctionGetValue(ByVal a As Integer) Static S As Integer S = S + aGetValue = SEnd FunctionA、10B、65C、66D、11 120、在过程定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使 用(D)

43、关键字在过程中定义局部变量。A、DimB、PrivateC、PublicD、Static121、在过程定义中用 (C) 表示形参的传值。A、VarB、By DefC、ByValD、Value122、 在在窗体上添加一个命令按钮Comma nd和两个名称分别为Labell和Label2的标签，然后编写如下事件过程： Private X AsInteger Private SubCommand1_Click() X = 5: y =3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal aAs I

44、nteger, ByVal bAs 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 As Integer Subs1(a As Integer, b As Integer)Dim c As Integera = 2 * a b = b + 2 c = a+ bEnd SubSub s2(a As Integer, ByVal

45、b As Integer)Dim c As Integerc = a + bEnd SubPrivate Sub Command1_Click()x = 4 ： y = ： 4 z = 6Call s1(x, y)Print x + y + zCall s2(x, y)Print x + y + zEnd SubA、24 28B、20 28C、20 18D、20 20124、以下关于过程及过程参数的描述中，错误的是(C) 。A、过程的参数可以是控件名称B用数组作为过程的参数时，使用的是“传地址”方式C只有函数过程能够将过程中处理的信息传回到调用的程序中D窗体可以作为过程的参数125、以下属于

46、VisualBasic 合法的数组元素是( C)A、x8B、x 8C、s(0)D、v8126、下列叙述中正确的是 (C)。A、在窗体的Form_Load事件过程中定义的变量是全局变量B局部变量的作用域可以超出所定义的过程C在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作 用域只限于该过程D在调用过程时，所有局部变量被系统初始化为0或空字符串127、 假定有以下函数过程：Function Fun(S As String) As String Dim s1 As String Fori =1 To Len(S) s1 = UCase(Mid(S, i, 1) + s1

47、 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 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，单击"确定"按钮后程序在窗体上输出结果(D)。A、abcdefgB、gfedcbaC、GFEDCBAD、ABCDEFG

48、128、若已编写了一个 Sort 子过程， 在该工程中有多个窗体， 为了方便的调用 Sort 子过程， 应该将该过程放在 (B) 。A、窗体模块B标准模块C类模块D工程129、 下面子过程语句说明合法的是(D)A、 Sub f1 ( ByVal n() AsInteger)B、 Function f1 (f1 As Integer) As IntegerC、Sub f1 (n() AsInteger )As IntegerD、Function f1 ( ByVal n As Integer )As Integer130、在过程定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使

49、用(D)关键字在过程中定义局部变量。A、DimB、PrivateC、PublicD、Static131、在窗体上画三个单选按钮，组成一个名为chkOption 的控件数组。用于标识各个控件数组元素的参数是 （D） 。A、TagB、IndexC、ListIndexD、Name132、 假如列表框（Listl ）有四个数据项，那么把数据项“ China”添加到列表框的最后， 应使用 （D） 语句。A、List1.AddItem 3, "China"B、List1.AddItem "China", List1.List1Count-1C、List1.AddIt

50、em "China", 3D、List1.AddItem "China"133、 如果列表框（Listl ）中没有被选定的项目，则执行Listl.Removeltem Listl.ListIndex 语句的结果是 （D） 。A、移去第一项B移去最后一项C移去最后加入列表的一项D以上都不对134、以下叙述中错误的是 （C）。A、在KeyUp和KeyDown事件过程中，从键盘上输入 A或a被视作相同的字母（即具有相同的 KeyCode）B在KeyUp和KeyDown事件过程中，将键盘上的“ 1”和右侧小键盘上的“ 1”视作不同的 数字 （ 具有不同的 Key

51、Code）C、KeyPress 事件中不能识别键盘上某个键的按下与释放D、KeyPress 事件中可以识别键盘上某个键的按下与释放135、 设组合框Combo中有3个项目，则以下能删除最后一项的语句是（B）。A、Combo1.RemoveItem TextB、Combo1.RemoveItem 2C、Combo1.RemoveItem 3D、Combo1.RemoveItem Combo1.Listcount 136、下列控件中，没有 Caption 属性的是 (B) 。A、框架B列表框C复选框D单选按钮137、 引用列表框( List1 )最后一个数据项应使用的表达式是(C)A、List1.

52、List(List1.ListCount)B、List1.List(ListCount)C、List1.List(List1.ListCount-1)D、List1.List(ListCount-1)138、 窗体的 MouseDowr事件过程 Form_MouseDown(Button As Integer. Shift As Integer, X As Single, Y As Single)有4个参数，关于这些参数，正确的描述是(A) 。A、通过Button参数判定当前按下的是哪一个鼠标键B、Shift 参数只能用来确定是否按下 Shift 键C、Shift 参数只能用来确定是否按下 A

53、lt 和 Ctrl 键D参数x,y用来设置鼠标当前位置的坐标139、复选框的 Value 属性为 1时，表示 (B) 。A、复选框未被选中B复选框被选中C复选框内有灰色的勾D复选框操作有错误。140、 引用列表框的最后一项应使用(A) 。A、List1.List(List1.ListCount-1)B、List1.List(List1.ListCount)C、List1.List(ListCount)D、List1.List(ListCount-1)141、设窗体上有一个列表框控件List1 ，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是 (D) 。A、 List1.ListB

54、、List1.ListIndexC、List1.IndexD、List1.Text142、表示滚动条控件取值范围最大值的属性是(A) 。A、MaxB、LargeChangeC、ValueD、Max-Min143、为了在按下 Esc 键时执行某个命令按钮的 Click 事件过程，需要把该命令按钮的一个 属性设置为 True ，这个属性是 (D) 。A、 ValueB、DefaultC、CancelD、Enabled144、 假如列表框(Listl )有四个数据项，那么把数据项“ China”添加到列表框的最后， 应使用语句 (D) 。A、List1.AddItem 3, "China&

55、quot;B、List1.AddItem "China", List1.List1Count-1C、List1.AddItem "China", 3D、List1.AddItem "China", List1.List1Count145、复选框的 Value 属性为 2时，表示 (C) 。A、复选框未被选中B复选框被选中C复选框内有灰色的勾D复选框操作有错误。146、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设 置为 True ，这个属性是 （A） 。A、 ValueB、DefaultC、CancelD、

56、Caption147、下面说法不正确的是（ D） ?A、层菜单不允许设置快捷键B使菜单项中的文字具有下画线，可在标题文字前加&符号C 一菜单项名为 MenuTerm 则语句 MenuTerm.Enable = Flase 将使该菜单项失效D希望在菜单中显示"&"符号，则在标题栏中输入 "&"符号148、以下叙述中错误的是 （C）。A、在程序运行时，通用对话框控件是不可见的B在同一个程序中，用不同的方法（如ShowOper或ShowSave等）打开的通用对话框具有不 同的作用C调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的