电大VB程序设计形成性考核1答案

1、判断题：（共20题 每题2分）1、为了使一个控件在运行时不可见，应将该控件的Enable属性值设置为False。 2、当用Load命令将窗体装入内存时，一定触发窗体的Load事件和Activate事件。 3、面向对象程序设计是一种以对象为基础，由事件驱动对象执行的设计方法。 4、将焦点主动设置到指定的控件或窗体上，应采用Setfocus方法。5、方法是Visual Basic对象可以响应的用户操作。 6、对象是基本的运行实体，它既包括了数据（属性），也包括作用于对象的操作（方法）和对象的响应动作（事件）。7、属性是用来描述和反映对象特征的参数，不同的对象具有各自不同的属性，对象的所有属性都可以

2、在属性窗口中设置。 8、Visual Basic中将一些通用的过程和函数编写好并封装作为方法供用户直接调用。 9、每个对象都有一系列预先定义好的事件，但要使对象能响应具体的事件，则应编写该对象相应的事件过程。 10、在打开一个Visual Basic工程进行修改后，当要另存为一个文件名时，可单击“工程另存为”命令，因为其同时会保存窗体文件。  11、使用MsgBox函数与MsgBox过程可接受用户输入数据。 12、If语句中的条件表达式中只能使用关系或逻辑表达式。 13、在Select Case情况语句中，各分支（即Case表达式）的先后顺序无关。 14、要实现同样的循环控

3、制，在Do While-Loop和Do-Loop While循环结构中给定的循环条件是一样的。 15、一个Do循环只能使用一个Loop关键字，但是可以使用多个Exit语句。 16、For循环语句正常结束（即不是通过Exit For语句或强制中断）其循环控制变量的值一定大于“终值”，并等于“终值”“步长”。          17、VB要求程序员在使用变量前，必须事先声明。 18、在模块的声明段中用Private和Dim语句声明的数组为模块级数组。 19、顺序文件的每一个记录都有固定长度，每一个记录都有一个

4、记录好。 20、在VB中，常用的对象有工具箱中的控件、窗体、菜单、应用程序的部件以及数据库，这些对象都有属性和方法。 单选题：（共30道试题，每题1分）1、在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（        ）。  A窗体设计    B代码    C属性    D工程资源管理器窗口   参考答案：D  2、窗体的Load事件的触发时机是（      

5、 ）。  A用户单击窗体时   B窗体被加载时   C窗体显示之后   D窗口被卸载时   参考答案：B3、与传统的程序设计语言相比，Visual Basuc最突出的特点是（        ）。  A结构化程序设计    B程序开发环境   C事件驱动编程机制   D程序调试技术   参考答案：C  4、VB6.0集成开发环境的主窗口不包括（       ）

6、。A标题栏  B菜单栏  C状态栏  D工具栏   A标题栏    B菜单栏   C状态栏   D工具栏   参考答案：C  5、如果在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（        ）属性。  ACaption    BPasswordChar   CText    DChar   参考答案：B

7、0;6、如果想让文本框中的内容在运行时不能编辑，需将文本框的（      ）属性设置为True。  ALocked    BMultiLine    CTabStop   DVisible   参考答案：A  7、对于定时器（Timer）控件，设计其定时是否开启的属性是（        ）。  AIndex    BTag    CEnabled   DLe

8、ft   参考答案：C  8、要在窗体Form1内显示“myfrm”，使用的语句是（       ）。  AForm.Caption=“myfrm”    BForm1.Caption=“myfrm”   CForm1.Print “myfrm”     DForm.Print “myfrm”   参考答案：C9、下列正确的赋值语句是（      ）。  Ax+y=20   Bx+20&

9、#160;   C3x=y    Ds=X*r*r   参考答案：B10、当使用上下文相关的帮助时，选择要帮助的内容，然后按（        ）键，就可出现MSDN窗口直接显示所需的帮助信息。  AHelp    BF10     CESC    DF1   参考答案：D11、按照变量的作用域可将变量划分为（      ）。  A公有、私有、系统  

10、; B全局变量、模块级变量、过程级变量   C动态、常态、静态   DPublic、Private、Protected   参考答案：B  12、可获得字符的ASCII码的函数是（       ）。  AVal    BFix   CAsc    DChr   参考答案：D  13、要退出DoLoop循环，可使用的语句是（       ）。  AExit  

