VB试题库附答案含多套试题,

《VB试题库附答案含多套试题,》由会员分享，可在线阅读，更多相关《VB试题库附答案含多套试题,（81页珍藏版）》请在装配图网上搜索。

1、.Visual Basic程序设计模拟考试(1) 在深度为5的满二叉树中，叶子结点的个数为A) 32 B) 31C) 16 D) 15B(2) 若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是A) bdgcefha B) gdbecfha C) bdgaechf D) gdbehfcaD(3) 一些重要的程序语言(如C语言和Pascal语言) 允许过程的递归调用。而实现递归调用中的存储分配通常用A) 栈B) 堆C) 数组D) 链表A(4) 软件工程的理论和技术性研究的内容主要包括软件开发技术和A) 消除软件危机B) 软件工程管理C

2、) 程序设计自动化D) 实现软件可重用B(5) 开发软件时对提高开发人员工作效率至关重要的是A) 操作系统的资源管理功能B) 先进的软件开发工具和环境C) 程序人员的数量D) 计算机的并行处理能力B(6) 在软件测试设计中，软件测试的主要目的是A) 实验性运行软件B) 证明软件正确C) 找出软件中全部错误D) 发现软件错误而执行程序D(7) 数据处理的最小单位是A) 数据B) 数据元素C) 数据项D) 数据结构C(8) 索引属于A) 模式B) 内模式C) 外模式D) 概念模式B(9) 下述关于数据库系统的叙述中正确的是A) 数据库系统减少了数据冗余B) 数据库系统避免了一切冗余C) 数据库系统

3、中数据的一致性是指数据类型一致D) 数据库系统比文件系统能管理更多的数据A(10) 数据库系统的核心是A) 数据库B) 数据库管理系统C) 模拟模型D) 软件工程B(11) 下列说法错误的是A) 窗体文件的扩展名为.frmB) 一个窗体对应一个窗体文件C) Visual Basic中的一个工程只包含一个窗体D) Visual Basic中一个工程最多可以包含255个窗体C(12) 下列四组控件属性中，属性值的类型不相同的一组是A) Label控件的Enabled属性与TextBox控件的Enabled属性B) OptionButton控件的Value属性与CheckBox控件的Value属性C

4、) Command控件的Default属性与Command控件的Cancel属性D) Command控件的Visible属性与Form控件的Visible属性B(13) 下列方法中不能退出Visual Basic的是A) 按Alt+Q组合键B) 按下Alt+F组合键，然后按Esc键C) 打开文件菜单，执行退出命令D) 按F10键，然后按F键，再按X键B(14) 任何控件都有的属性是A) BackColor B) CaptionC) Name D) BorderStyleC(15) 可以实现从键盘输入一个作为双精度变量a的值的语句是A) a=InputBox() B) a=InputBox(请输

5、入一个值) C) a=Val(InputBox(请输入一个值) ) D) a=Val(InputBox() ) C(16) 下列符号常量的声明中，不合法的是A) Const a As Single=1.1 B) Const a=OKC) Const a As Double=Sin(1) D) Const a As Integer=12C(17) 在Visual Basic中，要强制用户对所用的变量进行显式声明，这可以在哪里设置A) 属性对话框B) 程序代码窗口C) 选项对话框D) 对象浏览器C(18) 下列语句中，获得列表框List1中项目个数的语句是A) x=List1.ListCount

6、B) x=ListCountC) x=List1.ListIndex D) x=ListIndexA(19) 要获得当前驱动器应使用驱动器列表框的属性是A) Path B) DriveC) Dir D) PatternB(20) 如果将文本框的MaxLength属性设置为0，则文本框中的字符不能超过A) 8K B) 16KC) 32K D) 64KC(21) 当在滚动条内拖动滚动块时触发A) KeyUp事件B) KeyPress事件C) Scroll事件D) Change事件C(22) 设有声明语句Dim b(-1 To 10, 2 To 9, 20) As Integer则数组b中全部元素的

