VisualBasic选择题专业基础知识题库分解

1、§2专业基础知识§2.1 Visual basic程序开发环境1.以下关于VB的叙述中，错误的是BA) VB采用事件驱动的编程机制B) 如果程序中有Sub_Main过程时，则一定从该过程开始执行C) 工程文件中包含多个窗体时，可以指定启动窗体D) VB程序既可以编译执行，也可以解释执行2.在Visual Basic中，不能关闭的窗口是BA) 窗体设计器窗口B) 工程窗口C) 属性窗口D) 立即窗口3.Visual Basic集成环境由若干窗口组成，其中不能隐藏(关闭)的窗口是(A)。A) 主窗口B) 属性窗口C) 立即窗口D) 窗体窗口4.为了用键盘打开菜单和执行菜单命令，

2、第一步应按的键是(A)。A) 功能键F10或AltB) Shift功能键F4C) Ctrl或功能键F8D) CtrlAlt5.下面操作中，不能正确保存正在编辑的工程的是CA) 鼠标右键单击"工程资源管理器窗口"中该工程的图标，在弹出的菜单中选"保存工程"B) 单击"文件"菜单，在下拉菜单中选"保存工程"C) 单击"工程"菜单，在下拉菜单中选"保存工程"D) 6.在Visual Basic标准工具栏中，"菜单编辑器"的图标是CA) B) C) D) 7.以下

3、不能作为容器使用的控件是AA) 图像框B) 框架C) 图片框D) 窗体8.以下关于VB文件的叙述中，错误的是(B)。A) 标准模块文件不属于任何一个窗体B) 工程文件的扩展名为.frmC) 一个工程只有一个工程文件D) 一个工程可以有多个窗体文件9.VB中有这样一类文件：该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是(B)。A) .vbpB) .basC) .vbwD) .frm10.类模块文件的扩展名为BA) .resB) .clsC) .vbpD) .vbg11.以下叙述中正确的是(C)。A) 在属性窗口只能设置窗体的属性B) 在属性窗口只能设置控件的属性C) 在属性窗口

4、可以设置窗体和控件的属性D) 在属性窗口可以设置任何对象的属性12.如果在Visual Basic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是(D)。A) 用鼠标双击窗体的任何部位B) 执行"工程"菜单中的"属性窗口"命令C) 按CtrlF4键D) 按F4键13.在编辑VB应用程序时，如果不小心关闭了属性窗口，则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口，这个按钮的图标是DA) B) C) D) 14.下列打开"代码窗口"的操作中错误的是(A)。A) 按F4键B) 单击"工程资源管理器"窗口中

5、的"查看代码"按钮C) 双击已建立好的控件D) 执行"视图"菜单中的"代码窗口"命令15.如果要在窗体上画一个标签，应在工具箱窗口中选择的图标是(B)。A) B) C) D) 16.为了在窗体上画一个文件列表框，应先在工具箱窗口中选中的图标是CA) B) C) D) §2.2 对象及其操作1.下面不属于对象基本特点的是BA) 标识唯一性B) 可复用性C) 多态性D) 封装性2.以下关于VB对象属性的叙述中，错误的是BA) 属性是对象的特征B) 对象的所有属性值都可以在属性窗口中设置C) 不同对象可以具有同名的属性D) 对象的

6、某些属性可以在程序中设置3.以下操作中，不能改变窗体大小的是CA) 设计阶段，在"属性"窗口设置相应属性B) 运行阶段，用赋值语句修改相应属性C) 运行阶段，调用窗体的Show方法D) 运行阶段，调用窗体的Move方法4.以下关于事件、事件驱动的叙述中，错误的是(C)。A) 事件是可以由窗体或控件识别的操作B) 事件可以由用户的动作触发C) 一个操作动作只能触发一个事件D) 事件可以由系统的某个状态的变化而触发5.在面向对象的程序设计中，可被对象识别的动作称为(B)。A) 方法B) 事件C) 过程D) 函数6.以下关于VB特点的叙述中，错误的是(C)。A) VB中一个对象可

7、有多个事件过程B) VB应用程序能以编译方式运行C) VB应用程序从Form_Load事件过程开始执行D) 在VB应用程序中往往通过引发某个事件导致对对象的操作7.以下关于VB的叙述中，错误的是(D)。A) VB采用事件驱动方式运行B) VB既能以解释方式运行，也能以编译方式运行C) VB程序代码中，过程的书写顺序及执行顺序无关D) VB中一个对象对应一个事件8.以下关于方法的叙述中，错误的是AA) 在调用方法时，对象名称是必不可缺少的B) 方法是一种特殊的过程或函数C) 不同对象的方法可以同名D) 方法可以带有参数9.以下叙述中错误的是(C)。A) Visual Basic 是事件驱动型可视

8、化编程工具B) Visual Basic应用程序不具有明显的开始和结束语句C) Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性D) Visual Basic中控件的某些属性只能在运行时设置10.设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下：窗体Form1中的程序如下：Dim Flag As BooleanPrivate Sub Form_Load()FlagTrueEnd SubPrivate Sub mnu1_Click(index As Integer)If Index1 ThenIf FlagTru

9、e ThenForm2.showmnu1(1).Caption"隐藏窗体2"FlagFalseElseForm2.Hidemnu1(1).Caption"显示窗体2"FlagTrueEnd IfEnd IfIf Index2 Then EndEnd Sub关于上述程序，以下叙述中错误的是(D)。A) Index属性的值可以用来区分控件数组元素B) Index为1的菜单项的标题可能会改变C) 两个名称均为Mnu1的菜单项构成一个控件数组D) 语句Form2.Hide将Form2卸载11.设窗体、框架、图片框（PictureBox）、图像框（Image）的名

10、称分别是Form1、Frame1、Picture1、Image1，有下面4条语句： Form1.Print "VB" Frame1.Print "VB" Picture1.Print "VB" Image1.Print "VB"其中正确的是CA) 和B) 和C) 和D) 和12.在设计窗体时双击窗体的任何地方，可以打开的窗口是(A)。A) 代码窗口B) 属性窗口C) 工程资源管理器窗口D) 工具箱窗口13.为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(B)。A) 1B) 2C) 3D) 41

11、4.为了使窗体左上角不显示控制框，需设置为False的属性是(C)。A) VisibleB) EnabledC) ControlBoxD) Caption15.假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是(A)。A) 单击窗体上没有控件的地方B) 单击任意一个控件C) 双击任意一个控件D) 单击属性窗口的标题栏16.设窗体名称为frmTest，为了在程序代码中将窗体的标题改为"等级考试"，其代码应该是AA) frmTest.Caption = "等级考试"B) Form1.Caption = "

12、;等级考试"C) frmTest.Title = "等级考试"D) Form1.Title = "等级考试"17.为了在运行时能显示窗体左上角的控制框（即系统菜单），应执行的操作是BA) 把窗体的ControlBox属性设置为False，其他属性任意B) 把窗体的ControlBox属性设置为True，并且把BorderStyle属性设置为1到5中的一个数C) 把窗体的ControlBox属性设置为True，并且把BorderStyle属性设置为0D) 把窗体的ControlBox属性设置为Fale，并且把BorderStyle属性设置为1到5

13、中的一个数18.为了通过属性窗口设置窗体的ControlBox属性值，下列正确的操作是DA) 直接键入True或FalseB) 利用弹出的对话框设置属性值C) 选择ControlBox，然后按回车键D) 双击ControlBox属性条19.以下关于窗体的叙述中，错误的是AA) 执行Unload Form1语句后，窗体Form1被隐藏，但仍在内存中B) 当窗体的Enabled属性为False时，窗体不响应鼠标、键盘的操作C) 当窗体的KeyPreview属性为True时，则窗体能优先响应键盘事件D) 窗体的Load事件在加载窗体时触发20.对于窗体而言，在运行期间对其值改变无效的属性是DA) C

