大学vb考试题库

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

2、5、 Form1 的标题栏中显示 VisualBasic 窗体 窗体 窗体 窗体 Visual Basic 应用程序，应当 窗体 的语句是 C）。 A、 =VisualBasic =VisualBasic 为了装入一个 只装入窗体文件（ .frm ） D） B、 C、 D、 6、 A、 7、 A、 8、 A、 只装入工程文件（ .vbp ） 分别装入工程文件和标准模块文件（ .bas ） 分别装入工程文件、窗体文件和标准模块文件 赋给一个数组的数据类型一定要（ 相同B、不相同 下面正确的赋值语句是（C）。 B y= n *r*r A）。 C两可 D都不对 9、 A、 x+y=30 Visual

3、 Basic 标题栏 以下叙述中错误的是 (C) 。 Visual Basic Visual Basic Visual Basic Visual Basic B、 C、 D、 10、要使 Print A、 Backcolor C、 y=x+30 D、 3y=x 集成环境的主窗口中不包括 B菜单栏C状态栏 C）。 D、 工具栏 是事件驱动型可视化编程工具 应用程序不具有明显的开始和结束语句 工具箱中的所有控件都具有宽度（ Width ）和高度（ 中控件的某些属性只能在运行时设置 Height ）属性 方法在 Form_Load 事件中起作用，要对窗体的 （C） 属性进行设置 。 ForeColo

4、r B、 D、 C、 AutoRedraw 11、若要使命令按钮不可操作，要对 A、 EnabledB、 C、 BackColor 12、以下叙述中错误的是 （B） 。 D、 BackStyle (A) 属性进行设 制。 Visible Caption A、一个工程中可以包含多个窗体文件 B在一个窗体文件中用 Private定义的通用过程能被其他窗体调用 C在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D 个工程默认的启动对象是Forml 13、 Cls 方法可以清除窗体或图片框中的 （C） 内容 。 A、在设计阶段使用 Picture设置的背景位图 B在设计阶

5、段放置的控件 C在运行阶段产生的图形和文字 D以上均可 14、设 x=3,y=5, 则以下表达式值为真的是 (C) A、(-3+5x) And (y0)B、 (x0) C、 (xy) Or (y0)D、 x=y And y10 15、 为了防止用户随意将光标置于控件之上，应将进行(D) 设置。 A、将控件的Tablndex属性设置为0 B将控件的TabStop属性设置为True C将控件的TabStop属性设置为False D将控件的Enabled属性设置为False 16、 要判断在文本框是否按了Enter 键，应在文本框的 (D) 事件中判断。 A、ChangeB、 KeyDownC、 C

6、lickD、 KeyPress 17、 以下关于焦点的叙述中，错误的是(A) 。 A、如果文本框的 TabStop属性为False，则不能接收从键盘上输入的数据 B当文本框失去焦点时，触发LostFocus事件 C当文本框的Enabled属性为False时，其Tab顺序不起作用 D可以用TabIndex属性改变Tab顺序 18、如果文本框的 Enabled 属性设为 False ，则 (A) 。 A、文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上。 B文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的 内容。 C文本框的文本将变成灰色，用户仍然能改变文本框

7、中的内容。 D文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容。 19、 程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是(C) 。 B、 MouseUp D、 Click A、MouseDown C、 Load 20、图像框有一个属性， 可以自动调整图形的大小，以适应图像框的尺寸， 这个属性是 (B) 。 B、 Stretch A、Autosize C、 AutoRedrawD、 Appearance 21、为了防止用户随意将光标置于控件之上，应设置的属性是(D) 。 A、将控件的TabIndex属性设置为0 B将控件的TabStop属性设置为True C将

8、控件的TabStop属性设置为False D将控件的Enabled属性设置为False 22、不论何控件，共同具有的是 (B) 属性。 A、 Text B、Name C、ForeColorD、 Caption 23、 以下关于窗体的描述中，错误的是(A) 。 A、执行Un load Form1语句后，窗体 Form1消失，但仍在内存中 B窗体的Load事件在加载窗体时发生 C当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 D窗体的Height、Width属性用于设置窗体的高和宽 24、 当运行程序时，系统自动执行窗体的(A) 事件过程。 A、LoadB、 Clic

