公共对话框控件

在大多数程序中都要涉及文件的打开、保存；字体的选择、大小设置；颜色的设置等，这时就需要有相应的对话框来进行设置。如果这些对话框让我们自己进行设汁通常比较麻烦，那就要用到公共对话框控件了。

在Windows系统有打开文件、保存文件、颜色、字体、打印等公共对话框。为了与Windows系统对话框的风格保持一致，Visual Basic也提供了这些公共对话框控件，当我们需要用到上面所提及的对话框直接调用系统对话框即可，而无须自己设计。这些对话框都是以控件的形式出现的。

如何引用公共对话框控件

公共对话框控件不在Visual Basic的控件工具栏中，因此在使用之前必须将其引入到控件工具栏。具体步骤如下：

步骤1
右键单击控件工具栏，在弹出快捷菜单中选择“部件”或选择“工程”菜单中的“部件”命令，将会弹出“部件”对话框。

步骤2
在列表框中找到并选择“Microsoft Common Dialog Control 6.0”，单击确定按钮即可。此时你会发现控件工具栏中多了一个控件出来。

这时公共对话框控件已添加到控件工具栏了，要想在程序中使用公共对话框，还必须将公共对话框控件像其它控件—样添加到窗体中去。此控件在程序运行时是不可见的。

公共对话框时只能在程序中使用代码将其调用出来，调用格式如下：

公共对话框控件名．Action=数值

公共对话框控件名．方法名

其中，数值、方法名是用来表示要调用的是什么类型的公共对活框。Action属性的取值及应的方法名如下表。

Action属性值

方法

ShowOpen

调用的对话框

调用打开对话框

ShowSave

ShowColor

调用另存为对话框

调用颜色对话框

ShowFont

ShowPrinter

调用字体对话框

调用打印对话框

ShowHelp

调用Windows系统帮助工具

对Action属性赋予相应的值或使用相应的方法，即可调出某个对活框。例如：

CommonDialOgl.Action= 1

CommonDialog1.ShowOpen

上面两个沿句是完全等价的，都是调用打开对话框。

公共对话框控件有以下几个常用属性。

(1)CancelError属性：通常对活框都右—个“取消”按钮，此属性用于确定当用户单击了“按钮后，是否产生—个错误信息。如果需要对用户单击“取消”按钮时进行特别的处理，可以通过将CancelError属性设置为“True”；如果该属性的值设置为“False”时不产生信息即不进行特别的处理。

(2)DialogTitle属性：用来返回或设置对话框的标题。

(3)Flags属性：用来调整对话框功能。该属性的值将随Action属性的不同而取值而不同。

打开、另存为公共对话框

打开和另存为对话框是应用程序中最常用到的两个对话框。

开和另存为对话框的属性主要有：

(1)DefaultExt属性：此属性用于返回或设置对活框中文件类型下拉菜单中默认类型的扩I展名，如Txt、Bmp、Doc等。

(2)DialogTitle属性：用于返回或设置对话框中的标题。

(3)Filter属性：用于返回或设置对话框中所列出的文件类型。例如，要设置只打开或则存为文本文件，可以将引lter属性设置为“Text|*.txt”。其中“|”前面的内容是各种文件类型的说明，后面的内容则的该类型文件的扩展名。如果设置为多种类型，需要在这多种类型文件的扩展名之间加上分号，例如：将Filter属性的值设置为“Image*.bmp；*.gif”，就会在列表框中同时显示bmp、gif类型的文件。

(4)Filename属性：返回或设置选定文件的路径和文件名。

颜色公共对话框

颜色公共对话框有一个“Color”。它是用来返回用户所选择的颜色或设置用户打开对话框时初始颜色。

颜色对话框的Flags属性的取值如下表所示

常量

CdCCFullOpen

数值

&H2

描述

显显示全部的对话框，包括自定义颜色的部分

CdlCCShow}telpButlon

CdCCPreve ntFu]IOpen

&H8

&H4

使对话框提示帮助按钮

使规定自定义颜色命令按钮无效并防止自定义颜色

CdICCRGBInit

&Hj

为对话框没首初始颜色值

字体公共对话框