14、aptionB) EnabledC) AutoRedrawD) BorderStyle21.下列描述中错误的是DA) 窗体是对象B) 窗体必须有Name属性C) 窗体可以拖放和移动D) 在设计阶段双击一个控件可以打开属性窗口22.窗体上有三个水平滚动条，名称分别为HSRed、HSGreen和HSBlue，取值范围均是0255，代表颜色的三种基色。改变滚动框的位置，可以改变三种基色的值，从而改变窗体的背景色，如下图所示。程序代码如下：Dim color(3)As IntegerPrivate Sub Form_Load()Call fill(color()End SubPrivate Sub f

15、ill(c() As Integer)Form1.BackColorRGB(c(1)，c(2)，c(3)End SubPrivate Sub HSRed_Change()color(1)HSRed.ValueCall fill(color()End SubPrivate Sub HSGreen_Change()color(2)HSGreen.ValueCall fill(color()End SubPrivate Sub HSBlue_Change()color(3)HSBlue.ValueCall fill(color()End Sub关于以上程序，如下叙述中错误的是(C)。A) color

16、是窗体级整型数组B) 改变任何一个滚动条滚动框的位置，窗体的背景色将立刻随之改变C) 3个滚动条Change事件过程中只设置了一个color数组元素的值，调用fill过程失败D) fill 函数定义中的形式参数是数组型参数23.在程序运行时，下面的叙述中正确的是(C)。A) 用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_Load事件过程B) 用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程C) 只装入而不显示窗体，也会执行窗体的Form_Load事件过程D) 装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程24.设窗体的名称为Form1，标

17、题为Win，则窗体的MouseDown事件过程的过程名是(C)。A) Form1_MouseDownB) Win_MouseDownC) Form_MouseDown D) MouseDown_Form125.以下关于窗体的叙述中，错误的是(B)。A) Hide方法能隐藏窗体，但窗体仍在内存中B) 使用Show方法显示窗体时，一定触发Load事件C) 移动或放大窗体时，会触发Paint事件D) 双击窗体时，会触发DblClick事件26.若要把一个窗体从内存中删除，应该使用的方法是AA) UnLoadB) HideC) LoadD) Show27.在程序运行时，不会引发窗体Resize事件的操

18、作是CA) 使用了窗体的"还原"按钮B) 使用Move方法改变了窗体的大小C) 使用Move方法改变了窗体的位置D) 通过鼠标拖动边框调整了窗体的大小28.下面不响应键盘事件的对象是DA) 窗体B) 按钮C) 复选框D) 标签29.编写如下程序：Private Sub Form_Click()Print "Welcome！"End SubPrivate Sub Form_MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single)Print "欢迎！"

19、End SubPrivate Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single)Print "热烈欢迎！"End Sub程序运行后，单击窗体，输出结果为(A)。A) 欢迎！热烈欢迎！Welcome!B) 欢迎！Welcome！热烈欢迎！C) Welcome！欢迎！热烈欢迎！D) Welcome！热烈欢迎！欢迎！30.下列叙述中，错误的是AA) 控件数组元素的下标不能重复，且必须是连续的B) 控件数组中所有元素的类型必须是相同的C) 窗体的Load事件发生在所有因用户操

20、作而引发的事件之前D) 一个窗体中，只能有一个命令按钮的Cancel属性被设置为True31.在Visual Basic中，所有标准控件都具有的属性是(B)。A) CaptionB) NameC) TextD) Value32.为了把ActiveX控件加到工具箱中，首先应采取的操作是AA) 执行"工程"菜单中的"部件"命令B) 执行"视图"菜单中的"工具箱"命令C) 执行"工具"菜单中的"选项"命令D) 执行"工程"菜单中的"引用"命令