7、个数A) 2310 B) 2016C) 1500 D) 1658B(23) 设在窗体上有个文本框，然后编写如下的事件过程：Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt) 0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text=BBBBB End IfEnd Sub上述程序运行后，如果按【Shift+F2】，则在文本框中显示得是A)

8、 Alt+F2 B) BBBBBC) 随机出几个数D) 文本框平均内容无变化D(24) 设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其可见属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是A) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button=2 Then PopupMenu Bs, 2 End SubB) Private Sub Form_MouseDown(Button As Integer, Shif

9、t As Integer, _ X As Single, Y As Single) PopupMenu Bs End SubC) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bs,0 End SubD) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If (Button=vbLeftButton) O

10、r (Button=vbRightButton) Then PopupMenu Bs End SubA(25) 下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按Cancel键退出对话框，则Private Sub Command1_Click() CommonDialog1.CancelError=True CommonDialog1.Flags=cdlCFEffects Or cdlDFBoth CommonDialog1.Action=4 CommonDialog1.ShowFont Text1.Font.Name=CommonDialog1.FontName Tex

11、t1.Font.Size=CommonDialog1.FontSize Text1.Font.Bold=CommonDialog1.FontBold Text1.Font.Italic=CommonDialog1.FontItalic Text1.Font.Underline=CommonDialog1.FontUnderline Text1.FontStrikethru=CommonDialog1.FontStrikethru Text1.ForeColor=CommonDialog1.ColorEnd SubA) Text1的字体不发生变化B) Text1的字体发生变化C) Text1的字

12、体和颜色发生变化D) 程序出错！D(26) 要将名为MyForm的窗体显示出来，正确的使用方法是A) MyForm.Show B) Show.MyFormC) MyForm Load D) MyForm ShowA(27) 下列程序段的执行结果为a=5For k=1 To 0 a=a + kNext kPrint k; aA) -1 6 B) -1 16C) 1 5 D) 11 21C(28) 下列程序段的执行结果为a=3b=1For I=1 To 3 f=a + b a=b b=f Print fNext IA) 4 3 6B) 4 5 9C) 6 3 4 D) 7 2 8B(29) 下列程

13、序段的执行结果为I=9x=5Do I=I + 1 x=x + 2Loop Until I =7Print I=; IPrint x=; xA) I4x5 B) I7x15C) I6x8 D) I10x7D(30) 以下程序段运行时从键盘上输入字符-，则输出结果为op$=InputBox(op=) If op$=+ Then a=a + 2If op$=- Then a=a - 2Print aA) 2B) -2C) 0D) +2B(31) 以下程序段的输出结果为Dim l, a(10) , p(3) k=5For i=0 To 10 a(i) =iNext iFor i=0 To 2 p(i)

14、 =a(i (i + 1) ) Next iFor i=0 To 2 k=k + p(i) 2Next iPrint kA) 20 B) 21C) 56 D) 32B(32) 下列程序的执行结果为Private Sub Command1_Click() Dim x As Integer, y As Integer x=12: y=20 Call Value(x, y) Print x; yEnd SubPrivate Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; nEnd SubA) 20

15、 12 20 15 B) 12 20 12 25C) 24 15 12 20 D) 24 12 12 15C(33) 在窗体上画一个命令按钮，然后编写下列程序Private Sub Command3_Click() Tcl 2 Tcl 3 Tcl 4End SubSub Tcl(a As Integer) Static x As Integer x=x + a Print x;End Sub程序运行后，单击命令按钮，输出结果为A) 2 3 4 B) 2 5 9C) 3 5 4 D) 2 4 3B(34) 下面程序段，运行后的结果是Private Sub Command1_Click() Dim

16、 b%(1 To 4) , i%, t* For i=1 To 4 b(i) =i Next i t=Tof(b() ) Print t=; t,End SubFunction Tof(a() As Integer) Dim t*, i% t=1 For i=2 To UBound(A) t=t * a(i) Next i Tof=tEnd FunctionA) t18B) t24C) t30D) t32B(35) 单击按钮时，以下程序运行后的输出结果是Private Sub Command1_Click() Dim x As Integer, y As Integer, z As Integ