9、k C、 UnloadD、 GotFocus 25、窗体设计器是用来设计 (B) 。 A、应用程序的代码段B应用程序的界面 C对象的属性D、对象的事件 26、Visual Basic 是一种面向对象的可视化程序设计语言，采取了 (A) 的编程机制。 A、事件驱动B、按过程顺序执行 C从主程序开始执行D按模块顺序执行 27、 确定一个控件在窗体上的位置的属性是(D) 。 A、 Width 或 HeightB、 Width 和 Height C、 Top 或 LeftD、 Top 和 Left 28、 如果要改变窗体的标题，则需要设置的属性是(A) 。 A、 CaptionB、 Name C、 B

10、ackColorD、 BorderStyle 29、以下叙述中错误的是 (C) 。 A、打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B保存Visual Basic 程序时，应分别保存窗体文件及工程文件 C、 Visual Basic 应用程序只能以解释方式执行 D事件可以由用户引发，也可以由系统引发 30、以下叙述中错误的是 (B) 。 A、双击鼠标可以触发 DbICIick事件 B窗体或控件的事件的名称可以由编程人员确定 C移动鼠标时，会触发 MouseMove事件 D控件的名称可以由编程人员设定 31、在 VisuaI Basic 中最基本的对象是 (C) 。它是应

11、用程序的基石，是其他控件的容器。 A、文本框B、命令按钮 C窗体D、标签 32、以下叙述中正确的是 (A) 。 A、窗体的Name属性指定窗体的名称，用来标识一个窗体 B窗体的Name属性的值是显示在窗体标题栏中的文本 C可以在运行期间改变对象的Name属性的值 D对象的Name属性值可以为空 33、 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是(C) 。 A、工程资源管理器窗口B、工具箱窗口 C代码窗口D属性窗口 34、VisuaI Basic 是一种面向对象的可视化程序设计语言，采取了的编程机制是 (A) 。 A、事件驱动B、按过程顺序执行 C从主程序开始执行D按模块顺序执行 35

12、、用来设置粗体字的属性是 (C) 。 A、FontItaIicB、FontName C、FontBoIdD、FontSize 36、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是(A) 。 A、如果工程中含有 Sub Main过程，则程序一定首先执行该过程 B不能把标准模块设置为启动模块 C用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 D任何时刻最多只有一个窗体是活动窗体 37、 为了把焦点移到文本框，所使用的方法是(A) 。 A、SetFocusB、 Visible C、 RefreshD、 GetFocus 38、INT( 100*RND)产生的随机整数的闭区间是( A

13、)。 A、 0 ， 99 B、1 ， 100 C、0 ， 100D、 1 ， 99 39、如果要在命令按钮上显示图形文件，应设置命令按钮的(B) 。 A、Style 属性和 Graphics 属性 B、 C、 Caption 属性 40、若要使命令按钮不可操作，要对 Style 属性和 Picture 属性 D、 Graphics 属性 (A) 属性进行设制。 Visible C、 BackColor 41、假定窗体的名称为 D、Caption Form 1 ,则把窗体的标题设置为 VB_Test”的语句为(B)。 A、 Form1=“ VB_Test” B、 =“ VB_Test” A、En

14、abledB、 C、 =“VB_Test” D、 =“VB_Test” 42、以下叙述中错误的是 (A) 。 A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B以.BAS为扩展名的文件是标准模块文件 C窗体文件包含该窗体及其控件的属性 D个工程中可以含有多个标准模块文件 43、要使文本框获得输入焦点，则应采用文本框控件的哪个方法(A) 。 A、 GotFocus B、LostFocus C、KeyPressD、 SetFocus 44、以下不能在“工程资源管理器”窗口中列出的文件类型是 (B)。 A、 .bas B、 .resC、 .frmD、 .ocx 45、 刚建立一

15、个新的标准EXE工程后，不在工具箱中出现的控件是(C)。 A、单选按钮B图片框C、通用对话框D、文本框 46、以下叙述中错误的是 (B)。 A、双击鼠标可以触发 DblClick事件 B窗体或控件的事件的名称可以由编程人员确定 C移动鼠标时，会触发MouseMove事件 D控件的名称可以由编程人员设定 47、以下能够触发文本框 A、文本框失去焦点 C设置文本框的焦点 Change 事件的操作是 (D) 。 B文本框获得焦点 D、改变文本框的内容 48、以下叙述中错误的是 (C)。 A、一个工程中只能有一个 Sub Main 过程 B窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体 C

16、窗体的Hide方法和Unload方法的作用完全相同 D若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体 49、语句 Print Abs(-6A2)+I门皓6人2)的输出结果是(A)。 A、 0 B、 1 C、 -1 D、 -72 50、 如果将布尔常量值 TRUE赋值给一个整型变量，则整型变量的值为(B)。 A、0B、 -1C、 TRUED、 FALSE 51、函数 String(n, str) 的功能是 (B) 。 A、把数值型数据转换为字符串 B返回由n个字符组成的字符串 C从字符串中取出n个字符 D从字符串中第n个字符的位置开始取子字符串 52、语句 Print Format(

17、 “Hello World ”,“”)的输出结果是 (C)。 A、hello WORLDB、 hello world C、 HELLO WORLDD、 HELLO world 53、 声明符号常量应该用关键字(B) 。 A、StaticB、 ConstC、 PrivateD、 Variant 54、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句 A、 Option Base 0B、 Option Explicit C、 Option Base 1D、 Option Compare 55、下列可作为 Visual Basic 变量名的是 (D)。 C、 ?xy Print a b

18、c C、 1 后， x 的值是 (B) 。 (B) 。 A、 A#AB、 4A 56、设 a=10， b=5， c=1，执行语句 A、 True 57、执行 x$=String(6, 124abc) B、 111111 x=IIf(a5,-1,0) B、 6 Glad”& Mid$( B、 False A、 124abc 58、设a=6，则执行 A、 5 59、执行语句： c$= A、 Nice to meet you C、 Glad to 后， D、 constA 窗体上显示的是 D、出错信息 C、 124 后， x 的值为( D) C、 0 Nice to meet you B、 Glad

19、 Nice to meet you D、 Glad D、 abc (B) 。 D、 -1 ,5,3)，则变量c$的值为(C)。 60、下面 (D) 是合法的字符常数 。 A、ABC$ B、 ABCC、 ABCD、 ABC 61 、对于语句 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，贝U X的值是(D)。 A、任何整数B 0C

20、等于0的整数D、小于0的数 63、 在一行内写多条语句时，每个语句之间用(B) 符号分隔。 A、，B、：C、D、； 64、 从键盘上输入两个字符串，分别保存在变量str1 、 str2 中。确定第二个字符串在第一 个字符串中起始位置的函数是 (D)。 A、 LeftB、 MidC、 StringD、 Instr 65、设S=中华人民共和国”，表达式Left (S,1 ) +Right (S,1 ) +Mid (S,3,2 )的值为(B) A、中华民国 B、中国人民 C、中共人民 D、人民共和 66、下列可作为 Visual Basic 中的变量名的是 (A) 。 A、 FilenameB、 A

21、(A+B) C、 254D D、 Print 67、下面 (A) 是合法的变量名。 A、 X_yzB、 123abc C、 Integer D、 X-Y 68、以下变量命名非法的是(C)。 A、 xyz123B、 printaa C、 boolean D、 Bernald 69、设有变量声明 :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( “

22、 m/d/yy ”, “1/1/2002 ”) 70、设 a=2,b=3,c=4,d=5 ，表达式 ab AND c0 Then n=n+1 C If sex= 男And age v 40 And Right(duty,2)= 教授 ” Then n=n+1 D If sex= 男And age v 40 And duty= 教授And duty=副教授 ” Then n=n+1 81、设a=3,b=5，则以下表达式值为真的是(B)。 A、a=b And b10 B、(ab)Or(b0) C、(a0)or(ba)And(b0)82 、 执 行 语 句 a=InputBox（Today,Tomo

23、rrow,Yesterday,Day before yesterday,5）, 将显示一个输入对话框，在对话框的输入区中显示的信息是 （A） 。 A、Today B、Tomorrow C、Yesterday D、Day before Yesterday 83、VB提供了结构化程序设计的3种基本结构，这3种基本结构是（B）。 A、递归结构，分支结构，循环结构 B选择结构，过程结构，顺序结构 C过程结构，输入、输出结构，转向结构 D分支结构，循环结构，顺序结构 84、下面 If 语句统计满足性别为男、 职称为副教授以上、 年龄小于 40 岁条件的人数，不正 确的语句是（ D）。 A、 If sex