21、33.能够用于标识对象名称的属性是(A)。A) NameB) CaptionC) ValueD) Text34.假定窗体上有一个名称为txtMac 的文本框，则执行语句 txtMac = "MyText"后的结果为BA) 把字符串"MyText"存入变量txtMac中B) 在文本框txtMac中显示字符串"MyText"C) 把文本框txtMac的Name属性设置为MyTextD) 把文本框txtMac的Value属性设置为MyText35.Visual Basic为每种控件规定了一个默认属性，在设置默认属性时，不必给出属性名。下列控

22、件中默认属性为Text的控件是BA) 框架（Frame）B) 组合框（ComboBox）C) 标签（Label）D) 形状（Shape）36.编写如下程序：Private Sub Command1_Click() Dim i As Integer, n As Integer Dim arr() As Integer n = InputBox("请输入数值：") ReDim arr(n) For i = 1 To UBound(arr) arr(i) = i Next For i = 1 To UBound(arr) 2 temp = arr(i)arr(i) = arr(n

23、 - i + 1) arr(n - i + 1) = temp Next For i = 1 To UBound(arr) Print arr(i); NextEnd Sub程序运行后，单击命令按钮Command1，并在输入对话框中输入7，输出结果为AA) 7 6 5 4 3 2 1B) 1 2 3 4 5 6 7C) 3 2 1 4 7 6 5D) 4 3 2 1 5 6 737.编写如下程序：Private Sub Command1_Click() Dim a As Integer, i As Integera = 2 For i = 1 To 3 Print fun_s(a); Next

24、 iEnd SubFunction fun_s(a As Integer) As Integer Dim b As Integer Static c As Integer a = a + 1 b = b + 1 c = c + 1 fun_s = a + b + cEnd Function程序运行后，单击命令按钮Command1，输出结果为CA) 4 5 6B) 5 6 7C) 5 7 9D) 4 6 838.默认属性是某种控件最常用或最重要的属性，在Visual Basic中设置这样的属性时，不必给出属性名。下列中默认属性不是Value的控件是DA) 垂直滚动条（VscrollBar）B)

25、复选框（CheckBox）C) 命令按钮（CommandButton）D) 列表框（ListBox）39.窗体上有一个名称为Combo1的组合框，引用Combo1中最后一个列表项应使用的表达式是AA) Combo1.List(Combo1.ListCount - 1)B) Combo1.List(ListCount)C) Combo1.List(ListCount - 1)D) Combo1.List(Combo1.ListCount)40.在窗体上添加"控件"的正确的操作方式是(C)。A) 先单击工具箱中的控件图标，再单击窗体上适当位置B) 先单击工具箱中的控件图标，再双

26、击窗体上适当位置C) 直接双击工具箱中的控件图标，该控件将出现在窗体上D) 直接将工具箱中的控件图标拖动到窗体上适当位置41.为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是(A)。A) 按住Alt键，不要松开，然后单击每个要选中的控件B) 按住Shift键，不要松开，然后单击每个要选中的控件C) 按住Ctrl键，不要松开，然后单击每个要选中的控件D) 拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内42.以下叙述中错误的是(D)。A) 在通用过程中，多个形式参数之间可以用逗号作为分隔符B) 在Print方法中，多个输出项之间可以用逗号作为分隔符C) 在Dim语句中

27、，所定义的多个变量可以用逗号作为分隔符D) 当一行中有多个语句时，可以用逗号作为分隔符43.以下叙述中错误的是(C)。A) 续行符及它前面的字符之间至少要有一个空格B) Visual Basic中使用的续行符为下划线(_)C) 以撇号()开头的注释语句可以放在续行符的后面D) Visual Basic可以自动对输入的内容进行语法检查44.下列有语法错误的赋值语句是(D)。A) y79B) smnC) Text1.Text10D) mn1245.设程序中分别将a、b、c、d定义为布尔型、整型、字符串型、日期型变量，下列赋值语句错误的是AA) a= #True#B) b=4.6C) c=5 &am