17、er x=1: y=2: z=3 Call God(x, x, z) Print x; x; z Call God(x, y, y) Print x; y; yEnd SubPrivate Sub God(x As Integer, y As Integer, z As Integer) x=3 * z + 1 y=2 * z z=x + yEnd SubA) 6 6 12 7 11 11B) 8 5 10 5 11 11C) 9 6 12 9 10 15D) 8 10 10 5 9 10A 一: 单项选择题A1: 当事件发生时，对象识别并响应事件，执行事件对应的程序代码，这样的编程机制称为_

18、。A事件驱动编程机制B面向对象方法C过程化编程方法D可视化程序设计方法C2: 下列不能打开属性窗口的操作是_。（A）执行菜单中“视图属性窗口”命令（B）按F4键（C）双击窗体（D）单击工具栏中的“属性窗口”按钮D3:当文本框获得焦点时，将触发文本框控件的_事件。（A）SetFocus（B）LostFocus（C）KeyPress（D）GotFocusB4: 以下不属于Visual Basic应用程序文件类型的是_。（A）.frm（B）.bat（C）.vbg（D）.vbpD5: 使程序运行时窗体无法响应用户事件的属性是_。（A）Top（B）Cancel（C）Left（D）EnabledB6: 返

19、回当前日期的函数是_。（A）Time()（B）Date()（C）Year()（D）Timer()D7:用变量x存放数据123456789.987456321，变量x的最佳数据类型是_。a整型b长整型c单精度型d双精度型A8: 设变量X=123，Y=3,则XY的值为_。（A）1233（B）126（C）123（D）假C9: 下列程序段中可以实现X、Y变量值的互换的是_。(A)Y=X:X=Y (B)Y=X:Y=Z:X=Y (C)Z=X:X=Y:Y=Z(D)Z=X:W=Y:Y=Z:X=YD10: InputBox函数返回值的类型是_。（A）字符串（B）变体（C）数值（D）数值或字符串(视输入而定)A1

20、1:关于多分支选择结构IfElseIfEndIf ，下列错误的叙述是_。如果有多个“条件”满足，则执行多个语句序列所有“条件”都不满足，则执行Else下面的语句序列若省略全部可选项，则退化为单分支的选择结构若省略某些可选项，可退化为双分支的选择结构D12: 设数组定义为：Dim arr(3,4) as Integer，则对数组arr的叙述正确的是_。是一个一维数组，下界是3，上界是4是一个二维数组，两个下界分别是3和4，两个上界没有定义是一个二维数组，两个下界都是1，两个上界分别是3和4是一个二维数组，两个下界都是0，两个上界分别是3和4D13:有如下程序段：Dim Arr(3) as Int

21、egerFor i=0 to 3Arr(i)=iNext iPrint Arr(4)程序运行后，窗体上显示结果为_。（A）4（B）3（C）0（D）错误提示B14:要定义一个可以在整个工程中使用的Function过程，正确的定义格式是_。Static Function MyFun(x)Public Function MyFun(x)Private Function MyFun(x)Dim Function MyFun(x)B15: 在VB6.0中，过程的类型分为_。（A）对象过程和事件过程（B）通用过程和事件过程（C）方法过程和调用过程（D）调用过程和事件过程A16: 要执行随机文件的读和写操作

22、，打开文件时可以使用的存取方式是_。（A）Random（B）Output（C）Append（D）BinaryC17: 按照数据存取方式，VB的数据文件分为三类，下列选项中的文件类型不包含的是_。（A）二进制文件（B）随机文件（C）程序文件（D）顺序文件A18:通用对话框可以通过对_属性设置需要打开的文件类型。（A）Action（B）FilterIndex（C）Font（D）FilterB19: 用来设置组合框的显示类型和性质的属性为_。（A）Sorted（B）Style（C）Text（D）ListB20: 关于Image控件和PictureBox控件，以下说法错误的是_。Image控件和Pic

