📄 020101.htm
字号:
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>vb study</title><style>
<!--
td {font-size: 9pt}
A:link {text-decoration: none; color: #0033cc;font-size: 9pt}
A:visited {text-decoration: none; color: #0066CC;font-size: 9pt}
A:active {text-decoration: none; color: #ff0000; font-size: 9pt}
A:hover {text-decoration: underline; color: #000000;font-size: 9pt}
-->
</style>
</head>
<body>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="98%">
<tr>
<td width="100%"><a href="#">你的位置</a>：<a href="http://www.xxby.com" target="_blank">华生小屋</a>--<a href="#">VB学习</a>--<a href="#">ActiveX控件</a></td>
</tr>
<tr>
<td width="100%">
<p align="center">主要ActiveX控件</td>
</tr>
<tr>
<td width="100%"><br>
通用对话框Commondialog对象<br>
<br>
一个很有用的对象：通用对话框：commondialog对象。<br>
实现程序的功能，有五种情况下要用到它：<br>
1。打开一个文件（open)时，调用通用对话框得到文件的全路径和文件名。 打开方法：showopen。例： CommonDialog1.ShowOpen<br>
2。将一个文件另存为（save as)时，调用它返回目标路径及文件名。<br>
打开方法：showsave.<br>
3.设置打印机选项(print):打开方法：showprinter<br>
4.设置字体和风格（font);打开方法：showfont<br>
5.让用户从调色板选颜色（color);打开方法：showcolor 如在代码中写入<br>
CommonDialog1.ShowColor一句，运行时就会打开这种情况的通用对话框<br>
供你选择。<br>
OPEN对话框和SAVE对话框的filename属性：返回用户在对话框选定的完整路名和文件名到代码中。<br>
COLOR对话框的color属性：返回用户在对话框中指定的颜色。<br>
一个示例代码如下：<br>
Private Sub mnuopenitem_Click()<br>
CommonDialog1.Filter = "Metafile(*.bmp)|*.bmp"<br>
CommonDialog1.ShowOpen<br>
Image1.Picture = LoadPicture(CommonDialog1.FileName)<br>
mnucloseitem.Enabled = True<br>
End Sub<br>
<br>
Private Sub mnutextcoloritem_Click()<br>
CommonDialog1.Flags = &H1&<br>
CommonDialog1.ShowColor<br>
Label1.ForeColor = CommonDialog1.Color<br>
End Sub<br>
通用对话框commondialog的OPEN对话框与SAVE对话框的filter属性：指定要打开（过滤）文件的类型（以扩展名来区分），格式：<br>
对话框名称.filter="类型1描述|类型1扩展名|类型2描述|类型2扩展名|……"<br>
commondialog1.filter="李新宁的文本文件|*.txt|pictures(*.ico)|*.ico"<br>
类型描述是程序员指定在对话框中显示的名字，供用户选择，而扩展名必须以"*.exe"或"*.bat"或"*.bmp"……等等来标识，一个描述对应一个扩展名，用管道符号"|"分开。也可对应多个用分号连接的扩展名，如：…="图片文件|*.bmp;*.ico;*.wmf"。<br>
通用对话框color颜色对话框的flags属性设置值：<br>
&H1:为对话框设置初始颜色值；<br>
&H2:显示全部内容的对话框；<br>
&H4:禁止设置自定义颜色；<br>
&H8:使对话框显示帮助按纽。<br>
程序中赋值时如有几项，则用 or 连接，如：commondialog1.flags=&H1 or &H8<br>
通用对话框font字体对话框的flags属性设置值：一定要包含cdlCFBoth（或&H3)值在内的多个值的组合（用or连接），如：<br>
commondialog1.flags=cdlCFBoth or cdlCFEffects or cdlCFHelpbutton <br>
至于各常数值，要参阅有关资料。有一个可指定颜色和删除线下划线的常数，就是上例中的cdlCFEffects（或&H100),记住它。<br>
通用对话框的OPEN对话框和SAVE对话框的flags属性：<br>
&H2000:当文件不存在时提示创建文件；<br>
&H2:"另存为"对话框当选择的文件已存在时提示是否覆盖原文件。<br>
commondialog通用对话框的DialogTitle属性：设置对话框标题栏文字。<br>
InitDir属性：为"另存为"对话框指定初始目录。缺省为当前目录。
<p align="center">
<br>
< <a href="011502.htm">上一页</a>--<a href="http://www.xxby.com" target="_blank">华生小屋</a>--<a href="020102.htm">下一页</a>
><br>
</p>
</td>
</tr>
</table>
</center>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -