2016年春季学期中石油华东《VB程序设计》在线考试(适用于2...

奥鹏网院作业

2016年春季学期《VB程序设计》在线考试(适用于2016年6月份考试)答案参考资料

一、单选题：
1.从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是(    )          (满分:1)
    A. Left
    B. Mid
    C. String
    D. Instr
2.用于从内存删除窗体的命令是(    )          (满分:1)
    A. Move
    B. Hide
    C. Unload
    D. Delete
3.语句DIM AA(3,4,5)中定义的数组有多少个元素(    )          (满分:1)
    A. 12
    B. 60
    C. 120
    D. 345
4.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1Click(    ) x=InputBox("Input") Select Case x Case 1,3  Print "分支 1" Case Is >4  Print "分支 2" Case Else  Print "Else 分支 " End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是(    )          (满分:1)
    A. 分支1
    B. 分支2
    C. Else分支
    D. 程序出错
5.下列关于控件画法的叙述错误的是(    )          (满分:1)
    A. 单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件
    B. 按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件
    C. 双击工具箱中的控件图标，所画控件的大小和位置是固定的
    D. 不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符
6.用于设置通用对话框控件显示文件类型的属性是(    )          (满分:1)
    A. Filter
    B. Path
    C. Partern
    D. FoleName
7.以下叙述中错误的是(    )          (满分:1)
    A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
    B. Sub过程中不能嵌套定义Sub过程
    C. Sub过程中可以嵌套调用Sub过程
    D. 事件过程可以像通用过程一样由用户定义过程名
8.如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为(    )          (满分:1)
    A. 0
    B. -1
    C. TRUE
    D. FALSE
9.为了检测到用户按下键盘上的所有键，应该使用的键盘事件为(    )          (满分:1)
    A. KeyPress
    B. MouseDown
    C. KeyDown
    D. MouseUp
10.下列说法错误的是(    )          (满分:1)
    A. 在同一模块不同过程中的变量可以同名
    B. 不同模块中定义的全局变量不可以同名
    C. 引用另一模块中的全局变量时，必须在变量名前加模块名
    D. 同一模块中不同级的变量可以同名
11.把MsgBox的返回值转换为数值应该使用的函数是(    )          (满分:1)
    A. Log
    B. Str
    C. Len
    D. Val
12.不可以通过下列(    )操作将焦点赋给对象          (满分:1)
    A. 运行时使用TAB键
    B. 在代码中用CALL语句调用
    C. 在代码中用SETFOCUS方法
    D. 用访问键或用鼠标单击选择对象
13.下列语句中正确的是(    )          (满分:1)
    A. txt1.text+txt2.text=txt3.text
    B. command1.name=cmdok
    C. 12label.caption=1234
    D. a=inputbox("hello")
14.假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为(    )          (满分:1)
    A. MenuItem.Enabled=False
    B. MenuItem.Enabled=True
    C. MenuItem.Visible=True
    D. MenuItem.Visible=False
15.在运行时，按TAB键跳过了一个可以获得焦点的控件（如文本框），则可能是因为(    )          (满分:1)
    A. 该控件的TABSTOP属性值为TRUE
    B. 该控件的TABINDEX属性值为FALSE
    C. 该控件的ENABLED属性值为TRUE
    D. 该控件的ENABLED属性值为FALSE

二、计算题（共 2 道试题，共 10 分。）V 1.    读下面的程序，分析其功能，写出运行结果。
在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click()For I = 1 To 4For J = 0 To IPrint Chr$(65 + I);Next JPrintNext IEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？


      满分：5  分
2.  
分析以下程序，写出运行结果。  Private Sub Form_Click()   score = Int(Rnd * 10) + 80   Select Case score     Case Is ＜ 60      A$ = "F"

     Case 60 To 69      A$ = "D"     Case 70 To 79      A$ = "C"     Case 80 To 89      A$ = "B"     Case Else      A$ = "A"   End Select   Print A$  End Sub


三、简答题（共 10 道试题，共 30 分。）V 1.  弹出式菜单在程序中要用什么方法显示？


      满分：3  分
2.  如何使用帮助功能？


      满分：3  分
3.  如果要计时器每秒钟发生2个Timer事件，则Interval属性值应设多少？


      满分：3  分
4.  为什么要生成可执行文件和制作安装盘？


      满分：3  分
5.  如何为一个菜单项设置热键和快捷键？


      满分：3  分
6.  在什么情况下可以设置断点？


      满分：3  分
7.  表间的关系类型有哪几种？


      满分：3  分
8.  在程序设计中为什么尽量不用GoTo语句？


      满分：3  分
9.  EOF函数的功能是什么？


      满分：3  分
10.  逐语句和逐过程有什么区别？

四、论述题（共 2 道试题，共 20 分。）V 1.  
编程题

编程求任意两个正整数（利用两个文本框输入）的最大公约数，并利用标签输出结果。（界面自行设计）



      满分：10  分
2.  
编程题

实现二进制方式文件的复制。（界面自行设计）

五、主观填空题（共 1 道试题，共 5 分。）V 1.  设某列表框共有10项，按题目要求补齐程序，完成相应的功能。
（1）按下命令按钮Command1时将列表框第8项的内容显示在窗体上：
Private Sub Command1_Click( )
List.(7)=True
Print List1.
End Sub
（2）单击列表框某一项时立即将该项打印在窗体上：
Private Sub List1_Click( )
Print
End Sub
（3）按下命令按钮Command1时在窗体上删除第1、3、5、7、9项：
Private Sub Command1_Click( )
For I=1 To 5
List1.
Next I
End Sub
（4）在列表框的每一项之后插入一个新的项：
Private Sub Command1_Click( )
For I=1 to 10
X=InputBox(“请输入插入的第” & I & “项内容”)
List1.AddItem
Next I
End Sub


六、主观填空题（共 1 道试题，共 4 分。）V 1.  一个控件在窗体的位置由和属性决定，其大小由和属性决定。
七、主观填空题（共 2 道试题，共 6 分。）V 1.  文件按存取方式及其组成结构可分为文件、文件和文件。
  试题满分：3 分
第 1 空、  满分：1 分  
第 2 空、  满分：1 分  
第 3 空、  满分：1 分  

2.  
使用方法可在窗体中进行文本的输出，用方法可画圆，用方法可画直线。

  试题满分：3 分

八、主观填空题（共 2 道试题，共 4 分。）V 1.  在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2中。请填空。
Private Sub Command1_Click()

Sum = 0

For i=0 To 4

Sum=Sum+

Next i

=Sum

End Sub

  试题满分：2 分
第 1 空、  满分：1 分  
第 2 空、  满分：1 分  

2.  要使装入到列表框中的数据项能自动按字母顺序排序，应设置该控件的属性为。  

  试题满分：2 分

九、主观填空题（共 6 道试题，共 6 分。）V 1.  在Visual Basic中声明静态变量的关键字是。  

  试题满分：1 分
第 1 空、  满分：1 分  

2.  函数Abs(x)的功能是。  

  试题满分：1 分
第 1 空、  满分：1 分  

3.  表达式10 Mod 6 \ 4的值为。
  试题满分：1 分
第 1 空、  满分：1 分  

4.  利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和属性为true，才能接受焦点。  

  试题满分：1 分
第 1 空、  满分：1 分  

5.  要将焦点定位到命令按钮Command1上，需要使用代码。
  试题满分：1 分
第 1 空、  满分：1 分  

6.  对于正在使用的动态数组Arraya()，要增加一个单元，但不能破坏数组内的数据，则应使用语句。
  试题满分：1 分