如何使用控件计划

Visual Basic是一种非常有效的Windows编程工具，是目前Windows编程工具中使用最广泛的语言。在所有资料中，大多都没有介绍Visual Basic中一个非常有用的控件——通用对话框Commom Dialog。 　　在一般的程序设计中，文件操作对话框都是必不可少的。而这种对话框的设计也比较繁琐。首先，要设计一个新格式Form并设置好边框，再在上面设计一个文本框TextBox用以显示和输入文件名，一个文件列表框FileListBox，一个目录列表框DirListBox，一个驱动器列表框Drivelist， 一个小型组合框ComboBox用以显示和选择类型。而且还要编写好几个过程程序来完成总体功能。虽然整个实现过程难度并不算太大，但较为烦琐。

现在，有了通用对话框Commom Dialog以后，事情就简单多了。Commom Dialog共有七种用法，调用语法为：[Form.]tion[=Setting]

其中：

Setting Dialog Displayed

0 No action 不运行

1 Open 打开文件

2 Save as 换名存盘

3 Color 色彩

4 Font 字型

5 Printer 打印

6 Invokes E 调用帮助文件

现在，我们以打开文件对话框Open为例予以具体说明。首先，在格式上建立一个通用对话框控件CMDialog1，设置其属性如下：

DialogTitle=对话框标题 ：次项空缺时，对话框标题等于

激活方式Setting。

Filename=＊.txt ：缺省文件名

Filter=文本文件[＊.txt]|＊.txt|所有文件 [＊.＊]|＊.＊| ：文件

选择类型为文本文件[＊.txt]——通配符＊.txt，或

所有文件[＊.＊]——通配符＊.＊。注意，以上各项均

以竖杠符“|”结束。

LnitDiv=C:\\ ：文件缺省路径。

通用对话框Commom Dialog控件被调用后，属性Filename返回用户所选文件名。如果调用失败，Commom Dialog返回VB的错误代码为Err=32755.下面为调用程序：

Sub Command1_Click ()

tion = 1

If Err 32755 Then

fname＄ = lename

由于底特律不能为居民提供具有吸引力的就业和人居环境 Caption = fname＄ ：将窗口标题改为文件名

End If

End Sub

现在，您已经可以调用通用对话框Commom Dialog了。