23、tureBox控件都有Picture属性Image控件和PictureBox控件都支持Print方法Image控件和PietureBox控件都可以用LoadPicture函数把图形文件装入控件中Image控件和PictureBox控件均能在属性窗口装入图形文件，也能在运行期间装入图形文件D21: 以下叙述中错误的是_。下拉式菜单和弹出式菜单都用菜单编辑器建立在多窗体程序中，每个窗体都可以建立自己的菜单系统除分隔线外，所有菜单项都能接收Click事件如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见C22: 假定有一个菜单项，名称为Pmu，标题为AAA，为了在运行时使该菜单项

24、消失，应使用的语句为_。（A）Pmu.Enabled=False（B）AAA.Enabled=False（C）Pmu.Visible=False（D）AAA.Visible=FalseC23:有如下程序Private Sub Form_Click() a=20：b=20：c=120：d=120 Form1.Line(a,b)-(c,d),BFEnd Sub单击窗体后，窗体上显示的是_。（A）一条直线（B）一个矩形空框（C）一个填充了颜色的矩形（D）无任何图形C24:运行如下程序之后，输出的图形是_。For k=100 To 200 Pset(2*k,k)Next k（A）一条弧线（B）一条垂直

25、直线（C）一条斜线（D）一条水平直线D25:有如下程序Private Sub TxtA_KeyPress(KeyAscii As Integer) End Sub假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是_。（A）单击鼠标（B）双击文本框（C）鼠标滑过文本框（D）按下键盘上的某个键二：双项选择题BC26:下列文本框的属性中，只能在程序代码中设置的属性有_。（A）Text（B）SelLength（C）SelStart（D）MultiLineBD27: 将圆周率PI声明为一个单精度类型的符号常量，正确语句有_。Const PI=!3.1415Const PI As Singl

26、e=3.1415Const PI=3.1415Const PI!=3.1415BD28: 关于MsgBox函数，下列正确的叙述是_。提示文本可以省略MsgBox函数返回一个整数值标题内容不能省略可以设置图标和按钮类型AB29: 关于顺序文件的概念，下列正确的叙述有_。（A）可以用记事本程序查看文件内容（B）文件为文本格式或ASCII码格式（C）记录长度必须相同（D）可以随机读取数据BC30:关于文件列表框，下面正确的叙述有_。（A）可只显示某类文件（B）无法显示隐藏文件（C）可以响应单击事件（D）无法显示系统文件 三：填空题31: 在代码窗口中，输入一行代码后按回车键，代码文本红色显示，则说明

27、该语句出现_错误。32: 使用动态数组时，要用到_语句对其进行重定义。33: Visual Basic过程参数传递的方式有：传值方式和传_方式。34:菜单主要分为下拉菜单和菜单，除此之外还有快捷菜单等。35: 如果要改变绘制线条的宽度，应当设置 _ 属性。 一: 单项选择题D1: 下列不属于Visual Basic 6.0工作模式的是_。（A）设计（B）运行（C）中断（D）调试C2: 窗体窗口的主要功能是_。（A）设置对象的属性（B）管理应用程序中的所有文件（C）设计应用程序界面（D）编写应用程序代码A3在窗体上有一个名为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事

28、件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机考试”。以下能实现上述操作的事件过程是_。（A）Private Sub Command1_Change()Command1.Caption=计算机考试End Sub（B）Private Sub Command1_Click()Caption=计算机考试End Sub（C）Private Sub Command1_Click()Text1.Caption=计算机考试End Sub（D）Private Sub Command1_Click()Text1.Text=计算机考试End SubA4: 窗体上有一个文本框Te

29、xt1和一个计时器Timer1，计时器的Interval属性为1000，Enabled属性为False，程序运行后，单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。在命令按钮的单击事件代码中应填入的内容是_。Private Sub Command1_Click()Timer1._End SubPrivate Sub Timer1_Timer()Text1.Text = TimeEnd Sub横线处的正确语句是：（A）Enabled=True（B）Enabled=False（C）Visible=True（D）Visible=FalseB5: 以下不属于Visual Basic应用程序文件

