2013年4月考试可视化程序设计（VB）第三次作业

一、填空题（本大题共60分，共 15 小题，每小题 4 分）

1. 要使用状态栏控件设计状态栏，应首先在“部件”对话框中选择 ______ ，然后从工具箱中选择 ______ 控件。

2. 对象的边框类型由 ______ _属性设置。

3. VB的每个菜单项都有一个下拉菜单，含有若干个 ______ 命令。用鼠标单击某个菜单项就执行相应的菜单命令。

4. 菜单的热键指使用 ______ 键和菜单项标题中的一个字符来打开菜单。建立热键的方法是在菜单标题的某个字符前加上一个 ______ 符号，在菜单中这一字符会自动加上 ______ ，表示该字符是一个热键字符。

5. 运行时，要使工具栏控件Toolbarl中的第二个按钮的按钮菜单中的第三项无效（变成灰色），应使用语句： ______ 。

6. 根据文件内容区分，文件分为 ______ 和 ______ 。

7. 当使用Format函数与Print方法一起输出时，格式字符串中的”#”号表示一个数字位，它的个数决定 ______ 的长度，若要显示的数据位数大于这个长度，则显示时数据按 ______ 显示。

8. 菜单在运行时的动态增减主要通过控件数组实现，首先将菜单项的 ______ 属性设为False，然后在程序中用 ______ 语句加载。

9. 如果将工程的启动对象设置成 ______ 子程序，则程序启动时可以不加载任何窗体。

10. 要从字符串“Visual Basic 6.0”中截取子字符串“Basic”可使用的函数是 ______ 。

11. 要在运行时给状态栏 StatusBar1的第二个窗格添加一幅图片，该图片由文件 “c：＼windows＼winupd．ico”指定，应使用语句： ______ 。

12. 若case子句中的表达式表列具有形式：表达式1 To 表达式2，则它的含义是：当测试表达式的值等于 ______ 时，执行该case子句相应的程序块。

13. 表示x是5的倍数或是9的倍数的逻辑表达式是 ______ 。

14. 程序运行过程中，在立即窗口显示变量f的语句是 ______ 。

15. 设

Form1.Scaleleft=-250，

Form1.Scalertop=300，

Form1.Scalewidth=350，

Form1.Scaleheight=500，

则Form1的右下角坐标为 ______ 。

二、程序阅读题（本大题共40分，共 10 小题，每小题 4 分）

1. 若窗体Form1上添加了通用对话框CommonDialog1，下面程序的功能是什么？

Dim filename As String

Dim str As String

CommonDialog1.Filter = "文本文件(*.TXT)|*.txt"

CommonDialog1.Action = 1

filename = CommonDialog1.filename

CommonDialog1.ShowColor