VB语言程序设计复习纲要二.doc

201209学期VB语言程序设计复习纲要二一、单项选择题1. VB一共有设计、运行和中断三种模式，要使用调试工具应该（ ）。A、进入设计模式B、进入运行模式C、进入中断模式D、不用进入任何模式2. VB窗体设计器的主要功能是（ ）。A、建立用户界面B、编写源程序代码C、画图D、显示文字3. 设有语句Dim X As Integer，程序运行后，如果Sgn(X)的值为-1，则X的值是（ ）。A、整数B、大于0的整数C、等于0的整数D、小于0的整数4. 系统符号常量的定义可以通过（ ）获得。A、对象浏览器B、代码窗口C、属性窗口D、工具箱5. 当我们输入代码时，Visual Basic可以自动检测（ ）。A、语法错误B、编译错误C、运行错误D、逻辑错误6. 当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的（ ）。A、AutoSize属性B、Resize事件C、AutoRedraw属性D、Stretch方法7. 若要求显示一个指定窗体，所用的方法是（ ）。A、Show B、OpenC、HideD、Load8. 在Visual Bsaic代码中，将多个语句合并写在一行上的并行符是（ ）。A、撇号()B、冒号(:)C、感叹号(!)D、星号（*）9. 如果要向工具箱中加入控件和部件，可以利用“工程”菜单中的（ ）命令。A、引用B、部件C、工程属性D、添加窗体10. 为了清除列表框中的所有内容，应使用的方法是（ ）。A、ClsB、ClearC、RemoveD、RemoveItem11. 文本框能输入（ ）。A、控制字符B、ASCII字符C、回车D、文本和数字12. 要将一个组合框设置为简单组合框(Simple Combo)，则应将其Style属性设置为（ ）。A、0B、1C、2D、313. 以下能够触发文本框Change事件的操作是（ ）。A、文本框失去焦点B、文本框获得焦点C、设置文本框的焦点D、改变文本框的内容14. 组合框控件是将（ ）组合成一个控件。A、列表框控件和文本框控件B、标签控件和列表框控件C、标签控件和文本框控件D、复选框控件和选项按钮控件15. （ ）使图象(Image)控件中的图象自动适宜控件的大小。A、将控件的AutoSize属性设为TrueB、将控件的AutoSize属性设为FalseC、将控件的Stretch属性设为TrueD、将控件的Stretch属性设为False二、多项选择题1. Visual Basic 6.0集成环境的主窗口中包括（ ）。A、标题栏B、菜单栏C、状态栏D、工具栏2. 下列属于Visual Basic 特点的是（ ）。A、对象的链接与嵌入B、结构化程序设计C、编写跨平台应用程序D、事件驱动程序编程机制3. 设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法正确的是（ ）。A、命令按钮的所有Caption属性都是Command1B、在代码中访问任意一个命令按钮只需用名称Command1C、命令按钮的大小都相同D、命令按钮共享相同的事件过程4. 关于通用对话框概念的说法中，正确（ ）。A、是用系统提供的控件制作的标准对话框B、是由用户定义的自定义对话框C、是执行某函数弹出的对话框D、可以由用户定义，也可以是通过执行某种特殊函数弹出的对话框5. 关于窗体，下列说法错误（ ）。A、窗体最大化时标题会与MDI窗体的标题组合显示于MDI窗体的标题栏上B、MDI窗体在子窗体最大化时将隐藏C、窗体最小化时图标显示在系统栏上D、窗体可以被拖出MDI窗体三、判断题1. Select Case语句中的测试表达式只能是数值表达式或字符串表达式。（ ）2. Select Case语句中的测试表达式可以是任何形式的表达式。（ ）3. 弹出式菜单也在菜单编辑器中定义。（ ）4. 调用通用对话框控件的ShowColor方法，可以打开颜色对话框。（ ）5. 一个工程中可以包含多个窗体文件。（ ）6. 对象的Name属性值可以为空。（ ）7. 驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框。（ ）8. 窗体的Hide方法和Unload方法的作用完全相同。（ ）9. 设有语句x=InputBox(输入数值,0,示例),程序运行后，如果从键盘上输入数值10并按回车键，则变量X的值是字符串10。（ ）10. 局部变量的作用域可以超出所定义的过程。（ ）四、程序设计题编程序求阶乘的值不大于1000的最大整数。提示：x的阶乘=123x。201209学期VB语言程序设计复习纲要二答案 一、单项选择题题号12345678910答案CADAABABBB题号1112131415答案DBDAC二、多项选择题题号12345答案ABDABDACDBCDBCD三、判断题题号12345678910答案TFTTTFTFTF四、程序设计题答：Function fac(ByVal n As Integer) As Long If n = 0 Then fac = 1 Else fac = fac(n - 1) * nEnd FunctionPrivate Sub Command1_Click() D