网球

如何使用VB控件Commom Dialog

2019-10-17 02:36:30来源:励志吧0次阅读

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

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

其中:

Setting Dialog Displayed

0 No action 不运行

1 Open 打开文件

2 Save as 换名存盘

3 Color 色彩

4 Font 字型

5 Printer 打印

6 Invokes WINHELP.EXE 调用帮助文件

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

DialogTitle=<对话框标题> :次项空缺时,对话框标题等于

激活方式Setting。

Filename=*.txt :缺省文件名

Filter=<文本文件[*.txt]>|*.txt|<所有文件 [*.*]>|*.*| :文件

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

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

以竖杠符“|”结束。

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

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

Sub Command1_Click ()

CmDialog1.action = 1

If Err <> 32755 Then

fname$ = CmDialog1.Filename

Caption = fname$ :将窗口标题改为文件名

End If

End Sub

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

七台河牛皮癣医院哪家好
百色治疗牛皮癣费用
东营整形美容费用
淄博治疗阴道炎医院
嘉兴治疗阴道炎费用
分享到: