大学vb考试题库2

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

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

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

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

5、磁盘文件。D 、一个工程默认的启动对象是Form113 、 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、将控件的 TabIndex属性设置为 0B 、将控件的

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

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

8、个属性是 (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语句后，窗体F

9、orm1 消失，但仍在内存中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 、从

10、主程序开始执行D 、按模块顺序执行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 、事件可以

11、由用户引发，也可以由系统引发30 、以下叙述中错误的是(B) 。A、双击鼠标可以触发DblClick事件B 、窗体或控件的事件的名称可以由编程人员确定C 、移动鼠标时，会触发 MouseMove 事件D 、控件的名称可以由编程人员设定31 、在 Visual Basic 中最基本的对象是 (C) 。它是应用程序的基石，是其他控件的容器。A、文本框B 、命令按钮C 、窗体D 、标签32 、以下叙述中正确的是(A) 。A、窗体的Name 属性指定窗体的名称，用来标识一个窗体B 、窗体的 Name 属性的值是显示在窗体标题栏中的文本C 、可以在运行期间改变对象的Name 属性的值-D 、对象的 Na

12、me 属性值可以为空33 、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 (C) 。A、工程资源管理器窗口B 、工具箱窗口C 、代码窗口D 、属性窗口34 、 Visual Basic 是一种面向对象的可视化程序设计语言，采取了的编程机制是 (A) 。A、事件驱动B 、按过程顺序执行C 、从主程序开始执行D 、按模块顺序执行35 、用来设置粗体字的属性是(C) 。A、 FontItalicB 、 FontNameC 、FontBoldD 、 FontSize36 、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是 (A) 。A、如果工程中含有Sub Main过程，则程序一定首先

13、执行该过程B 、不能把标准模块设置为启动模块C 、用 Hide 方法只是隐藏一个窗体，不能从内存中清除该窗体D 、任何时刻最多只有一个窗体是活动窗体37、为了把焦点移到文本框，所使用的方法是(A) 。A、 SetFocusB 、 VisibleC 、RefreshD 、GetFocus38、 INT （ 100*RND）产生的随机整数的闭区间是（A ）。A、 0 ， 99B 、 1 ，100C、0 ， 100D 、 1 ，9939、如果要在命令按钮上显示图形文件，应设置命令按钮的(B) 。A、 Style属性和 Graphics属性 B 、 Style属性和 Picture-属性C 、Capt

14、ion属性D 、Graphics属性40 、若要使命令按钮不可操作，要对(A) 属性进行设制。A、 EnabledB 、 VisibleC 、BackColorD 、Caption41 、假定窗体的名称为Form1,则把窗体的标题设置为“VB_Test ”的语句为 (B) 。A、 Form1=“ VB_Test ”B、Form1.Caption=“VB_Test ”C 、Form1.Text=“ VB_Test ” D、F=“VB_Test ”42 、以下叙述中错误的是(A) 。A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件B 、以 .BAS 为扩展名的

15、文件是标准模块文件C 、窗体文件包含该窗体及其控件的属性D 、一个工程中可以含有多个标准模块文件43 、要使文本框获得输入焦点， 则应采用文本框控件的哪个方法 (A) 。A、 GotFocusB 、 LostFocusC 、KeyPressD 、 SetFocus44 、以下不能在“工程资源管理器”窗口中列出的文件类型是(B) 。A、 .basB 、.resC 、 .frmD 、 .ocx45 、刚建立一个新的标准 EXE 工程后，不在工具箱中出现的控件是 (C) 。A、单选按钮B 、图片框C、通用对话框D 、文本框46 、以下叙述中错误的是(B) 。-A、双击鼠标可以触发DblClick事件

16、B 、窗体或控件的事件的名称可以由编程人员确定C 、移动鼠标时，会触发 MouseMove 事件D 、控件的名称可以由编程人员设定47 、以下能够触发文本框Change事件的操作是 (D) 。A、文本框失去焦点B 、文本框获得焦点C 、设置文本框的焦点D 、改变文本框的内容48 、以下叙述中错误的是(C)。A、一个工程中只能有一个Sub Main过程B 、窗体的 Show 方法的作用是将指定的窗体装入内存并显示该窗体C 、窗体的 Hide 方法和 Unload方法的作用完全相同D 、若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体49 、语句 Print Abs(-62)+Int(-

17、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 、语句 Print Format( “Hello World ” , “>” )的输出结果是 (C) 。A、 hello WORLDB 、 hello worldC 、HELL

18、O WORLDD 、 HELLO world-53、声明符号常量应该用关键字(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 、 constA56、设 a=10 ，b=5 ，c=1 ，执行语句 Print a > b > c后，窗体上显

19、示的是 (B) 。A、 TrueB 、 FalseC 、 1D 、出错信息57、执行 x$=String(6, "124abc")后， x 的值是 (B) 。A、 124abcB 、111111C、124D 、abc58、设 a=6 ，则执行 x=IIf(a>5,-1,0)后， x 的值为（ D ）A、 5B 、 6C、 0D 、-159 、执行语句：c$= “ Glad ” &Mid$( “ Nice tomeetyou ” ,5,3) ，则变量 c$ 的值为 (C)。A、 Nice to meet youB 、 Glad Nice to meet youC

20、 、Glad toD 、Glad60、下面 (D) 是合法的字符常数。A、 ABC$B、" ABC"C、' ABC'D、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 、在一行内写多条语句时，每个

21、语句之间用(B) 符号分隔。A、，B、：C、D 、；64 、从键盘上输入两个字符串，分别保存在变量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 Basi

22、c中的变量名的是 (A)。A、 FilenameB 、 A(A+B)C 、 254DD、Print67 、下面 (A) 是合法的变量名。A、 X_yzB 、 123abcC 、 IntegerD、X-Y68 、以下变量命名非法的是（C ）。A、 xyz123B 、 printaaC 、 booleanD、Bernald69 、 设 有 变 量 声 明 :DimTestDate AsDate, 为 变 量TestDate 正确赋值的表达方式是(A) 。A、 TextDate=#1/1/2002#B 、TestDate=#“ 1/1/2002” #C 、TextDate=date( “ 1/1/2

23、002”)D 、TestDate=Format(“m/d/yy” , “1/1/2002” )70 、设 a=2,b=3,c=4,d=5，表达式 a>b AND c<=d的值是-(B) 。A、 TrueB 、 FalseC、 -1D 、 171、表达式 6*8 Mod 9的值是 (B) 。A、 4B 、 3C、 6D 、 772、 假设变量 bool_x 是一个布尔型 (逻辑型 )的变量，则下面正确的赋值语句是（ D ）A、 bool_x = "False"B 、 bool_x = .False.C 、bool_x = #False#D 、bool_x = Fa

24、lse73、设 a=“ Visual Basic”，下面使 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)74、语句 Print Format$(32548.5,“ #,#.#”)的输出结果是（ B ）。A、 32548.5B 、 32,548.5C、 032,548.50D 、 32,548.5075、以下声明语句中错误的是(D) 。A、 Const var1=123B 、 Dim var2 = 'ABC'C 、Dim x_y_z%D 、Static

25、var3 As Integer76、可以同时删除字符串前导和尾部空白的函数是(C)。A、 LtrimB 、 RtrimC、 TrimD、Mid77、下列可为合法变量名的是(D) 。A、 IntegerB 、 FalseC、 publicD、thanksgiving78、变量未赋值时，数值型变量的值为(A)。A、 0B 、空C 、 1D 、无任何值79、表达式 16/4-25*8/4 Mod 52的值为 (B) 。-A、 14B 、 4C、20D 、2确的 80 、下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数，不正语句是（D ）。A、 If sex="

26、;男 "And age40 And (duty="教授 "Or duty="副教授 ") Then n=n+1B 、If sex=" 男 "And age 40 And InStr(duty,"教授 ") 0Then n=n+1C 、If sex="男"And age 40 And Right(duty,2)= "教授 "Then n=n+1D 、If sex="男 "And age 40 And duty="教授 "And

27、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","Tomorrow","Yesterday","Daybefore yesterday",5), 将显示一个输入对话框， 在对话框的输入区中显示的信息是 (A)

28、。A、 TodayB 、TomorrowC 、YesterdayD 、Day before Yesterday83 、VB 提供了结构化程序设计的3 种基本结构，这3 种基本结构是（ B ）。A、递归结构，分支结构，循环结构B 、选择结构，过程结构，顺序结构C 、过程结构，输入、输出结构，转向结构-D 、分支结构，循环结构，顺序结构84 、下面 If 语句统计满足性别为男、 职称为副教授以上、 年龄小于 40 岁条件的人数，不正确的语句是（ D ）。A、 If sex= “男” And age 40 And InStr(duty,“教授” ) 0 Then n=n+1B 、If sex=“男”

29、And age 40 And (duty= “教授”Or duty= “副教授” ) Then n=n+1C 、If sex= “男” And age 40 And Right(duty,2)= “教授” Then n=n+1D 、If sex=“男”And age 40 And duty= “教授”And duty= “副教授” Then n=n+185 、当语句 w=IIf(4>10, ”Red ”,“ Green ”)执行后，变量 w 中的值是（ C ）。A、 NullB 、“ Red ”C 、“ Green ”D 、-186 、赋值语句：a=123+MID(“123456” ,3

30、,2) 执行后， a变量中的值是（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 、选择结构

31、、循环结构、顺序结构90 、下面程序段求两个数中的大数，不正确的是（D ）。A、 Max=IIf(x y,x,y)B 、If x y Then Max=x Else Max=yC 、Max=x ：If y =x Then Max=yD 、If y x Then Max=y：Max=x91 、下列程序段： Dimx If xThen Printx ElsePrint x+1 运行后，显示的结果是（A ）。A、 1B 、0C、-1D 、出错92 、以下不属于vb 的三种基本结构的是（C ）？A、顺序结构B 、选择结构C 、递归结构D 、循环结构93 、语句 If x=1 Then y=1,下列说法

32、正确的是（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 、123C 、12334D 、15795 、下面程序段显示的结果是（A）。Dim xx=Int(Rnd)+5Select CasexCase 5“优秀”Case 4Print “良好”Case 3Print “通过”Case ElsePrint “不通过”End Sel

33、ectA、优秀B 、良好C 、通过D 、不通过96 、为了给 x,y,z 这 3 个变量赋初值 1，下面正确的赋值语句是（ A）。A、 x=1 ：y=1 ： z=1-B 、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 B Print "A不等于 B"98 、设有语句x$=Inpu

34、tBox(“输入数值” ，“ 0 ”，“示例” ),程序运行后，如果从键盘上输入数值10 并按回车键，则下列叙述中正确的是(D) 。A、变量 X 的值是数值10B 、在 InputBox 对话框标题栏中显示的是“示例” C、0 是默认值D 、变量 X 的值是字符串“10 ”99 、运行下列程序段后，显示的结果为（B ） J1=4: J2=9If J1<J2 Then Print J2 Else Print J1A、 4B 、9C 、13D 、49100 、InputBox函数返回值的类型为(B) 。A、数值B 、字符串C 、变体D 、数值或字符串（视输入的数据而定）101 、一个数组说明

35、为Dim a(0 to 5，1 to 5) As Integer，则该数组共有（C）个元素。A、 25-B 、36C、30D 、不确定102 、数组声明语句 Dim a(2 to 3, -2to 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 、一个数组说明为 Dim a(5

36、，1 to 5) As Integer ，则该数组共有（ C ）个元素。A、 25B 、36C、30D 、不确定106 、在 VB 中，默认的数组下标的下界从0 开始，要想在通用声明段界定下界，则应使用（A ）。-A、 Option BaseB 、Option ExplicitC 、ExplicitD 、Low Base107 、如下数组声明语句，正确的是(B) 。A、 Dima3, 4asIntegerB 、Dima(3, 4)asIntegerC 、Dima(n, n)asIntegerD 、Dima34)asInteger108 、赋给一个数组的数据的值的类型一定要（A）。A、相同B 、

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

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

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

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

41、果是（A ）。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 ）Sub s1(b() As Integer)For i = 1 To 4b(i) = 2 * iNext i-End SubPrivate Sub Command1_Click()Dim a(1 To 4) As IntegerFor

42、i = 1 To 4a(i) = i + 5Next is1 a()For i = 1 To 4Print a(i)Next iEnd SubA、 12141618B 、6789C 、2468D 、1234118 、以下程序的运行结果是（D ）。 Function f(mAsInteger) As Integer b = 1 Static c As Integer b = b + 1 c= c + 1 f =m * b * c EndFunction PrivateSubCommand1_Click() Dim a As Integer a = 2 Sum = 0For i = 1 To 3

43、Sum = Sum + f(a) Next i Print Sum End SubA、 12B 、28C 、32D 、24119 、下列程序输出结果（C ）。Private Sub Command1_Click()For i = 1 To 10GetValue i-Next iPrint GetValue(i)End SubPrivate Function GetValue(ByVal a As Integer) StaticS As Integer S = S + aGetValue = SEnd FunctionA、 10B 、65C 、66D 、11120 、在过程定义的变量，若希望在离

44、开该过程后，还能保存过程中局部变量的值， 则应使用 (D) 关键字在过程中定义局部变量。A、 DimB 、PrivateC 、PublicD 、Static121 、在过程定义中用(C)表示形参的传值。A、 VarB 、ByDefC 、ByValD 、Value122 、在在窗体上添加一个命令按钮Command1 和两个名称分别为 Label1和 Label2的标签，然后编写如下事件过程 ：PrivateXAs IntegerPrivateSubCommand1_Click()X = 5: y = 3Call proc(X, y)Label1.Caption= XLabel2.Caption=

45、 yEndSub 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 As Integer Sub s1(a As Integer, b As Integer)Dim c As Integera = 2 * a b = b + 2 c = a + bEnd SubSub s2(a As Integer, ByVal b As Integer)Dim c As Integera = 2 * ab = b + 2c = 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、 2428B 、2028C、2018D 、2020124 、以下关于过程及过程参数的描述中，错误的是(C) 。-A、过程的