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

1、判断题：（共20题 每题2分）1、一个对象可以响应一个或多个事件。 参考答案：正确  2、一个窗体必须对应一个窗体模块，各种控件对象必须建立在窗体上。 参考答案：正确  3、窗体事件和其中所有控件事件的代码都放在窗体文件（.frm）中。 参考答案：正确4、在VB中，控件的事件只能通过用户的操作触发。 参考答案：错误5、字符型数据以双引号作为定界符，输出时双引号本身不会显示在屏幕上。 参考答案：正确6、保存工程时，窗体文件和工程文件的文件名不能相同。   正确  错误  参考答案：错误7、改变控件的大小，可以使用鼠标和键盘，还可以通过修改代码。

2、  正确  错误  参考答案：正确8、同一过程中，数组和简单变量可以同名。   正确  错误  参考答案：错误9、VB函数中的参数可以是常量、变量、表达式，还可以是另一个函数。   正确  错误  参考答案：正确10、代码Const Number1=15：Number1=10合法。 参考答案：错误  11、允许将块If-Then语句结构中的所有语句都写在一行上。   正确  错误  参考答案：错误12、定义数组语句Dim a(b) As Integer 是正确的。

3、  正确  错误  参考答案：错误13、在过程调用中，“实参表”和“形参表”中对应的变量名不必相同，但是变量的个数必须相等，而且实际参数的类型必须与相应形式参数的类型相符。   正确  错误  参考答案：正确14、case是合法的变量命名。   正确  错误  参考答案：错误  15、按照文件的存取方式及其组成结构可以分为两种类型：文本文件和随机文件。   正确  错误  参考答案：错误  16、若一个工程包含多个窗体，则这些窗体之间是可以互相调用的。 参

4、考答案：正确  17、窗体间是通过窗体对象的caption来调用的。 参考答案：错误18、一个数组中的元素必须是相同的数据类型。 参考答案：错误  19、用 Label1.Caption="你好" 与 Label1 ="你好" 均可以改变标签标题，且结果完全相同。   正确  错误  参考答案：正确  20、定时器控件的时间间隔设为0 或 Enabled属性设为False，都将停止触发Timer事件。   正确  错误  参考答案：正确  单选题：（共30

5、道试题，每题1分）1、如果准备读文件，打开顺序文件“text.dat”的正确语句是（       ）。  Aopen ”text.dat” For write As # 1   Bopen ”text.dat” For Binary As # 1  Copen ”text.dat” For Input As # 1    Dopen ”text.dat” For Random As # 1   参考答案：C  2、下列“CommonDialog1”控件程序代码，Commond

6、ialog1.Action=1 ,代表（       ）。    A文件另存为     B打开文件    C色彩   D打印   参考答案：B  3、下列数据对象数据模型中采用OLE DB访问数据库的是（      ）。  ADAO    BRDO   CADO   DAOD   参考答案：C  4、设ADOrs为Records

7、et对象，从“学生基本情况表”中获取所有记录的语句是（     ）。  AADOrs.Open“select * From 学生基本情况表”   BADOrs.Execute“select * From 学生基本情况表”   CADOrs.New“select * From 学生基本情况表”   DADOrs.Select “select * From 学生基本情况表”   参考答案：A  5、VB中将变量x1声明为Excel应用程序对象的方法是（     

8、;  ）。  ADim x1 As Excel.Application    BDim x1 As Excel.Workbook  CDim x1 As Excel.Worksheet    DDim x1 As Excel.Worksheets   参考答案：A  6、VB程序通常不会产生错误提示的是（        ）。    A编译错误   B实时错误    C运行时错误   D逻

9、辑错误   参考答案：D  7、VB程序的编译错误一般通过VB集成环境的何种设置，自动检测（        ）。    A要求变量声明   B自动语法检测   C自动显示快速信息   D根本无法进行检测   参考答案：B  8、VB程序中设置断点的按键是（       ）。    AF5键    BF6键   CF9键   DF10键 &

10、#160; 参考答案：C  9、Err对象中，用来表示错误描述的属性是（       ）。AErrNo  BDescription  CNumber  DSouece   AErrNo   BDescription    CNumber   DSouece   参考答案：B  10、能够改变标签(Label)控件显示标题的属性是（      ）。  

11、0; AName   BCaption    CText    DBorder   参考答案：B11、当一个工程中含有多个窗体时，其中的启动窗体是（      ）。    A启动VB时创建的第一个窗体   B第一个添加的窗体   C在“工程属性”对话框中指定的窗体   D最后一个添加的窗体   参考答案：C  12、下列4项中合法的变量名是（      ）。    A

12、2xyz   BInteger    Cx-yz     Dx_yz   参考答案：D  13、下列正确的赋值语句是（     ）     Ax+y=z       B2=x+y   Cz=x+y         Dx=Integer+2   Ax+y=z   

13、0; B2=x+y    Cz=x+y    Dx=Integer+2   参考答案：C  14、可通过下列何种属性来设置或返回List列表框控件中当前选定项目的索引（        ）。  AListIndex    BListCount   CListText    DLisItem   参考答案：A  15、若窗体Form1左上角的坐标为(-250,300)，右下角的坐标为(350,-200

14、)，那么X轴和Y轴的正方向是（       ）  A向左和向上   B向左和向下    C向右和向下   D向右和向上   参考答案：D  16、如果仅需要得到当前系统时间，则可以使用哪个函数（      ）  ATime    BYear    CNow    DDate   参考答案：A  17、数学关系8y<40表示成正确的VB表达式为

15、（     ）  A8<=y<40    B8<=yAND<40    C8<=y  AND  y<40    D8<=y OR y<40   参考答案：C  18、应用程序打包后，其包文件的后缀是（ ）  A.cab     B.exe    C.ocx    D.vbp   参考答案：A  19、某窗体的N

16、ame属性为MyFrm，则它的Load事件的过程名为（      ）  AMyFrm_Load    BMe_Load   CForm1_Load   DForm_Load   参考答案：D  20、以读方式打开D盘中的Text.dat文件，正确的语句是（     ）  A   B   C   D   参考答案：B  21、在VB中，Access数据库属于（  ）  A本地数据

17、库   B外部数据库   C远程数据库    DOLE数据库   参考答案：A  22、在设计动画时，用时钟控件来控制动画速度的属性是（      ）        AEnabled     BInterval     CTimer     DMove   参考答案：B  23、下列控件中不能响应Click事件的是（ 

18、     ）。  AFrame    BLabel     CForm   DTimer   参考答案：D  24、文本框不具备的属性是（        ）。  AEnabled     BVisible      CBackColor   DCaption   参考答案：D  25、刚建立一个新的标准EXE

19、工程后，不在工具箱中出现的控件是（       ）。  A单选按纽   B图片框   C通用对话框    D文本框   参考答案：C  26、将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其它机器上不能运行的主要原因是（     ）。  A缺少.frm窗体文件    B运行的机器上无VB系统  C该可执行文件有病毒   D以上原因都不对 

20、0; 参考答案：D27、启动VB后，就意味着要建立一个新（      ）。  A文件   B窗体    C程序   D工程   参考答案：D28、在VB环境中，标准类模块文件的扩展名是（      ）。  A.vbp    B.frm    C.bas    D .frx   参考答案：C  29、Visual Basic6.0集成开发环境有三种工作模式，下

21、列不属于三种工作模式之一的是（        ）。  A设计模式   B执行模式    C中断模式   D编写代码模式   参考答案：D  30、下列4项中合法的变量名是（      ）。A45 xyzE         BSingle    CRx-yz     &#

22、160;              DRTx_yz   A45 xyzE    BSingle    CRx-yz   DRTx_yz   参考答案：D单选题：（共6道试题，每题5分）1、阅读程序，运行结果时文件框Text3的结果是（       ）Private Sub Command1_Click() x = 0 

23、Do While x < 20     x = (x + 1) * (x +3)     n = n + 1  Loop  Text1.Text = Str(n)  Text2.Text = Str(x)  Text3.Text = Val(Text1.Text) + Val(Text2.Text)End Sub        A20   B23   C25   D26  

24、; 参考答案：D2、 阅读程序，程序运行时单击窗体后，窗体Form1上的结果为（       ）Private Sub Form_Click()        Dim A(1 To 3) As String        Dim c As Integer,j As Integer        A(1) = “3” &

25、#160;      A(2) = “6”        A(3) = “9”        c=0        For j=1 to 3           c = c + Val(A(j)Next jPrint cEnd Sub

26、60;      A18   B20   C25   D28   参考答案：A  3、 阅读程序，运行结果为（      ）Private Sub Command1_Click()     Dim A(2 To 7) As Integer     Dim b As Integer   For b = 2 To 7     A(b) = b   Next b   Text1.Text = A(b - 2)End Sub  A7   B10   C6