30、类型的是_。（A）.frm（B）.bat（C）.vbg（D）.vbpB6:设y是整型变量，y为奇数的正确表达式是_。（A）Not (y Mod 20)（B）y Mod 20（C）(y-1) Mod 20（D）y Mod 21D7:Visual Basic中不合法的实数表示形式是_。（A）12.5（B）1.25e+011（C）1.235e-008（D）12.5EC8:DataTime是一个Date类型的变量，以下赋值语句中的错误的是_。（A）DataTime=*5/14/08*（B）DataTime=*September 3,2008*（C）DataTime=*10:15:00 AM*（D）8/

31、8/2008D9: 有一下程序段，关于死循环的叙述中正确的是_。 Private Sub Command1_Click() n=InputBox(“请输入一个整数”) Do If n Mod 2=0 Then n=n+1 Else n=n+2 End If Loop Until n=1000（A）只有输入的n是偶数时才会出现死循环，否则不会（B）只有输入的n是奇数时才会出现死循环，否则不会（C）只有输入的n是大于1000的整数时才会出现死循环，否则不会（D）输入任何整数都会出现死循环A10:关于多分支选择结构IfElseIfEndIf ，下列错误的叙述是_。（A）如果有多个“条件”满足，则执行

32、多个语句序列（B）所有“条件”都不满足，则执行Else下面的语句序列（C）若省略全部可选项，则退化为单分支的选择结构（D）若省略某些可选项，可退化为双分支的选择结构C11: 下列_语句可以跳出Do UntilLoop循环。（A）End（B）Exit Loop（C）Exit Do（D）Exit ForA12: 使用_函数可以对变体数组赋值，将一组数据赋给一个数组。（A）Array（B）Lbound（C）Ubound（D）FormatD13:有如下程序Dim Arr(3) as IntegerFor i=0 to 3 Arr(i)=iNext iPrint Arr(4)程序运行后，窗体上显示结果为

33、_。（A）4（B）3（C）0（D）错误提示C14:Function Test(x As Integer, y As Integer)正确的调用语句是_。（A）Test 100,x（B）Call Test 100,x（C）Test(100,x)（D）Print Test(100,x)B15: 在VB6.0中，过程的类型分为_。（A）对象过程和事件过程（B）通用过程和事件过程（C）方法过程和调用过程（D）调用过程和事件过程D16: 下列关于随机文件的说法错误的是_。打开随机文件时可以省略For子句，默认的打开模式是Random模式打开随机文件后，用Put语句向随机文件中写入数据打开随机文件后，用G

34、et语句从随机文件中读取数据随机文件可以使用记事本打开查看内容D17: 下列能判断是否到达文件尾的函数是_。（A）BOF（B）LOC（C）LOF（D）EOFB18:目录列表框的Path属性的作用是_。显示当前驱动器或指定驱动器上的路径显示当前驱动器或指定驱动器上的某目录下的文件名显示根目录下的文件名只显示当前路径下的文件B19: 设窗体上有一个列表框List1，且其中含有若干项目，则能表示当前被选中项目内容的是_语句。（A）List1.List（B）List1.ListIndex（C）List1.Index（D）List1.TextB20:在VB中，如果需要指定文件列表框所列出的文件类型是文本

35、文件(即.txt文件)，则正确的描述格式是_。（A）文本文件|*.txt（B）文本文件|.txt（C）*.txt|.txt（D）*.txt(*.txt)C21: 假定有一个菜单项，名称为Pmu，标题为AAA，为了在运行时使该菜单项消失，应使用的语句为_。（A）Pmu.Enabled=False（B）AAA.Enabled=False（C）Pmu.Visible=False（D）AAA.Visible=FalseA22: 在VB中，即按下Alt及字母O时，能够执行Open命令，则在菜单编辑器中设置“Open命令的方式是_。（A）把Caption属性设置为Open（B）把Caption属性设置为O