字体对话框利用用来设置字体的大小、字形、字号等等。字体对话框的属性主要有：

（1）Color属性：设置是否为所选字体设置颜色。要使用这个属性，首先要将Flags属性设置为“CdlCFEffeets”。

（2）FontBold属性：设置为是否为所选字体设置为黑体。

（3）FontItaic属性：设置为是否所选字体设置为斜体字。

（4）FontStrikeThru属性：设置是否为带有删除线。要使用这个属性，同样要先将Flags属性设置为“CdlCFEffeets”。

（5）FontUnderIine属性：当其值为True时，设置字体带有下划线。要使用这个属性，要将Flags属性设置为“CdlCFEffeets”。

（6）FontName属性：返回所选字体名。

（7）FontSize属性：返回所选字体号。

字体公共对话框的Flags属性取值如下：

常量

CdlCFANSIOnly

数值

&H400

描述漫

指定对话框只允许选择windows字符集的字体

如果该标志被没置，就不能选择仅含符号的字体

CdlCFApply

CdlCFBoth

&H200

&H3

使字体对话框中的“应用”按钮有效

使对话杠列出可用的打印机和屏幕字体hDC属性

标识与打印机相关的设备描述

CdlCFEffects

CdlCFFixedPitchonly

&H100

&H4000

指定对活允许删除线、下划线、以及颜色效果

指定对话框只能选择固定间距的字体

CdlCFForceFontExist

CdlCFlielpButton

CdlCFLimitSize

CdlCFNoFaceSel

&H10000

&H4

&H2000

&H80000

如果用户试图选择—个并不存在的字体或样式，显示错误提示信息

使字休对活框显示帮助按钮

指定对话框只能由Min和Max属性规定的范围。

选择字体大小

没选选择字休名称

CdlCFNoSimUlati011s

CdlCFNoSizeSel

&H1000

&H200000

指定对活框不允许图形设备接口(GDl)字体模拟

没有选择字体大小

CdlCFNoStylesel

CdlCFNoVectorFonts

&H100000

&H800

没有选择样式

指定对话框不允许矢量字体选择

CdlCFPrinterFonts

CdlCFScalableonly

&H2

&H20000

使对话框只列出由hDC属性指定的打印机支持的字体

指定对话框只允许选择可缩放的字体

CdlCFScreenFonts

CdlCFTTOnly

&H1

&H40000

使对话框只列出系统支持的屏幕字体

指定对活框只允许选择TrueType

打印公共对话框

打印公共对话框主要用来设置打印机名称、打印范围和打印份数等等，其主要属性如下：

（1）Copies：打印份数

（2）FromPage：打印启起始页号

（3）ToPage：打印结束页号

（4）HDC：所选打印机的设备描述

计时控件（Timer）

Timer控件每隔一段时间就会触发一次Timer事件，因此它可以用来定时的去执行某一段代码，该控件最重要的属性是Interval属性，是用来设置或返回两次调Timer控件的Timer事件间隔的毫秒数。

Timer控件可以在时钟程序中显示当前时间，下面我们来制作一个简单的时钟程序。

步骤1：
首先新建一个工程，并将窗体的“Caption”属性设置为“时钟程序”，ControlBox属性设置为“False”

步骤2：
在窗体上添加两个标签（Label）控件，并将Label1的Caption属性设置为“当前系统时间为：”Label2属性的Capotion属性为空。

步骤3：
在窗体上添加一个命令按钮控件，其“Caption”属性设置为“关闭”

步骤4：
在窗体上添加一个Timer控件，将其Interval属性设置为“1000”（1000毫秒为秒）
至此，窗体已经设计完毕。下面，为程序编写代码

程序主要通过Timer控件的Timer事件将Label2上显示的系统时间每一秒刷新一次，程序运行后可以看到最后的秒数在不挺变动。因此，只需要对Timer控件的Timer事件过程编写如下代码即可

Private Sub Timer1_Timer()
Label2.Caption = Time
End Sub

其中Time()为系统时间函数，Label2.Caption=Time()将系统时间通过Label标签显示出来，最后在关闭按钮的Click事件加入Unload Me就退出程序即可

基础篇共50页[1 2 3 4 5 6 7 >»<... 最后一页]