11、 BExit  For    CEnd  Do    DExit  Do   参考答案：D  14、把数值型转换为字符串型需要使用的函数是（      ）。  AVal    BStr    CAsc    DChr   参考答案：B15、表达式  6 + 10 Mod 4 * 2 + 1  的值是（       ）。

12、  A9   B11   C1   D3   参考答案：A16、以下可以作为Visual Basic变量名的是（        ）。  ASIN    BCOI    CCOS（X）   DX（-1）   参考答案：B  17、在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（       ），表示下一行是

13、当前行的继续。  A一个空格加一个下划线字符(_)     B一个下划线字符(_)   C直接回车   D一个空格加一个连字符(-)   参考答案：A  18、在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（      ）。  A加号（+）   B减号（-）   C星号（*）   D感叹号（！）   参考答案：B  19、如果要在程序中显示一个弹出式菜单，那么要调用Visual Basi

14、c中提供的方法是（       ）。  APrint    BMove    CRefresh    DPopupMenu   参考答案：D 20、下列可以用来存储图像供其它对象使用的控件是（        ）。AToolBar  BStatursBar  CImageList  DTreeView   AToolBar

15、60; BStatursBar   CImageList   DTreeView   参考答案：C  21、当单击工具栏上的按钮时，会触发的事件是（       ）。  AButtonClick   BChange   CLoad   DKeyPess   参考答案：A  22、要利用公共对话框控件来显示“打开文件”对话框，需要调用控件的（       ）方法。  AShowPrint

16、  BShowOpen    CLoad   DShowColor   参考答案：B  23、用下面的语句所定义的数组的元素个数是（       ）。      Dim A（-3 To 5）As Integer  A6   B7   C8   D9   参考答案：D  24、Visual Basic根据计算机访问文件的方式将文件分成三类，其中不包括（  &#

17、160;     ）。    A顺序文件   BUnix文件   C二进制文件   D随机文件   参考答案：B  25、KILL语句在VB语言中的功能是（     ）。  A清内存   B清病毒   C删除在磁盘上的文件   D清屏幕   参考答案：C  26、以下的属性和方法中，可重定义坐标系的是（       ）。  ADrawstyle属性

18、    BDrawWidth属性   CScale属性   DScaleMode属性   参考答案：B  27、当使用Line方法画直线后，当前坐标在（       ）。  A（0，0）   B直线起点   C直线终点   D容器的中心   参考答案：A  28、设置对象的边框类型的属性是（      ）。  ADrawstyle   BBorderstyle

19、60; CDrawWidth   DScaleMode   参考答案：B  29、为了清除图片框Picture1中的图形，应采用的正确方法是（       ）。  A选择图片框，然后按Del键   B执行语句Picture1.Pictyre=LoadPicture (“”)   C执行语句Picture1.Pictyre=“”   D选择图片框，在窗口属性中选择Picture属性条，然后按回车键   参考答案：B  30、要绘制多种形状的图形，需要设置Sh

20、ape控件的（      ）属性。  AShape    BBordrestyle    CFillStyle    DStyle   参考答案：A 单选题：（共6道试题，每题5分）1、 下面程序段（    ）能够正确实现条件：X<Y,则A=15，否则A=-15。    AIf X<Y Then A=15     A=-15   

21、60; Print A  BIf X<Y Then A=15: Print A     A=-15: Print A  CIf X<Y Then A=15: Print A         ElseA=-15: Print   DIf X<Y Then A=15Else: A=-15Print A   参考答案：C  2、 下面程序段的执行结果为（      ）A =

22、75If A > 60 Then  I = 1ElseIf A > 70 Then  I = 2ElseIf A > 80 Then  I = 3ElseIf A > 90 Then  I = 4End IfPrint "I=" I   A1   B2   C3   D4   参考答案：B  3、使用For循环语句，程序如下，程序运行后，单击窗体，输出结果为（       ）Priv

23、ate Sub Form_Click( )   Static Sum As Integer   For I =1 To 6        Sum = Sum + I       Next I       Print Sum     End Sub   A16   B20   C6   D21   参考答案：D4、 程序运行结果为（     ）Option ExplicitPrivate Sub Command1_Click() Dim a, b As Integer a = 3.6 b = 3.6 Text1.Text = a Text2.Tex