24、= 男” And age v 40 And InStr(duty, “教授”) 0 Then n=n+1 B、 If sex= 男” And age v 40 And (duty= 教授” Or duty= “副教授” ) Then n=n+1 C、 If sex= 男” And age v 40 And Right(duty,2)= 教授” Then n=n+1 D、 If sex= 男” And age v 40 And duty= “教授” And duty= “副教授” Then n=n+1 85、当语句w=llf（410, ” Rec”，“Green”）执行后，变量w中的值是（C）。

25、 A、Null B、“ Red” C、“ Green” D、-1 86、 赋值语句：a=123+MID（ “123456 ” ,3,2）执行后，a变量中的值是（D）。 A、“ 12334” B、123 C、12334 D、157 87、设有语句 x=lnputBox（ “AAAA”，“BBBB”，“” ）, 程序运行后，所产生的对话框的标题应 为（C）。 A、 AAAA B空 C、BBBB D出错，不能产生对话框 88、 下面正确的赋值语句是（C）。 A、 x+y=30 B y= n *r*r C、y=x+30 D、3y=x 89、 VB提供了结构化程序设计的三种基本结构，三种基本结构是（D）

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

27、基本结构的是（ 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 为关系表达式 94、 赋值语句：a=123 & MID（ “123456”，3,2）执行后，a变量中的值是（C）。 A、“ 12334” B、123 C、12334 D、157 95、 下面程序段显示的结果是（A）。 Dim x x=Int（Rnd）+5 Select Case x Cas

28、e 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=1 97、下列语句正确的是（ C） A If A 工 B Then Print A 不等于 B B、 If AB Then Printf A不等于 B C、 If AB Then Print A不等于 B D If A 工 B P

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

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

31、不确定 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 Explicit C、Explicit D、Low Base 107、 如下数组声明语句，正确的是(B) 。 A、Dim a3, 4 as Integer B、Dim a(3, 4) as Integer C、Dim a(n, n) as Integer D、Dim a34) as Integer

32、 108、 赋给一个数组的数据的值的类型一定要(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、120 B、75 C、60 D、13 111 、假定有如下的 Sub 过程： Sub S (x As Single, y As Single) t = x x = t / y y = t Mod y End Sub 在窗体上添加一个命令按钮，然后编写如下事件过程：Private Sub Comman

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

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

35、过程名 115、 在在窗体上添加一个命令按钮Command1和一个文本框 Textl，然后编写如下事件过 程： Private Sub Command1_Click() Dim x As Integer, y As Integer, z As Integer x = 5 y = 7 z = 0 nil Call p1(x, y, z) = Str(z) End Sub Private Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 程序运行后，单击命令按钮得到的结果是(A)。 A、12

36、 B、0 C、Str(z) D没有显示结果 116、 如果在程序中要将a定义为静态变量，且为整型数，则应使用的语句是：(B) A、Redim a As Integer B、Static a As Integer C、Public a As Integer D、Dim a As Integer 117、 以下程序的运行结果是(C) Sub s1(b() As Integer) For i = 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

37、 a(i) = i + 5 Next i s1 a() For i = 1 To 4 Print a(i) Next i End Sub A、12 14 16 18 B、6 7 8 9 C、2 4 6 8 D、1 2 3 4 118、以下程序的运行结果是(D)。 Function f(m As Integer) As Integer b = 1 Static c As Integer b = b + 1 c = c + 1 f = m * b * c End Function Private Sub Command1_Click() Dim a As Integer a = 2 Sum = 0

38、 For i = 1 To 3 Sum = Sum + f(a) Next i Print Sum End Sub A、12 B、28 C、32 D、24 119、下列程序输出结果( 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 Integer) Static S As Integer S = S + a GetValue = S End Function A、10 B、65 C、6

39、6 D、11 120、在过程定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使 用(D)关键字在过程中定义局部变量。 A、Dim B、Private C、Public D、Static 121、在过程定义中用 (C) 表示形参的传值。 A、Var B、By Def C、ByVal D、Value 122、 在在窗体上添加一个命令按钮Comma nd和两个名称分别为Labell和Label2 的标签, 然后编写如下事件过程： Private X As Integer Private Sub Command1_Click() X = 5: y = 3 Call proc(X, y

40、) = X = 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,3 B、25,6 C、5,3 D、5,6 123、 以下程序的运行结果是(C)。 Dim x As Integer, y As Integer, z As Integer Sub s1(a As Integer, b As Integer) Dim c As Integer a = 2 * a b

41、= 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 + z End Sub A、 24 28 B、 20 28 C、 20 18 D、 20 20 124、 以下关于过程及过程参数的描述中，错误的是

42、(C) 。 A、过程的参数可以是控件名称 B用数组作为过程的参数时，使用的是“传地址”方式 C只有函数过程能够将过程中处理的信息传回到调用的程序中 D窗体可以作为过程的参数 125、以下属于 Visual Basic 合法的数组元素是( C) A、x8 B、x 8 C、s(0) D、v8 126、下列叙述中正确的是 (C)。 A、在窗体的Form_Load事件过程中定义的变量是全局变量 B局部变量的作用域可以超出所定义的过程 C在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作 用域只限于该过程 D在调用过程时，所有局部变量被系统初始化为0或空字符串 127、假定有

43、以下函数过程： 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程序运行后，单

44、击命令按钮，如果在输入对 话框中输入字符串“ abcdefg ”，单击 确定 按钮后程序在窗体上输出结果(D)。 A、abcdefg B、gfedcba C、GFEDCBA D、ABCDEFG 为了方便的调用 Sort 子过程， 128、若已编写了一个 Sort 子过程， 在该工程中有多个窗体， 应该将该过程放在 (B) 。 A、窗体模块 B标准模块 C类模块 D工程 129、下面子过程语句说明合法的是( D) A、Sub f1 ( ByVal n() As Integer ) B、Function f1 (f1 As Integer ) As Integer C、Sub f1 (n() As

45、 Integer )As Integer D、Function f1 ( ByVal n As Integer)As Integer 130、在过程定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使 用(D)关键字在过程中定义局部变量。 A、Dim B、Private C、Public D、Static 131、 在窗体上画三个单选按钮，组成一个名为chkOption 的控件数组。用于标识各个控件 数组元素的参数是 (D)。 A、Tag B、Index C、ListIndex D、Name 132、假如列表框( List1 )有四个数据项，那么把数据项“ China ”添加到

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

47、不能识别键盘上某个键的按下与释放 D、KeyPress 事件中可以识别键盘上某个键的按下与释放 135、 设组合框Combo仲有3个项目则以下能删除最后一项的语句是(B)。 A、Text B、2 C、3 D、 136、下列控件中，没有 Caption 属性的是 (B)。 A、框架 B列表框 C复选框 D单选按钮 137、 引用列表框( List1 )最后一个数据项应使用的表达式是(C) A、 B、(ListCount) C、 D、(ListCount-1) 138、 窗体的 MouseDowr事件过程 Form_MouseDown(Button As Integer, Shift As Int

48、eger, X As Single, Y As Single) 有 4个参数，关于这些参数，正确的描述是 (A)。 A、通过Button参数判定当前按下的是哪一个鼠标键 B、Shift 参数只能用来确定是否按下 Shift 键 C、Shift 参数只能用来确定是否按下 Alt 和 Ctrl 键 D参数x,y用来设置鼠标当前位置的坐标 139、复选框的 Value 属性为 1 时，表示 (B) 。 A、复选框未被选中 B复选框被选中 C复选框内有灰色的勾 D复选框操作有错误。 140、 引用列表框的最后一项应使用(A) 。 A、 B、 C、(ListCount) D、(ListCount-1)

49、141、 设窗体上有一个列表框控件List1 ，且其中含有若干列表项。则以下能表示当前被选 中的列表项内容的是 (D) 。 A、 B、 C、 D、 142、表示滚动条控件取值范围最大值的属性是(A) 。 A、Max B、LargeChange C、Value D、Max-Min 143、为了在按下 Esc 键时执行某个命令按钮的 Click 事件过程，需要把该命令按钮的一个 属性设置为 True ，这个属性是 (D) 。 A、 Value B、Default C、Cancel D、Enabled 144、假如列表框( List1 )有四个数据项，那么把数据项“ China ”添加到列表框的最后， 应使用