28、p; 10D) d=#2013/01/01#46.以下叙述中错误的是AA) 事件过程可以像通用过程一样由用户指定过程名B) 在Sub过程中可以调用其它过程C) 在Sub过程中不能定义其它过程D) 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型47.输入Visual Basic源程序时，若一个命令行中包含两个语句，则两个语句之间的分隔符应使用AA) 冒号（:）B) 分号（;）C) 下划线（_）D) 连字符（-）48.Visual Basic源程序的续行符为CA) 冒号（:）B) 分号（;）C) 下划线（_）D) 连字符（-）49.下列打开"代码窗口"

29、;的操作中错误的是(A)。A) 按F4键B) 单击"工程资源管理器"窗口中的"查看代码"按钮C) 双击已建立好的控件D) 执行"视图"菜单中的"代码窗口"命令50.设计窗体时，双击窗体上没有控件的地方，打开的窗口是(A)。A) 代码窗口B) 属性窗口C) 工具箱窗口D) 工程窗口51.以下叙述中，错误的是BA) 标准模块不属于任何一个窗体B) 工程文件的扩展名为.vbgC) 窗体文件的扩展名为.frmD) 一个应用程序可以有多个窗体52.在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是

30、(D)。A) B) C) D) 53.在Visual Basic环境下设计应用程序时，系统能自动检查出的错误是(A)。A) 语法错误B) 逻辑错误C) 逻辑错误和语法错误D) 运行错误54.下面关于VB应用程序的叙述中正确的是CA) VB应用程序只能解释运行B) VB应用程序只能编译运行C) VB应用程序既能解释运行，也能编译运行D) VB应用程序必须先编译，然后解释运行55.以下关于VB的叙述中，错误的是AA) VB的窗体模块只包含由控件组成的窗体B) 在VB集成开发环境中，既可以运行程序，也可以调试程序C) VB采用事件驱动的编程机制D) VB程序可以编译为.exe文件56.以下关于VB的

31、叙述中，错误的是BA) VB采用事件驱动的编程机制B) 如果程序中有Sub_Main过程时，则一定从该过程开始执行C) 工程文件中包含多个窗体时，可以指定启动窗体D) VB程序既可以编译执行，也可以解释执行57.能够被窗体或控件所识别的操作称为AA) 事件B) 方法C) 过程D) 属性§2.3 程序设计基础1.下面为单精度实型（即单精度浮点型）变量的是CA) x$B) x&C) x!D) x#2.为了建立随机文件，要求文件的每条记录应包含多个不同数据类型的数据项，则记录应使用的数据类型是AA) 记录类型B) 字符串类型C) 字符串数组D) 变体类型3.长整型常数的类型说明符为

32、CA) %B) #C) &D) 4.双精度浮点数的类型说明符为BA) %B) #C) &D) 5.VB变量x! 的数据类型是AA) 单精度类型B) 字符串类型C) 整型D) 双精度类型6.如果在程序中直接使用了没有声明的变量，则它的数据类型是DA) 字符串型B) 整型C) 逻辑型D) 变体型7.若在窗体模块的声明部分声明了如下自定义类型和数组：Private Type rec Code As Integer Caption As StringEnd TypeDim arr(5)As rec则下面的输出语句中正确的是(C)。A) Print arr.Code(2)， arr.Ca

33、ption(2)B) Print arr.Code， arr.CaptionC) Print arr(2).Code， arr(2).CaptionD) Print Code(2)， Caption(2)8.以下自定义数据类型的语句中，正确的是(B)。A) Type studentID As String * 20 name As String * 10 age As IntegerEnd studentB) Type student ID As String * 20 name As String * 10 age As IntegerEnd TypeC) Type studentID As

34、 String name As String age As IntegerEnd studentD) Type ID As String * 20 name As String * 10 age As IntegerEnd Type student9.设有以下定义语句：Private Type point x As Integer y As Integer End Type Dim a As point下面语句中正确的是BA) a = 12B) a.x = 12C) point = 12D) point.x = 1210.以下能正确定义数据类型TelBook的代码是AA) Type TelBo

35、ok Name As String*10 TelNum As Integer End TypeB) Type TelBook Name As String*10 TelNum As Integer End TelBookC) Type TelBook Name String*10 TelNum Integer End Type TelBookD) Typedef TelBook Name String*10 TelNum Integer End Type11.某人在窗体模块中定义了如下自定义类型：Type Rec num As Integer name As StringEnd Type但发现

36、程序不能运行，关于这一问题，下面叙述中正确的是DA) 自定义类型不能写在窗体模块中B) 自定义类型只能写在标准模块中C) 在Type Rec 前面添加关键字Public就可解决问题D) 在Type Rec 前面添加关键字Private就可解决问题12.设有下面的类型和变量定义，Private Type Rec name As String score(5) As IntegerEnd TypeDim student As Rec则下面正确的语句是BA) student = "张三"B) student.score(2) = 75C) student(3).score = 6

37、9D) score(4) = 7713.窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：Private Type xa As Integerb As IntegerEnd TypePrivate Sub Command1_Click()Dim y As xy.aInputBox("")If y.a2y.a / 2 Theny.by.a * y.aElsey.bFix(y.a / 2)End IfText1.Texty.bEnd Sub 对以上程序，下列叙述中错误的是(D)。A) x是用户定义的类型B) InputBox函数弹出

38、的对话框中没有提示信息C) 若输入的是偶数，y.b的值为该偶数的平方D) Fix(y.a / 2)把y.a / 2的小数部分四舍五入，转换为整数返回14.下列符号常量的声明中不合法的是CA) Const a As Single = 3.5B) Const a As Double = 5+8C) Const a As Integer = "25"D) Const a = "OK"15.窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。现有如下程序：Public Sub display(x As Control)If

39、 TypeOf x Is Label Thenx Caption"计算机等级考试"ElsexPictureLoadPicture("pic.jpg")End IfEnd SubPrivate Sub Label1_Click()Call display(Label1)End SubPrivate Sub Picture1_Click()Call display(Picture1)End Sub对以上程序，下列叙述中错误的是(A)。A) 程序运行时会出错B) 单击图片框，在图片框中显示一幅图片C) 过程中的x是控件变量D) 单击标签，在标签中显示一串文字1

40、6.以下变量名中合法的是(C)。A) x21B) printC) str_nD) 2x17.以下选项中，不合法的Visual Basic的变量名是(B)。A) a5bB) _xyzC) a_bD) andif18.以下变量名中合法的是(C)。A) x2B) 12abcC) sum_totalD) print19.以下合法的VB变量名是(D)。A) #_1B) 123_aC) stringD) x_12320.以下合法的VB变量名是(D)。A) _xB) 2yC) a#bD) x_1_x21.下列合法的变量名是(B)。A) sumaB) num_9C) print$D) 5avg22.以下合法的

41、VB变量名是BA) _aB) yPrintC) a-bD) Type23.以下不合法的VB变量名是CA) B) readC) _yD) e524.下面变量定义中错误的是AA) Public mod As IntegerB) Static bufC) Dim ch As String * 10D) Dim a!(-5 To -1)25.下列说法中，错误的是BA) 变量名长度不能超过255个字符B) 变量名的第一个字符可以是字母或数字C) 变量名只能由字母、数字和下划线组成D) 变量名不能使用保留字26.下列说法中，错误的是AA) 变量名长度不能超过127个字符B) 变量名的第一个字符必须是字母C

42、) 变量名不能使用保留字D) 变量名只能由字母、数字和下划线组成27.以下可作为Visual Basic合法变量名的是BA) A3#1B) BasicC) TabD) D%328.以下合法的VB变量名是AA) x_yB) PrintC) _bD) m-n29.以下合法的VB变量名是AA) x_B) 3xC) var nameD) print30.为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为(C)。A) Dim pi As IntegerB) Dim pi(7)As IntegerC) Dim pi As SingleD) Dim pi As Long31.下面程序运行

43、时，若输入 395 ，则输出结果是(B)。Private Sub Command1_Click()Dim x%xInputBox("请输入一个3位整数")Print x Mod 10，x100，(x Mod 100)10End SubA) 395B) 539C) 593D) 35932.设窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa%100Print aEnd Sub其中变量a和s的数据类型分别是(C)。A) 整型，整型B) 变体型，变体型C) 整型，变体型D) 变体型，整型33.执行语句 DimX， YAsInteger

44、 后(D)。A) X和Y均被定义为整型变量B) X和Y均被定义为变体类型变量C) X被定义为整型变量，Y被定义为变体类型变量D) X被定义为变体类型变量，Y被定义为整型变量34.某人编写了向随机文件中写一条记录的程序，代码如下：Type RTypeName As String * 10Tel As String * 20End TypePrivate Sub Command1_Click()Dim p As RTypep.NameInputBox("姓名")p.TelInputBox("电话号")Open "Books.dat" Fo

45、r Random As #1Put #1， ， pClose #1End Sub该程序运行时有错误，修改的方法是()。A)在类型定义"Type RType"之前加上"Private"B)Dim p As RType必须置于窗体模块的声明部分C)应把Open语句中的For Random 改为 For OutputD)Put语句应该写为Put #1，p.Name ， p.Tel(36)有如下程序：Private Sub Form_Click()Dim s As Integer， p As Integerp1For i1 To 4For j1 To issjN

46、ext jpp * sNext iPrint pEnd Sub程序运行后，单击窗体，则输出结果是(A)。A) 在类型定义"Type RType"之前加上"Private"B) Dim p As RType必须置于窗体模块的声明部分C) 应把Open语句中的For Random 改为 For OutputD) Put语句应该写为Put #1，p.Name ， p.Tel35.有如下数据定义语句：Dim X，Y As Integer以上语句表明(C)。A) X、Y均是整型变量B) X是整型变量，Y是变体类型变量C) X是变体类型变量，Y是整型变量D) X是整

47、型变量，Y是字符型变量36.为了声明一个长度为128个字符的定长字符串变量StrD，以下语句中正确的是(D)。A) Dim StrD As StringB) Dim StrD As String(128)C) Dim StrD As String128D) Dim StrD As String*12837.有如下数据定义语句：Dim a, b As Integer Dim x%, y as Integer执行上述语句后，不是整型变量的是AA) aB) bC) xD) y38.语句 x = x + 1 的正确含义是CA) 变量x 的值等于表达式 x + 1 的值B) 将变量x 的值存放到变量 x

48、 + 1 中C) 将变量x 的值加1后赋予变量 xD) 将变量" x + 1" 的值存放到变量x中39.有如下程序代码：Private Sub Form_Click () Dim a As Integer a = 2 Sum = 0 For i = 1 To 3 Sum = Sum + f(a) Next i Print SumEnd SubFunction f(m As Integer) As Integer Static b As Integer b = b + 1 f = m * bEnd Function运行程序，单击窗体后，窗体上显示的是AA) 12B) 3C)

49、6D) 940.编写如下程序：Private Sub Command1_Click() Static x As Integer If x Then x = x + 10 Else x = x + 1 Print xEnd Sub程序运行后，第三次单击命令按钮Command1时，输出的结果为DA) 1B) 3C) 10D) 2141.对于语句Dim Var1, Var2 As String * 10，下列说法中正确的是DA) Var1和Var2都被定义为定长字符串变量B) Var1被定义为变长字符串变量，Var2被定义为定长字符串变量C) Var1被定义为定长字符串变量，Var2被定义为变长字符

50、串变量D) Var1被定义为变体变量42.对于语句Dim Var1#, Var2 As Integer，下列说法中正确的是BA) Var1#和Var2都被定义为整型变量B) Var1被定义为双精度型变量，Var2被定义为整型变量C) Var1被定义为长整型变量，Var2被定义为整型变量D) Var1#被定义为变体变量，Var2被定义为整型变量43.编写如下程序：Private Sub Command1_Click() Dim a%, b%, c% a = 8: b = 3 Do c = a - b Print c; a = b: b = c Loop Until Abs(c) > 10End Sub