36、pen（C）把Name属性设置为Open（D）把Name属性设置为OpenD23: 若在图文框Picture1的坐标（x,y）处画一个绿色点，该语句是_。（A）Pset(x,y),RGB(0,255,0)（B）Picture1.Pset(x,y),Greeen（C）Pset(x,y),vbGreen（D）Picture1.Pset(x,y),vbGreenC24:有以下程序Private Sub Form_Click() a=20：b=20：c=120：d=120 Form1.Line(a,b)-(c,d),BFEnd Sub单击窗体后，窗体上显示的是_。（A）一条直线（B）一个矩形空框（C）

37、一个填充了颜色的矩形（D）无任何图形C25: 关于使用MouseIcon属性自定义鼠标图标的说法正确的是_。一般在MousePointer=0时使用MouseIcon属性只能在属性窗口中设置MouseIcon属性要求图标文件大小不能任意一般在MousePointer=99时使用二：双项选择题AB26: 关于方法，下面正确的叙述有_。（A）系统预先定义好的一组程序代码（B）方法是对象的一个组成部分（C）与事件相同，没有差别（D）不同的对象不能具有相同的方法BC27:下列四个表达式中，运算结果相同的两个选项是_。（A）4/5（B）5 Mod 4（C）54（D）4 Mod 5AD28: 关于MsgB

38、ox函数，下列正确的叙述是_。（A）提示文本可以省略（B）MsgBox函数返回一个整数值（C）标题内容不能省略（D）可以设置图标和按钮类型AB29: 要从顺序文件中读取数据(文件号为7)，下列正确的语句有_。（A）Input *7,x（B）Line Input *7,y（C）Input 7,x（D）Input *7AC30: 关于文件列表框，下面正确的叙述有_。（A）可只显示某类文件（B）无法显示隐藏文件（C）可以响应单击事件（D）无法显示系统文件 三：填空题31:Visual Basic 6.0是以_驱动编程机制作为运行机制的新一代可视化程序设计语言。32: 使用动态数组时，可以随时指定数组

39、的维数和大小，但不能随时改变数组的_。33: 定义过程时，若形参前用关键字_，则表明该参数是按值传递。35: 执行_(2000,2000),1000, ,-1 ,-3语句后，将在窗体上绘制一个扇形。 一: 单项选择题B1: 编辑程序时，输入一行代码后按回车键，代码文本红色显示，则说明此语句出现_。（A）运行错误（B）语法错误（C）逻辑错误（D）编辑错误B2: 在设计窗口中，单击“标准”工具栏中的按钮，不可以打开_。（A）工程窗口（B）代码窗口（C）属性窗口（D）工具箱窗口B3:如果要将窗体中某个命令按钮设置为运行时不可见，应该设置命令按钮的_属性。（A）Value（B）Visible（C）En

40、abled（D）DefaultC4: 程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是_。（A）MouseDown（B）MouseUp（C）Load（D）ClickC5: 下列能在窗体Form1的标题栏中显示“VisualBasic窗体的语句是_。（A）Form1.Name=VisualBasic窗体（B）Form1.Title=VisualBasic窗体（C）Form1.Caption=VisualBasic窗体（D）Form1.Text=VisualBasic窗体B6: 设a=20，则执行x=IIf(a10,-1,0)后，x的值是_。（A）20（B）10（C）0（D）-1C7:返回

41、当前日期的函数是_。（A）Time()（B）Date()（C）Year()（D）Timer()C8: 表示x+y小于10且x-y大于0的逻辑表达式是_。（A）x+y0（B）(x+y0（C）x+y0（D）x+y0B9: 下列语句正确的是_。（A）a% = abc（B）Print a=;23+56（C）x=2,y=3（D）Text1.Print *D10: 下列语句书写正确的是_。（A）If amax Then max=a Else max=b End If（B）If amax Then max=aElse max=b End If（C） If amax Then max=aElse max=b（

42、D）If amax Then max=aElse max=bEnd IfB11: 在输入程序代码时，下列不正确的叙述是_。（A）如果一行包含多个语句，各语句之间用冒号隔开（B）关键字区分大小写字母（C）一行可以书写多个语句（D）续行符前面至少要有一个空格A12: 使用_函数可以对变体数组赋值，将一组数据赋给一个数组。（A）Array（B）Lbound（C）Ubound（D）FormatB13:关于动态数组，下列说法错误的是_。（A）可以随时指定数组的维数（B）可以随时改变数组类型（C）可以随时改变数组的大小（D）可以随时释放数组所占据的内存空间14: 窗体上有一个名为 Command1的命令按

43、钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer) If m Mod 2 = 0 Then f=m Else f=1 End If End Function Private Sub Command1_Click() Dim i as Integer s=0 For i=1 To 5运行之后显示：（A）8（B）9（C）10（D）11B15: 在VB6.0中，过程的类型分为_。（A）对象过程和事件过程（B）通用过程和事件过程（C）方法过程和调用过程（D）调用过程和事件过程A16: 关于顺序文件的概念，下列错误的叙述是_。（A）可以随机读取

44、数据（B）每个记录的长度可以不同（C）一行就是一个记录（D）记录中的字段个数可以不同D17: 下列能判断是否到达文件尾的函数是_。（A）BOF（B）LOC（C）LOF（D）EOFC18:要清除列表框中所有的项目时，应使用_方法。（A）Remove（B）Clear（C）RemoveItem（D）MoveC19: 运行时，要清除图文框P1中的图像，应使用的语句是_。（A）Picture1.Picture=（B）P1.Picture=LoadPicture()（C）Picture1.Picture=LoadPicture()（D）P1.Picture= LoadPicture(c:Mypicture

45、.bmp)C20: 要使Shape 控件以实心方式填充，应该设置其_属性。（A）FillColor（B）FillStyle（C）BackStyle（D）ShapeD21: 如果要在菜单中设计一个分隔线，则应将其Caption属性设置为_。（A）= 等号（B）* 星号（C） （D）- 负号D22: 以下叙述中错误的是_。下拉式菜单和弹出式菜单都用菜单编辑器建立在多窗体程序中，每个窗体都可以建立自己的菜单系统除分隔线外，所有菜单项都能接收Click事件如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见D23:坐标度量单位可通过设置_属性改变。（A）Drawstyle（B）Dra

46、wWidth（C）Scale（D）ScaleModeC24: 当使用Line方法画直线后，当前坐标在_。（A）(0,0)（B）直线起点（C）直线终点（D）对象的中心D25:有如下程序Private Sub TxtA_KeyPress(KeyAscii As Integer) End Sub假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是_。（A）单击鼠标（B）双击文本框（C）鼠标滑过文本框（D）按下键盘上的某个键 二：双项选择题AC26: 要改变控件在窗体中的位置，可以设置_属性。（A）Top（B）Width（C）Left（D）HeightBD27: 下列语句用来定义变量的类型

47、，正确的语句有_。（A）Dim Top As Long（B）Dim RGB AS Single（C）Dim Print As Integer（D）Dim String As SingleAC28: 下列描述中正确的是_。在执行Do Untilloop语句中，当循环条件为False时，结束循环体的重复执行执行Do UntilLoop语句时，至少执行一次循环体Do UntilLoop语句的循环体可能一次也不执行在执行Do Loop Until语句中，当循环条件为True时，结束循环体的重复执行BC29: 要向顺序文件中写入数据(文件号为6)，下列错误的语句有_。（A）Write *6,x,y（B）

48、Write *6, x, y,（C）Write（D）Write *6AC30:关于文件列表框，下面正确的叙述有_。（A）可只显示某类文件（B）无法显示隐藏文件（C）可以响应单击事件（D）无法显示系统文件三：填空题31:Visual Basic 6.0是以_驱动编程机制作为运行机制的新一代可视化程序设计语言。32: 用下面语句所定义的数组元素个数是_个。Dim A(-3 to 5) As Integer33: 在调用过程中有两种参数进行传递，调用过程时的参数称为_。34: 要使菜单项失效，Enabled属性应设置为_。35: 使用_方法可以定义窗体的坐标系。 一: 单项选择题D1: 在工程窗口中

49、是以层次结构显示工程文件中各类文件，括号内是工程文件名和窗体文件名，括号外是_。（A）工程名（B）窗体名（C）工程文件和窗体文件（D）工程名和窗体名D2: 下列不属于Visual Basic 6.0工作模式的是_。（A）设计（B）运行（C）中断（D）调试B3:假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“VB Test”的语句为_。（A）Form1 = VB Test（B）Form1.Caption = VB Test（C）Form1.Text = VB Test（D）Form1.Name = VB TestA4: 要使标签在运行时能够显示所需要的文本，则在程序代码中应设置

50、_属性。（A）Caption（B）Text（C）Name（D）AutoSizeA5: 为了把焦点移动到某个指定的文本框中，所使用的方法是_。（A）SetFocus（B）Visible（C）Refresh（D）GetFocus6: 设a=10，b=5，执行语句Print ab后，窗体上显示的是_。（A）True（B）False（C）1（D）出错信息A7:日期类型(Date)常量的定界符是_。（A）*（B）（C）$（D）%D8: 将数学表达式|(2a+3b)Cos(p)|写成Visual Basic的表达式，其正确的形式是_。（A）|(2*a+3*b）*Cos(p)|（B）Abs(2a+3b)*C

51、os(p)）（C）Abs(2*a+3*b)*Cos(p)（D）Abs(2*a+3*b)*Cosp)A9: 下面程序段执行之后输出的结果是_。For i=1 To 5 Select case i Mod 2 Case 0 Print * Exit For Case 1 Print * Case else Print $ End selectNext I（A）*（B）*（C）*$（D）*$D10: InputBox函数返回值的类型是_。（A）字符串（B）变体（C）数值（D）数值或字符串(视输入而定)B11: 设x=4，y=6，则下列不能在窗体上显示出A=10的语句是_。（A）PrintA=x+y（

52、B）PrintA=;x+y（C）Print A=+Str(x+y)（D）Print A=x+yA12:使用_函数可以对变体数组赋值，将一组数据赋给一个数组。（A）Array（B）Lbound（C）Ubound（D）FormatB13:如下程序Dim A(-5 to 5,10)Print Lbound(A,1),Ubound(A,2)程序运行后，窗体上显示结果为_。（A）0,10（B）-5,10（C）0,5（D）-5,5B14: 关于过程的作用域，下列正确的叙述是_。标准模块中的任何过程都可以在整个工程范围内被调用在一个窗体模块中可以调用在其他窗体中被Public定义的通用过程使用Private

53、定义的过程可以在各模块中被调用不使用任何声明语句定义的过程是模块过程15: 在窗体上有一个名为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f=m Else f=1 End If End Function Private Sub Command1_Click() Dim i as Integer s=0 For i=1 To 5运行之后显示为：（A）8（B）9（C）10（D）11B16: 要向顺序文件中写入数据(文件号为5)，下列错误的语句是_。（A）Write

54、*5,x（B）Write *5, x; y;（C）Write *5, x, y（D）Write 5, x, yC17: 关于顺序文件的打开，下列错误的是_。使用Append方式打开文件时，文件指针被定位于文件尾使用Input方式打开文件时，顺序文件必须存在使用Output方式打开文件时，顺序文件必须存在使用Output方式打开文件时，顺序文件可以不存在B18: 设窗体上有一个列表框List1，且其中含有若干项目，则能表示当前被选中项目内容的是_语句。（A）List1.List（B）List1.ListIndex（C）List1.Index（D）List1.TextB19:目录列表框的Path属性的作用是_。显示当前驱动器或指定驱动器上的路径显示当前驱动器或指定驱动器上的某目录下的文件名显示根目录下的文件名只显示当前路径下的文件B20: 拖动滚动条上的滑块时，产生的事件是_。（A）Click（B）Scroll（C）Change（D）MoveB21: 设计菜单时，在某菜单项（Caption）中一个字母前加一个符号，其含义是_。（A）设置该菜单项的访问键，即该字母带有下划线，可以通过键盘操作Ctrl+带下划线的字母选择该菜单项（B）设置该菜单项的访问键，即该字母带有下划线，可以通过键盘操作Alt+带下划线的字母选择该菜单项（C）设置该菜单项的访问键，