Appearance 属性 (ActiveX 控件)

返回或设置 MDIForm 或 Form 对象上的控件在设计时的绘图风格。在运行时是只读的。

语法

object.Appearance

object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

设置值

Appearance 属性的设置值是：

设置值	描述
0	平面绘制控件和没有可视化效果的窗体。
1	（缺省值）3D。带有三维效果的绘制控件。
说明

如果在设计时将其设置为 1，那么 Appearance 属性在画出控件时带有三维效果。如果窗体的 BorderStyle 属性被设置为固定双边框（vbFixedDouble，或 3），窗体的标题和边框也是以有三维效果的方式绘画的。将 Appearance 属性设置为 1，也导致窗体及其控件的 BackColor 属性被设置为这样的颜色，该颜色是为操作系统的“显示属性”对话框的“外观”选项卡中的 3D 对象选定的。

将 MDIForm 对象的 Appearance 属性设置为 1，只对 MDI 父窗体产生影响。想要在 MDI 子窗体上具有三维效果，必须将每个子窗体的 Appearance 属性设置为 1。


BackColor、ForeColor 属性 (ActiveX 控件)

•	BackColor－返回或设置对象的背景颜色。

•	ForeColor－返回或设置在对象里显示图片和文本的前景颜色。

语法

object.BackColor [= color]

object.ForeColor [= color]

BackColor 和 ForeColor 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
color	值或常数，确定对象前景或背景的颜色，“设置值”中有详细说明。
设置值

Visual Basic 用 Microsoft Windows 运行环境的红-绿-蓝 (RGB) 颜色方案。color 的设置值如下：

设置值	描述
标准 RGB 颜色	使用调色板或在代码中使用 RGB 或 QBColor 函数指定的颜色。
系统缺省颜色	由对象浏览器中的 Visual Basic (VB) 对象库所列的系统颜色常数指定的颜色。Windows 运行环境替换使用用户在控制面板设置值中的选择。
对所有的窗体和控件，在设计时的缺省设置值如下：

•	BackColor－设置为由常数 vbWindowBackground 定义的系统缺省颜色。

•	ForeColor－设置为由常数 vbWindowText 定义的系统缺省颜色。

说明

在 Label 和 Shape，控件中，如果 BackStyle 属性的设置值为 0（透明），则忽略 BackColor 属性。

如果在 Form 对象或 Picturebox 控件中设置 BackColor 属性，则所有的文本和图片，包括指定的图片，都被擦除。设置 ForeColor 属性值不会影响已经绘出的图片或打印输出。在其它的所有控件中，屏幕的颜色会立即改变。

标准 RGB 颜色的有效取值范围是 0 到 16,777,215 (&HFFFFFF)。该范围内数的高字节为 0；较低的 3 个字节，从最低字节到最高字节依次决定红、绿和蓝的量。红、绿和蓝的成分，分别由一个介于 0 与 255 (&HFF) 之间的数来表示。如果最高字节不为 0，Visual Basic 将使用系统颜色，这些颜色由用户的控制面板设置值和由对象浏览器中的 Visual Basic (VB) 对象库所列出的常数来确定。

在 Windows 运行环境中显示文本，文本和背景的颜色必须都是原色。如果所选择的文本或背景颜色没有显示出来，则选择颜色中可能有抖动色－也就是说，最多由三种不同颜色的像素组成的颜色。如果对文本或背景选择了抖动色，则会用最接近的原色来代替。


BorderStyle 属性 (ActiveX 控件)

返回或设置对象的边框样式。对 Form 对象和 Textbox 控件在运行时是只读的。

语法

object.BorderStyle = [value]

BorderStyle 属性语法有这些组成部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
value	值或常数，用于决定边框样式，“设置值”中有详细说明。
设置值

Form 对象的 BorderStyle 属性设置值如下：

常数	设置值	描述
vbBSNone	0	无（没有边框或与边框相关的元素）。
vbFixedSingle	1	固定单边框。可以包含控制菜单框，标题栏 ，“最大化”按钮，和“最小化”按钮。只有使用最大化和最小化按钮才能改变大小。
vbSizable	2	（缺省值）可调整的边框。可以使用设置值1列出的任何可选边框元素重新改变尺寸。
vbFixedDouble	3	固定对话框。可以包含控制菜单框和标题栏，不能包含最大化和最小化按钮，不能改变尺寸。
vbFixedToolWindow	4	固定工具窗口。不能改变尺寸。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示。
vbSizableToolWindow	5	可变尺寸工具窗口。可变大小。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示。
MS Flex Grid、Image、Label、OLE 容器、PictureBox、Frame 和 TextBox 控件的 BorderStyle 属性设置值如下：

设置值	描述
0	（Image 和 Label 控件的缺省值）无。
1	（MS Flex Grid、PictureBox、TextBox 和 OLE 容器控件的缺省值）固定单边框。
Line 和 Shape 控件的 BorderStyle 属性设置值如下：

常数	设置值	描述
vbTransparent	0	透明
vbBSSolid	1	（缺省值）实线。边框处于形状边缘的中心。
vbBSDash	2	虚线
vbBSDot	3	点线
vbBSDashDot	4	点划线
vbBSDashDotDot	5	双点划线
vbBSInsideSolid	6	内收实线。边框的外边界就是形状的外边缘。
说明

对于窗体，BorderStyle 属性决定了其主要特征，这些特征从外观上就能确定窗体是通用窗口或对话框。设置值 3（固定对话框）用于标准对话框。设置值 4（固定工具窗口）和 5（可变工具窗口）用于创建工具箱样式的窗口。

设置值为 2（可变尺寸）的 MDI 子窗体，以 Windows 运行环境运行时定义的缺省尺寸，在 MDI 窗体内显示。对于任何其它设置值，窗体按设计时指定的大小显示。

改变 Form 对象的 BorderStyle 属性设置值，可能会改变 MinButton、MaxButton 和 ShowInTaskbar 属性的设置值。当 BorderStyle 设置为 1（固定单边框）或 2（可变尺寸）时，MinButton、MaxButton 和 ShowInTaskbar 属性自动设置为 True。当 BorderStyle 设置为 0（无）、3（固定对话框）、4（固定工具窗口）或 5（可变工具窗口）、MinButton、MaxButton 和 ShowInTaskbar 属性自动设置为 False。

注意   如果带有菜单的窗体设置为 3（固定对话框），该窗体将按设置值 1（固定单边框）显示。

运行时，窗体或者是有模式或者是无模式，都可以用 Show 方法指定。


BorderStyle 常数（ActiveX 控件）

常数	值	描述
ccNone	0	（缺省）无边框或边框关联要素。
ccFixedSingle	1	（ListView 控件缺省值）单线边框。控件的周边是一条单线。
注意  cc 前缀指被保留的 ActiveX 控件。常数的前缀可能随特定控件或控件组的变化而变化。但是，除非加以指明，否则描述不会改变。


Caption 属性 (ActiveX 控件)

•	窗体－确定显示在 Form 或 MDIForm 对象的标题栏中的文本。当窗体为最小化时，该文本被显示在窗体图标的下面。

•	控件－确定显示在控件中还是附在控件之后的文本。

•	MenuLine 对象－确定为 Menu 控件还是为 MenuItems 集合中的对象显示的文本。

对于 Menu 控件，Caption 在运行时通常是可读/写的。但是对于被 Visual Basic 的加载宏遗弃或提供的菜单项来说，Caption 是只读的，例如 MenuLine 对象。

语法

object.Caption [= string]

Caption 属性的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。如果 object 被省略，那么与活动窗体模块相联系的窗体被认为是 object。
string	字符串表达式，其值是被显示为标题的文本。
说明

当创建一个新的对象时，其缺省标题为缺省的 Name 属性设置。该缺省标题包括对象名和一个整数，如 Command1 或 Form1。为了获得一个描述更清楚的标签，应对 Caption 属性进行设置。

可以使用 Caption 属性赋予控件一个访问键。在标题中，在想要指定为访问键的字符前加一个 (&) 符号。该字符就带有一个下划线。同时按下 ALT 键和带下划线的字符就可把焦点移动到那个控件上。为了在标题中加入一个 (&) 符号而不是创建访问键，需要在标题中加入两个即 (&&) 符号。这样，在标题中只有单个 (&) 符号被显示而没有带下划线的字符。

Label 控件标题的大小没有限制。对于窗体和所有别的有标题的控件，标题大小的限制是 255 个字符。

要为窗体显示标题，可以将 BorderStyle 属性设为定长单线（1 或 vbFixedSingle）、复长（2 或 vbSizable）、或定长对话框 (3 或 vbFixedDialog)。超出窗体标题栏的标题将被裁切。当一个 MDI 子窗体在一个 MDIForm 对象中被最大化时，子窗体的标题将被包括在父窗体的标题中。

提示   对于标签来说，将 AutoSize 属性设为 True 自动调整控件的大小以与其标题相适合。


Change 事件 (ActiveX 控件)

指示一个控件的内容已经改变的。此事件如何和何时发生则随控件的不同而不同：

•	ComboBox － 改变控件的文本框部分的正文。该事件仅在 Style 属性设置为 0（下拉 Combo）或 1（简单 Combo）和正文被改变或者通过代码改变了 Text 属性的设置时才会发生。

•	DirListBox － 改变所选择的目录。该事件在双击一个新的目录或通过代码改变 Path 属性的设置时发生。

•	DriveListBox － 改变所选择的驱动器。该事件当选择一个新的驱动器或通过代码改变 Drive 属性的设置时发生。

•	HScrollBar 和 VScrollBar（水平和垂直滚动条） － 移动滚动条的滚动框部分。该事件在进行滚动或通过代码改变 Value 属性的设置时发生。

•	Label － 改变 Label 的内容。该事件在一个 DDE 链接更新数据或通过代码改变 Caption 属性的设置时发生。

•	PictureBox － 改变 PictureBox 的内容。该事件当一个 DDE 链接更新数据或通过代码改变 Picture 属性的设置时发生。

•	TextBox － 改变文本框的内容。该事件当一个 DDE 链接更新数据、用户改变正文或通过代码改变 Text 属性的设置时发生。

语法

Private Sub object_Change([index As Integer])

Change 事件语法包括下列部分：

部分	描述
object	一个对象表达式，其值是“应用于”列表中的一个对象。
index	一个整数，用来唯一地标识一个在控件数组中控件。
说明

Change 事件过程可协调在各控件间显示的数据或使它们同步。例如，可用一个滚动条的 Change 事件过程更新一个 TextBox 控件中滚动条的 Value 属性的设置。或者可以利用 Change 事件过程在一个工作区里显示数据和公式，在另一个区域里显示结果。

Change 事件过程在更新系统控件（DirListBox，DriveListBox 和 FileListBox）中的各属性时也是有用的。例如，可更新一个 DirListBox 控件的 Path 属性设置来反映一个 DriveListBox 控件的 Drive 属性设置的改变。

注意   一个 Change 事件过程有时会导致一个层叠事件。这种情况在控件的 Change 事件过程改变该控件的内容时会发生，例如，通过用代码设置一个决定该控件的值的属性，如对一个 TextBox 控件的 Text 属性之类的设置。为了避免层叠事件：

•	如果可能，应避免为控件编写能改变该控件内容的 Change 事件过程。如果编写了那样的过程，应确保设置一个标志用来防止在当前变化进行中更进一步的变化。

•	避免创建两个或两个以上其 Change 事件过程互相影响的控件。例如，两个 TextBox 控件在它们的 Change 事件期间互相更新。

•	避免对 HScrollBar 和 VScrollBar 控件在 Change 事件中使用 MsgBox 函数或语句。


Clear 方法（ActiveX 控件）

删除集合中的全部对象。

语法

object.Clear

Object 所在处表示对象表达式，其值是 “应用于”列表中的一个对象。

说明

为了从集合中只删除一个对象，使用 Remove 方法。


Clear 方法（ActiveX 控件）示例

本示例在 StatusBar 控件中添加六个 Panel 对象，共创建七个 Panel 对象。当对象数达到七个时，单击窗体清除全部 Panel 对象。如果 Panel 对象数比七小，每次单击窗体将在控件中添加一个新的 Panel 对象，直至对象数再次为七。要试用此例，在窗体上放一个 StatusBar 控件并将该代码粘贴到 声明部分。运行此例，单击窗体清除全部 Panel 对象，再依次添加 Panel 对象。

Private Sub Form_Load()

Dim pnlX As Panel	' 为 Panel 对象声对象变量。

Dim I As Integer

' 在缺省的单一 Panel 对象中添加六个 Panel 对象，

' 生成七个 Panel 对象。

For I = 1 to 6

Set pnlX = StatusBar1.Panels.Add

Next I

End Sub

Private Sub Form_Click()

' 如果计数值为7，则清除集合。

'否则，添加一个 Panel 并使用集合的 Count 属性设置其 Style。

If StatusBar1.Panels.Count = 7 Then

StatusBar1.Panels.Clear

Else

Dim pnlX As Panel

Set pnlX = StatusBar1.Panels.Add( , , "simple", 0)

' Style 属性从 0 到 6 计数。

'使用 Panels Count属性 -1 对新 Panel 设置 Style 属性。

' 不考虑窗体宽度，显示全部 Panel 。

pnlX.minwidth = TextWidth("simple")

pnlX.AutoSize = sbrSpring

pnlX.Style = Statusbar1.Panels.Count - 1

End If

End Sub


Click 事件 (ActiveX 控件)

此事件是在一个对象上按下然后释放一个鼠标按钮时发生。它也会发生在一个控件的值改变时。

对一个 Form 对象来说，该事件是在单击一个空白区或一个无效控件时发生。对一个控件来说，这类事件的发生是当：

•	用鼠标的左键或右键单击一个控件。对 CheckBox, CommandButton, Listbox 或 OptionButton 控件来说，Click 事件仅当单击鼠标左键时发生。

•	通过按下箭头键或者单击鼠标按钮，对 ComboBox 或 ListBox 控件中的项目进行选择。

•	当 CommandButton,OptionButton 或 CheckBox 控件具有焦点时，按下 SPACEBAR 键。

•	当窗体带有其 Default 属性设置为 True 的 CommandButton 控件时，按下 ENTER 键。

•	当窗体带有一个 Cancel 按钮 — 其 Cancel 属性设置为 True 的 CommandButton 控件时，按下 ESC 键。

•	对控件按下一个访问键。例如，如果一个 CommandButton 控件的标题是 "&Go"，则按下 ALT+G 键可触发该事件。

也可在代码中触发 Click 事件，通过：

•	将一个 CommandButton 控件的 Value 属性设置为 True。

•	将一个 OptionButton 控件的 Value 属性设置为 True。

•	改变一个 CheckBox 控件的 Value 属性的设置。

语法

Private Sub Form_Click( )

Private Sub object_Click([index As Integer])

Click 事件的语法包括下列部分：

部分	描述
object	一个对象表达式，其值是“应用于”列表中的一个对象。
index	一个整数，用来唯一地标识一个在控件数组中的控件。
说明

通常，将一个 Click 事件过程附加到一个 CommandButton 控件，Menu 对象或 PictureBox 控件上用来执行命令或类似命令的操作。对其它可应用的控件来说，使用这个事件来触发一个动作以响应控件中的变化。

可用一个控件的 Value 属性从代码中测试该控件的状态。单击一个控件除了产生 Click 事件以外还可产生 MouseDown 和 MouseUp 事件。这三种事件发生的顺序根据控件的不同而不同。例如，对 ListBox 和 CommandButton 控件来说，这些事件按下列顺序发生：MouseDown、Click、MouseUp。但对 FileListBox,Label 或 PictureBox 控件来说，这些事件按下列顺序发生：MouseDown、MouseUp 和 Click。当给这些相关的事件附加事件过程时，要确保它们的操作不互相冲突。如果在应用程序中事件发生的顺序是重要的，则应对控件进行测试以确定事件的顺序。

注意   为区别鼠标的左、中、右按钮，应使用 MouseDown 和 MouseUp 事件。

如果在 Click 事件中有代码，则 DlbClick 事件将永远不会被触发，因为 Click 事件是两个事件中首先被触发的事件。其结果是鼠标单击被 Click 事件截断，从而使 DblClick 事件不会发生。


Clipboard 对象常数 (ActiveX 控件)

常数	值	描述
vbCFLink	&HBF00	DDE 对话信息
vbCFRTF	&HBF01	Rich Text Format (.rtf file)
vbCFText	1	文本 (.txt file)
vbCFBitmap	2	位图 (.bmp file)
vbCFMetafile	3	元文件 (.wmf file)
vbCFDIB	8	与设备无关的位图
vbCFPalette	9	调色板


Count 属性 (ActiveX 控件)

返回集合中对象的数目。

语法

object.Count

object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

说明

能够与 For...Next 语句一起使用该属性对集合中的窗体或控件上执行操作。例如，下面的代码将一个窗体上的所有控件向右移动 0.5 英寸（ScaleMode 属性设置为 1 或 vbTwips）：

For I = 0 To Form1. Controls.Count - 1

Form1. Controls (I).Left=Form1. Controls(I).Left + 720

Next I

也可以使用这种结构快速地使窗体中的所有控件有效或失效。

当与 If TypeOf 语句一起使用时，可以经过所有的控件进行循环并进行改变，例如，仅对文本框的 Enabled 属性设置或仅对选项按钮的 BackColor 属性的设置进行处理。


Enabled 属性 (ActiveX 控件)

返回或设置一个值，该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。

语法

object.Enabled [= boolean]

Enabled 属性的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。如果 object 被省略，则与活动窗体模块相联系的窗体被认为是 object。
boolean	一个用来指定 object 是否能够对用户产生的事件作出反应的布尔表达式。
设置

boolean 的设置为：

设置	描述
True	（缺省）允许 object 对事件作出反应。
False	阻止 object 对事件作出反应。
说明

Enabled 属性允许在运行时使窗体和控件成为有效或无效。例如，可以使对象成为不能用于应用程序的当前状态的无效状态。也可以使之纯粹用来显示，比如一个提供只读信息的文本框的控件无效。

通过把 Enabled 设置为 False 来使 Timer 控件成为无效，将取消由控件的 Interval 属性所建立的倒计数。

对于 Menu 控件，Enabled 在运行时可正常地读/写。但是对于那些被 Visual Basic 的加载宏遗弃或提供的菜单项来说，Enabled 是只读的，例如在“外接程序”菜单中的“外接程序管理器”命令。


DataObject 对象 (ActiveX 控件)

DataObject 对象是数据的容器，这些数据被从部件源传送到部件目标，它们存储的格式由使用 DataObject 对象的方法定义。

语法

DataObject

说明

映出 IDataObject 接口的 DataObject 对象，允许实现 OLE 拖放及剪贴板操作。

大部分部件支持人工 OLE 拖放事件，也有一些支持自动 OLE 拖放事件。


DataObjectFiles 集合 (ActiveX 控件)

一个集合 ，其元素代表由  DataObject 对象使用的所有文件名的列表（象用户在的文件资源管理器上拖动来、拖动去的文件名。）

语法

object.DataObjectFiles(index)

DataObjectFiles 集合的语法具有以下几个部分：

部分	描述
object	对象表达式，其值是一个 DataObject 对象。
index	在 0 到 DataObjectFiles.Count - 1 范围内取值的一个整数。
说明

注意   仅当 DataObject 对象中的数据具有 vbCFFiles 格式时， Files 属性才会使用该集合。

Files 属性使用 DataObjectFiles 集合，以存储 DataObject 对象中的文件名。该集合包括 Remove、 Add 和 Clear 方法，有了这些方法，就可操作集合中的内容。


DataSource 属性 (ActiveX 控件)

设置一个指定 Data 控件的值，通过这个控件将当前控件连结到数据库上。在运行时不可用。

说明

要在运行时将一个控件连结到数据库中的一个字段上，必须在设计时使用 Properties 窗口在 DataSource 属性指定一个 Data 控件。

要完成同 Data 控件所管理的 Recordset 中的字段的连接，还必须提供 DataField 属性中 Field 对象的名称。不同于 DataField 属性，DataSource 属性的设置在运行时不可用。

数据类型

String


DblClick 事件 (ActiveX 控件)

当在一个对象上按下和释放鼠标按钮并再次按下和释放鼠标按钮时，该事件发生。

对于窗体而言，当双击被禁用的控件或窗体的空白区域时，DblClick 事件发生。对于控件而言，DblClick 事件在以下情形下发生：

•	用鼠标左键双击控件。

•	双击 Style 属性设置为 1(Simple) 的 ComboBox 控件中的项目，或者在 FileListBox 、 ListBox 、DBCombo 或 DBList 控件中的项目。

语法

Private Sub Form_DblClick ( )

Private Sub object_DblClick (index As Integer)

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
index	如果控件在控件数组内，则这个 index 值就用来标识该控件。
说明

如果控件在一个控件数组内，则这个 Index 参数唯一地标识这个控件。可以使用 DblClick 事件过程执行一个隐式操作，如双击图标来打开一个窗口或文档。也可用这类过程执行单一操作的多个步骤，例如用双击在列表框中选定一项并关闭对话框。

要在 Visual Basic 中产生这类快捷效果，可以使用带有缺省按钮的列表框的或叠层排列文件列表框的 DblClick 事件过程；所谓缺省按钮就是 Default 属性设置为 True 的 CommandButton 控件。作为列表框 DblClick 事件过程的一部分，只需简单调用缺省按钮的 Click 事件。

对于那些接收 Mouse 事件的对象，事件按这样的次序发生：MouseDown， MouseUp， Click， DblClick 和 MouseUp。

如果 DblClick 在系统双击时间限制内没有出现，则对象识别另一个 Click 事件。双击时间限制可以变化，因为用户可在控制面板设置双击速度。当与这些相关事件过程打交道时，必须确保它们的活动不发生冲突。不接受 DblClick 事件的控件可能接受两次单击而不是 DblClick 事件。

注意   要想区别鼠标的左、右、中按钮，使用 MouseDown 和 MouseUp 事件。

如果在 Click 事件中有编码，DlbClick 事件将永远不会触发。


DblClick 事件 (ActiveX 控件) 示例

无论是通过单击 CommandButton 控件还是双击列表项，本范例将显示 TextBox 控件中选定的列表项。要试用此例，将代码粘贴包含 ListBox 控件、TextBox 控件和 CommandButton 控件的 Form 对象的声明部分。然后运行此例并单击 CommandButton 控件或双击在 ListBox 控件中的一项。

Private Sub Form_Load ()

List1.AddItem "John"	' 添加列表框项。

List1.AddItem "Paul"

List1.AddItem "George"

List1.AddItem "Ringo"

End Sub

Private Sub List1_DblClick ()

Command1.Value = True	' 触发 Click 事件。

End Sub

Private Sub Command1_Click ()

Text1.Text = List1.Text	' 显示选定。

End Sub


拖放常数 (ActiveX 控件)

DragOver 事件

常数	值	描述
vbEnter	0	源控件拖入目标
vbLeave	1	源控件拖出目标
vbOver	2	源控件从目标中的一个位置拖到另一个位置
Drag 方法 （控件）

常数	值	描述
vbCancel	0	取消拖操作
vbBeginDrag	1	开始拖控件
vbEndDrag	2	放下控件
DragMode 属性

常数	值	描述
vbManual	0	手动
vbAutomatic	1	自动


FetchVerbs 方法 (ActiveX 控件)

更新对象支持的谓词列表。

语法

object.FetchVerbs

object 是一个对象表达式，其值是“应用于”列表中的一个对象。

说明

可用 ObjectVerbs 属性读取更新的谓词列表。


Files 方法 (ActiveX 控件)

返回一个文件名的集合，这些文件名是由 vbCFFiles 格式（一个 DataObjectFiles 集合）来使用的，该格式反过来又包含 DataObject 对象使用的所有文件名的列表；例如，被用户拖动到 Windows“文件管理器”的文件名或从该处拖出来的文件名。

语法

object.Files(index)

Files 集合的语法有下面这些部分：

部分	描述
object	对象表达式，其值是 DataObject 对象。
index	整数，该整数是某个文件名数组的索引。
说明

仅当 DataObject 对象包含类型为 vbCFFiles 的数据时，才可用文件名来对 Files 集合进行填充。DataObject 对象可以包含几个不同的数据类型。通过遍历该集合就可以获取文件名列表。

可对 Files 集合进行填充，所以 Visual Basic 应用程序可作为文件列表的拖放源。


“属性页”对话框 (ActiveX 控件)

在设计时该对话框用来更改控件的属性。

对话框选项

“选项卡”   Visual Basic 创建一个标记对话框，它通过编写代码来处理更新属性值（当用户更改控件中属性值时），从而起到窗体的作用。

用“工程”菜单上的“添加属性页”命令，可以将“属性页”添加到工程中。

“确定”   验证“属性页”设置值，并关闭“属性页”对话框。

“应用”   验证“属性页”，但不关闭“属性页”对话框。


字库不存在 (错误 24574) (公用对话框控件)

在显示“选择字体”对话框之前，必须设置下列标志之一：

•	ScreenFonts

•	PrinterFonts

•	Both


Font 属性 (ActiveX 控件)

返回一个 Font 对象。

语法

object.Font

object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

说明

为了标识一个具体的要使用其属性的 Font 对象应使用一个对象的 Font 属性。例如，下面的代码将改变一个 Font 对象的 Bold 属性设置，该Font 对象被 TextBox 对象的 Font 属性所标识：

txtFirstName.Font.Bold = True


FontName 属性 (ActiveX 控件)

返回或设置在控件中或在运行时画图或打印操作中，显示文本所用的字体。

注意   包含 FontName 属性是为了和 CommonDialog 控件一起使用，以及与先前的 Visual Basic 版本兼容。对于其它的功能，请使用新的 Font 对象属性（对 CommonDialog 控件不可用）。

语法

object.FontName [= font]

FontName 属性语法包括下列组成部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
font	字符串表达式，指定所用的字体名。
说明

该属性的缺省值取决于系统，Visual Basic 中可用的字体取决于系统的配置、显示设备和打印设备。与字体相关的属性只能设置为真正存在的字体的值。

一般来说，用 FontSize、FontBold、FontItalic、FontStrikethru 和 FontUnderline 属性来设置大小和样式属性前，要先改变 FontName 属性。

注意   在运行时，可以用 FontCount 和 Fonts 属性获得系统可用字体的信息。


FontSize 属性 (ActiveX 控件)

返回或设置在控件中或在运行时画图或打印操作中，显示文本所用的字体的大小。

注意    包含 FontSize 属性是为了和 CommonDialog 控件一起使用，以及与以前的 Visual Basic 版本兼容。对于其它的功能，请使用新的 Font 对象属性（对 CommonDialog 控件不可用）。

语法

object.FontSize [= points]

FontSize 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
points	数值表达式，用磅为单位指定所用字体的大小。
说明

用该属性以所要的字体格式化文本。缺省值由系统决定。要改变缺省值，以磅为单位指定字体尺寸。

FontSize 的最大值为 2160 磅。

注意   Visual Basic 中可用的字体取决于系统的配置、显示设备和打印设备。与字体相关的属性只能设置为真正存在的字体的值。

一般来说，用 FontSize、FontBold、FontItalic、FontStrikethru 和 FontUnderline 属性来设置大小和样式属性前，应该先改变 FontName 属性。然而，在设置 TrueType 字体尺寸小于 8 磅时，应用 FontSize 属性来设置字体大小，然后设置 FontName 属性，用 FontSize 属性再一次设置字体大小。Microsoft Windows 运行环境对于小于 8 磅的 TrueType 字体使用不同的字体。


GetData 方法 (ActiveX 控件)

用于从 Clipboard 对象返回一个图形。不支持命名参数。

语法

object.GetData (format)

GetData 方法的语法包含下列部分：

部分	描述
object	必需的。一个对象表达式，该对象一定能在“应用于”列表中找到。
format	可选的。一个常数或数值，如设置中所述，它指定 Clipboard 图形的格式。必须用括号将该常数或数值括起来。如果 format 为 0 或省略，GetData 自动使用适当的格式。
设置

format 的设置有：

常数	数值	描述
vbCFBitmap	2	位图（.bmp文件）
vbCFMetafile	3	元文件（.wmf文件)
vbCFDIB	8	设备无关位图 (DIB)
vbCFPalette	9	调色板
说明

上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。

如果 Clipboard 对象没有与期望的格式相匹配的图形，则返回空。如果 Clipboard 对象中只有一个调色版，则创建最小尺寸 (1x1) 的 DIB。


GetFormat 方法 (ActiveX 控件)

返回一个整数，指出 Clipboard 对象中的项目是否匹配期望的格式。不支持命名参数。

语法

object.GetFormat (format)

GetFormat 方法的语法包含下列部分：

部分	描述
object	必需的。一个对象表达式，该对象一定能在“应用于”列表中找到。
format	必需的。一个数值或常数，如设置中所述，它指定 Clipboard 对象的格式。必须用括号包括该常数或数值。
设置

用于 format 的设置有：

常数	数值	描述
vbCFLink	&HBF00	DDE  对话信息
vbCFText	1	文本
vbCFBitmap	2	位图（.bmp 文件）
vbCFMetafile	3	元文件（.wmf 文件)
vbCFDIB	8	设备无关位图 (DIB)
vbCFPalette	9	调色板
说明

上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。

如果 Clipboard 对象中一个项目匹配指定的格式，则 GetFormat 方法返回 True。否则，返回 False。

对于 vbCFDIB 和 vbCFBitmap 两种格式，显示图形时不管 Clipboard 中是什么样的调色板都要使用。


HideSelection 属性 (ActiveX 控件)

返回一个值，以决定当控件失去焦点时选择文本是否加亮显示。

语法

object.HideSelection

object 所在处代表一个对象表达式 ，其值是“应用于”列表中的一个对象。

返回值

 HideSelection 返回值为:

值	描述
True	（缺省值）当控件失去焦点时，选择文本不加亮显示。
False	当控件失去焦点时，选择文本加亮显示。
说明

该属性用于指示在另一个窗体或对话框拥有焦点时，哪些文本要加亮显示──例如，可用在拼写检查程序中。


hWnd 属性 (ActiveX 控件)

返回窗体或控件的句柄。

注意   OLE 容器控件不支持该属性。

语法

object.hWnd

object 所在处代表一个对象表达式 ，其值是“应用于”列表中的一个对象。

说明

 Microsoft Windows 运行环境，通过给应用程序中的每个窗体和控件分配一个句柄（或 hWnd）来标识它们。hWnd 属性用于Windows API调用。许多 Windows 运行环境函数需要活动窗口的 hWnd 作为参数。

注意   由于该属性值在程序运行时可以改变，绝对不要将 hWnd 存储在变量中。


Item 属性 (ActiveX 控件)

利用位置或键返回 Collection 对象的指定成员。

语法

object.Item(index)

Item 属性的语法具有下列对象限定符和部分：

部分	描述
object	必要。对象表达式，其值为“应用于”列表中对象。
index	必要。为一表达式，指定集合中成员的位置。如果是数值表达式，则 index 必须是从 1 到集合 Count 属性值之间的数值。如果是字符串表达式，则当加入一被引用的成员到集合时，index 必须和 key 参数对应。
说明

如果 index 值无法与集合的任何现有成员匹配，就会导致错误发生。

Item 是集合的缺省属性。因此，以下两行程序代码等价：

Print MyCollection(1)

Print MyCollection.Item(1)


Key 属性（ActiveX 控件）

返回或设置字符串，在集合中唯一地标识一个成员。

语法

object.Key [= string]

Key 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
String	唯一的字符串，在集合中标识一个成员。
说明

如果字符串不唯一，将发生错误。

用 Add 方法将对象添加到集合中时，可设置 Key 属性。

当集合中的对象被重新排序时，如在设置 Sorted 属性为 True 时，对象的 Index 属性值会改变。如果想要 Index 属性动态地改变，则使用 Key 属性引用集合中的对象。

另外，通过给集合中的对象赋予有意义的名字，可用 Key 属性使 Visual Basic 工程成为“自编文件”。


KeyDown、KeyUp 事件 (ActiveX 控件)

这些事件是当一个对象具有焦点时按下 ( KeyDown ) 或松开 ( KeyUp ) 一个键时发生的。（要解释 ANSI 字符集 中的字符，应使用 KeyPress 事件。）

语法

Private Sub Form_KeyDown(keycode As Integer, shift As Integer)

Private Sub object_KeyDown([index As Integer,]keycode As Integer, shift As Integer)

Private Sub Form_KeyUp(keycode As Integer, shift As Integer)

Private Sub object_KeyUp([index As Integer,]keycode As Integer, shift As Integer)

KeyDown 和 KeyUp 事件包括下列部分：

部分	描述
object	一个对象表达式，其值是“应用于”列表中的一个对象。
index	是一个整数，它用来唯一标识一个在控件数组中的控件。
keycode	是一个键代码，诸如 vbKeyF1 （ F1 键）或 vbKeyHome （ HOME 键）。要指定键代码，可使用对象浏览器中的 Visual Basic ( VB ) 对象库中的常数。
shift	是在该事件发生时响应 SHIFT 、CTRL 和 ALT 键的状态的一个整数。shift 参数是一个位域，它用最少的位响应 SHIFT 键（位 0 ）、CTRL 键（位 1 ）和 ALT 键（位 2 ）。这些位分别对应于值 1、2 和 4。可通过对一些、所有或无位的设置来指明有一些、所有或零个键被按下。例如，如果 CTRL 和 ALT 这两个键都被按下，则 shift 的值为 6。
说明

对于这两个事件来说，带焦点的对象都接收所有击键。一个窗体只有在不具有可视的和有效的控件时才可以获得焦点。虽然 KeyDown 和 KeyUp 事件可应用于大多数键，它们最经常地还是应用于：

•	扩展的字符键如功能键等。

•	定位键。

•	键盘修饰键和按键的组合。

•	区别数字小键盘和常规数字键。

在需要对按下和松开一个键都响应时，可使用 KeyDown 和 KeyUp 事件过程。

下列情况不能引用 KeyDown 和 KeyUp 事件：

•	窗体有一个 CommandButton 控件，并且 Default 属性设置为 True 时的 ENTER 键。

•	窗体有一个 CommandButton 控件，并且 Cancel 属性设置为 True 时的 ESC 键。

•	TAB 键。

KeyDown 和 KeyUp 用两种参数解释每个字符的大写形式和小写形式：keycode —显示物理的键（将 A 和 a 作为同一个键返回）和 shift —显示 shift + key 键的状态而且返回 A 或 a 其中之一。

如果需要测试 shift 参数，可使用该参数中定义各位的 shift 常数。该常数有下列值：

常数	值	描述
vbShiftMask	1	SHIFT 键的位屏蔽。
VbCtrlMask	2	CTRL 键的位屏蔽。
VbAltMask	4	ALT 键的位屏蔽。
该常数用作位屏蔽。它可被用来测试任何键组合。

测试一个条件时，首先将每个结果分配给一个临时整数变量，然后将 shift 与一个位屏蔽进行对比。如下例，可用 And 运算符和 shift 参数一起来测试条件是否大于 0。该条件说明该修正键被按下：

ShiftDown = (Shift And vbShiftMask) > 0

可按此例在一个过程中测试任何条件的组合：

If ShiftDown And CtrlDown Then

注意   如果 KeyPreview 属性被设置为 True，则一个窗体先于该窗体上的控件接收到此事件。可用 KeyPreview 属性来创建全局键盘处理例程。


KeyPress 事件 (ActiveX 控件)

此事件当用户按下和松开一个 ANSI 字符集 中的键时发生。

语法

Private Sub Form_KeyPress(keyascii As Integer)

Private Sub object_KeyPress([index As Integer,]keyascii As Integer)

KeyPress 事件语法包含下列部分：

部分	描述
object	一个对象表达式，其值是“应用于”列表中的一个对象。
index	一个整数，它用来唯一标识一个在控件数组中的控件。
keyascii	是返回一个标准数字 ANSI 键代码的整数。Keyascii 通过引用传递，对它进行改变可给对象发送一个不同的字符。将 keyascii 改变为 0 时可取消击键，这样一来对象便接收不到字符。
说明

具有焦点的对象接收该事件。一个窗体仅在它没有可视和有效的控件或 KeyPreview 属性被设置为 True 时才能接收该事件。一个 KeyPress 事件可以引用任何可打印的键盘字符，一个来自标准字母表的字符或少数几个特殊字符之一的字符与 CTRL 键的组合，以及 ENTER 或 BACKSPACE 键。KeyPress 事件过程在截取 TextBox 或 ComboBox 控件所输入的击键时是非常有用的。它可立即测试击键的有效性或在字符输入时对其进行格式处理。改变 keyascii 参数的值会改变所显示的字符。

可使用下列表达式将 keyascii 参数转变为一个字符：

Chr(KeyAscii)

然后执行字符串操作，并将该字符反译成一个控件可通过该表达式解释的 ANSI 数字：

KeyAscii = Asc(char)

应当使用 KeyDown 和 KeyUP 事件过程来处理任何不被 KeyPress 识别的击键，诸如：功能键、编辑键、定位键以及任何这些键和键盘换档键的组合等。与 KeyDown 和 KeyUp 事件不同的是，KeyPress 不显示键盘的物理状态，而只是传递一个字符。

KeyPress 将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。而 KeyDown 和 KeyUp 用两种参数解释每个字符的大写形式和小写形式：keycode — 显示物理的键（将 A 和 a 作为同一个键返回）和 shift —指示 shift + key 键的状态而且返回 A 或 a 其中之一。

如果 KeyPreview 属性被设置为 True，窗体将先于该窗体上的控件接收此事件。可用 KeyPreview 属性来创建全局键盘处理例程。

注意   CTRL+@ 的键盘组合的 ANSI 编号是 0。因为 Visual Basic 将一个零值的 keyascii 识别为一个长度为零的字符串 ("")，在应用程序中应避免使用 CTRL+@ 的组合。


MouseDown、MouseUp 事件 (ActiveX 控件)

这些事件是当按下 ( MouseDown ) 或者释放 ( MouseUp ) 鼠标按钮时发生。

语法

Private Sub Form_MouseDown(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub MDIForm_MouseDown(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub object_MouseDown([index As Integer,]button As Integer, shift As Integer, x As Single, y As Single)

Private Sub Form_MouseUp(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub MDIForm_MouseUp(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub object _MouseUp([index As Integer,]button As Integer, shift As Integer, x As Single, y As Single)

MouseDown 和 MouseUp 事件各种语法包含下列部分：

部分	描述
object	返回一个对象表达式，其值是“应用于”列表中的一个对象。
index	返回一个整数，用来唯一地标识一个在控件数组中的控件。
button	返回一个整数，用来标识该事件的产生是按下 ( MouseDown ) 或者释放 ( MouseUp ) 按钮引起的。button 参数是具有相应于左按钮（位 0），右按钮（位 1），以及中间按钮（位 2）的一个位字段。这些位的值分别等于 1、2、和 4。其中仅有一位被设置，指示出引起该事件的那个按钮。
shift	返回一个整数，在 button 参数指定的按钮被按下或者被释放的情况下，该整数相应于 SHIFT、CTRL、和 ALT 键的状态。某键被按下使得一个二进制位被设置。shift 参数是具有相应于 SHIFT 键（位 0），CTRL 键（位 1），以及 ALT 键（位 2）最少二进制位的一个位字段。这些位的值分别等于 1、2、和 4。shift 参数指示这些键的状态。这些位中可能有一些，全部，或者一个也没有被设置，指示这些键中的一些、全部，或者一个也没有被按下。例如，CTRL 和 ALT 键都被按下，则 shift 的值就是 6。
x, y	返回一个指定鼠标指针当前位置的数。x 和 y 的值所表示的总是通过该对象 ScaleHeight, ScaleWidth, ScaleLeft, 和ScaleTop 属性所建立的坐标系统的方式。
说明

为了在给定的一个鼠标按钮按下或释放时指定将引起的一些操作，应当使用 MouseDown 或者 MouseUp 事件过程。不同于 Click 和 DblClick 事件的是，MouseDown 和 MouseUp 事件能够区分出鼠标的左、右、和中间按钮。也可以为使用 SHIFT、CTRL、 和 ALT 等键盘换挡键编写用于鼠标—键盘组合操作的代码。

下列情况对 Click 和 DblClick 事件都适用：

•	如果鼠标按钮是当其指针在窗体或控件之上时被按下，则该对象将“捕获”鼠标并接收包括最后 MouseUp 事件在内的全部鼠标事件。这暗示了通过鼠标事件所返回的 x，y 鼠标指针坐标值，可以不总是在接收它们的对象的内部区域之内。

•	如果鼠标被持续地按下，则第一次按下之后捕获鼠标的对象将接收全部鼠标事件直至所有按钮被释放为止。

如果要测试 button 或 shift 参数，可以使用对象浏览器中的 Visual Basic (VB) 对象库中所列出的常数，用来定义该参数中的各个二进制位：

常数（按钮）	值	描述
vbLeftButton	1	左按钮被按下
vbRightButton	2	右按钮被按下
vbMiddleButton	4	中间按钮被按下
常数（换挡）	值	描述
vbShiftMask	1	SHIFT 键被按下。
vbCtrlMask	2	CTRL 键被按下。
vbAltMask	4	ALT 键被按下。
随后这些常数作为位屏蔽，对于按钮的各种组合，无须计算各个组合的唯一的位字段即可进行测试。

注意   可使用 MouseMove 事件过程对由于鼠标移动而引起的事件进行响应。MouseDown 和 MouseUp 所使用的 button 参数与 MouseMove 所使用的 button 参数是不同的。对于 MouseDown 和 MouseUp 来说，button 参数要精确地指出每个事件的一个按钮，而对于 MouseMove 来说，它指示的是所有按钮的当前状态。


MouseIcon 属性 (ActiveX 控件)

返回或设置自定义的鼠标图标。

语法

object.MouseIcon = LoadPicture(pathname)

object.MouseIcon [= picture]

MouseIcon 属性的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
pathname	字符串表达式，指定包含自定义图标文件的路径和文件名。
picture	Form 对象、PictureBox 控件、或 Image 控件的 Picture 属性。
说明

MouseIcon 属性提供一个自定义图标，它在 MousePointer 属性设为 99 时使用。

虽然 Visual Basic 不创建或不支持彩色光标 (.cur) 文件（例如 Windows NT 中附带有的），但可以使用 MouseIcon 属性来装入光标或者图标文件。彩色光标文件，例如那些 Windows NT 3.51 附带的，将以黑白形式显示。要显示一个彩色光标，应使用彩色图标文件 (.ico)。MouseIcon 属性使程序能够很容易地访问自定义光标，它可以是任意大小并具有任何热点位置的光标。Visual Basic 不能装入动画光标 (.ani) 文件，即使 32-位版的 Windows 支持这些光标。


MouseMove 事件 (ActiveX 控件)

此事件在移动鼠标时发生。

语法

Private Sub Form_MouseMove(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub MDIForm_MouseMove(button As Integer, shift As Integer, x As Single, y As Single)

Private Sub object_MouseMove([index As Integer,] button As Integer, shift As Integer, x As Single, y As Single)

MouseMove 事件语法包含下列部分：

部分	描述
object	一个对象表达式，其值是“应用于”列表中的一个对象。
index	一个整数，用来唯一地标识一个在控件数组中的控件。
button	一个整数，它对应鼠标各个按钮的状态，如果某个按钮按下，其中就有一个二进制位被设置。button 参数是具有相应于左按钮（位 0），右按钮（位 1），以及中间按钮（位 2）的一个位字段。这些位的值分别等于 1，2，和 4。它指示这些鼠标按钮的整体状态；三个二进制位中的一些、全部、或一个也没有被设置，指示这些按钮中的一些、全部、或一个也没有被按下。
shift	一个整数，该整数相应于 SHIFT、CTRL、和 ALT 键的状态。某键被按下使得一个二进制位被设置。shift 参数是具有相应于 SHIFT 键（位 0），CTRL 键（位 1），以及 ALT 键（位 2）最少二进制位的一个位字段。这些位的值分别等于 1，2，和 4。shift 参数指示这些键的状态。这些位中可能有一些、全部、或者一个也没有被设置，指示这些键中的一些、全部、或者一个也没有被按下。例如，CTRL 和 ALT 键都被按下，则 shift 的值就是 6。
x, y	一个指定鼠标指针当前位置的数。x 和 y 的值所表示的总是通过该对象 ScaleHeight, ScaleWidth, ScaleLeft,和 ScaleTop 属性所建立的坐标系统的方式。
说明

MouseMove 事件伴随鼠标指针在对象间移动时连续不断地产生。除非有另一个对象捕获了鼠标，否则，当鼠标位置在对象的边界范围内时该对象就能接收 MouseMove 事件。

要测试 button 或 shift 参数，可使用对象浏览器中的 Visual Basic (VB) 对象库中所列出的常数，用来定义该参数中的各个位：

常数（按钮）	值	描述
vbLeftButton	1	左按钮按下。
vbRightButton	2	右按钮按下。
vbMiddleButton	4	中间按钮按下。
常数（换挡）	值	描述
vbShiftMask	1	SHIFT 键按下。
vbCtrlMask	2	CTRL 键按下。
vbAltMask	4	ALT 键按下。
然后这些常数用作位屏蔽，对于按钮的各种组合，无须计算出各个组合的唯一的位字段值即可进行检测。

要测试某一条件，首先将各个结果赋给一个临时整型变量然后再与一个位屏蔽的 button 或 shift 参数进行比较。测试应当用各个参数进行 And 运算，若结果大于零，则说明该键或按钮被按下。其操作如下：

LeftDown = (Button And vbLeftButton) > 0

CtrlDown = (Shift And vbCtrlMask) > 0

然后，接下去可对结果的各种组合进行检测，其操作如下：

If LeftDown And CtrlDown Then

注意   为了对鼠标按钮按下和释放所引起的事件进行处理，可使用 MouseDown 和 MouseUp 事件过程。

MouseMove 事件的 button 参数与 MouseDown 和 MouseUp 事件的 button 参数是不同的。对于 MouseMove 事件来说，button 参数指示的是所有按钮当前的状态；一个 MouseMove 事件可指示某些、全部或没有一个按钮被按下。对于 MouseDown 和 MouseUp 事件来说，button 参数在每个事件精确地指示一个按钮。

在 MouseMove 事件中任何时侯移动窗口，都能引起层叠事件。当该窗口移动到指针下面时 MouseMove 事件将产生。即使是鼠标完全不动 MouseMove 事件也能产生。


MousePointer 常数 (ActiveX 控件)

常数	值	描述
ccDefault	0	（缺省）由对象决定的形状。
CcArrow	1	箭头。
CcCross	2	十字线（十字线指针）。
CcIbeam	3	型标。
CcIcon	4	图标（正方形里的小方块）。
CcSize	5	尺寸线（分指东南西北的四针箭头）。
ccSizeNESW	6	右上-左下尺寸线（分指东北和西南双箭头）。
ccSizeNS	7	垂直尺寸线（分指南北方向的双箭头）。
ccSizeNWSE	8	左上-右下尺寸线。
ccSizeEW	9	水平尺寸线（分指东西方向的箭头）。
ccUpArrow	10	向上箭头。
ccHourglass	11	沙漏（等待）。
ccNoDrop	12	不允许放下。
ccArrowHourglass	13	箭头和沙漏。
cc ArrowQuestion	14	箭头和问号。
ccSizeAll	15	四向尺寸线。
ccCustom	99	MouseIcon 属性指定的自定义图标。
注意   cc 前缀指被保留的 ActiveX 控件。常数的前缀可能随特定控件或控件组的变化而变化。但是，除非加以指明，否则描述不会改变。


MousePointer 属性 (ActiveX 控件)

返回或设置一个值，该值指示在运行时当鼠标移动到对象的一个特定部分时，被显示的鼠标指针的类型。

语法

object.MousePointer [= value]

MousePointer 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
value	整数，按照设置值中的描述指定被显示的鼠标指针类型。
设置值

value 的设置值为：

常数	值	描述
vbDefault	0	（缺省值）形状由对象决定。
VbArrow	1	箭头。
VbCrosshair	2	十字线（crosshair 指针）。
VbIbeam	3	I 型
VbIconPointer	4	图标（矩形内的小矩形）。
VbSizePointer	5	尺寸线（指向东、南、西和北四方向的箭头）。
VbSizeNESW	6	右上-左下尺寸线（指向东北和西南方向的双箭头）。
VbSizeNS	7	垂-直尺寸线（指向南和北的双箭头）。
VbSizeNWSE	8	左上-右下尺寸线（指向东南和西北方向的双箭头）。
VbSizeWE	9	水-平尺寸线（指向东和西两个方向的双箭头）。
VbUpArrow	10	向上的箭头。
VbHourglass	11	沙漏（表示等待状态）。
VbNoDrop	12	不允许放下。
VbArrowHourglass	13	箭头和沙漏。
vbArrowQuestion	14	箭头和问号。
vbSizeAll	15	四向尺寸线。
vbCustom	99	通过 MouseIcon 属性所指定的自定义图标。
说明

在鼠标指针越过窗体或对话框上的控件时，为了指出功能上的改变，可以使用该属性。沙漏标形状设置值 (11) 是很有用的，用来指示用户需要等待过程或操作的完成。

注意   如果应用程序调用 DoEvents，那么 MousePointer 属性在经过 ActiveX 部件时可能暂时地改变。


键码常数 (ActiveX 控件)

键码

常数	值	描述
vbKeyLButton	1	鼠标左键
vbKeyRButton	2	鼠标右键
vbKeyCancel	3	CANCEL 键
vbKeyMButton	4	鼠标中键
vbKeyBack	8	BACKSPACE 键
vbKeyTab	9	TAB 键
vbKeyClear	12	CLEAR 键
vbKeyReturn	13	ENTER 键
vbKeyShift	16	SHIFT 键
vbKeyControl	17	CTRL 键
vbKeyMenu	18	菜单键
vbKeyPause	19	PAUSE 键
vbKeyCapital	20	CAPS LOCK 键
vbKeyEscape	27	ESC 键
vbKeySpace	32	SPACEBAR 键
vbKeyPageUp	33	PAGEUP 键
vbKeyPageDown	34	PAGEDOWN 键
vbKeyEnd	35	END 键
vbKeyHome	36	HOME 键
vbKeyLeft	37	LEFT ARROW 键
vbKeyUp	38	UP ARROW 键
vbKeyRight	39	RIGHT ARROW 键
vbKeyDown	40	DOWN ARROW 键
vbKeySelect	41	SELECT 键
vbKeyPrint	42	PRINT SCREEN 键
vbKeyExecute	43	EXECUTE 键
vbKeySnapshot	44	SNAP SHOT 键
vbKeyInser	45	INS 键
vbKeyDelete	46	DEL 键
vbKeyHelp	47	HELP 键
vbKeyNumlock	144	NUM LOCK 键
A 键到 Z 键与其 ASCII 码的相应值'A' 到 'Z' 是一致的

常数	值	描述
vbKeyA	65	A 键
vbKeyB	66	B 键
vbKeyC	67	C 键
vbKeyD	68	D 键
vbKeyE	69	E 键
vbKeyF	70	F 键
vbKeyG	71	G 键
vbKeyH	72	H 键
vbKeyI	73	I 键
vbKeyJ	74	J 键
vbKeyK	75	K 键
vbKeyL	76	L 键
vbKeyM	77	M 键
vbKeyN	78	N 键
vbKeyO	79	O 键
vbKeyP	80	P 键
vbKeyQ	81	Q 键
vbKeyR	82	R 键
vbKeyS	83	S 键
vbKeyT	84	T 键
vbKeyU	85	U 键
vbKeyV	86	V 键
vbKeyW	87	W 键
vbKeyX	88	X 键
vbKeyY	89	Y 键
vbKeyZ	90	Z 键
0 键到 9 键与其 ASCII 码的相应值 '0' 到 '9' 是一致的

常数	值	描述
vbKey0	48	0 键
vbKey1	49	1 键
vbKey2	50	2 键
vbKey3	51	3 键
vbKey4	52	4 键
vbKey5	53	5 键
vbKey6	54	6 键
vbKey7	55	7 键
vbKey8	56	8 键
vbKey9	57	9 键
数字小键盘上的键

常数	值	描述
vbKeyNumpad0	96	0 键
vbKeyNumpad1	97	1 键
vbKeyNumpad2	98	2 键
vbKeyNumpad3	99	3 键
vbKeyNumpad4	100	4 键
vbKeyNumpad5	101	5 键
vbKeyNumpad6	102	6 键
vbKeyNumpad7	103	7 键
vbKeyNumpad8	104	8 键
vbKeyNumpad9	105	9 键
vbKeyMultiply	106	乘号 (*) 键
vbKeyAdd	107	加号 (+) 键
vbKeySeparator	108	ENTER 键（在数字小键盘上）
vbKeySubtract	109	减号 (-) 键
vbKeyDecimal	110	小数点 (.) 键
vbKeyDivide	111	除号 (/) 键
功能键

常数	值	描述
vbKeyF1	112	F1 键
vbKeyF2	113	F2 键
vbKeyF3	114	F3 键
vbKeyF4	115	F4 键
vbKeyF5	116	F5 键
vbKeyF6	117	F6 键
vbKeyF7	118	F7 键
vbKeyF8	119	F8 键
vbKeyF9	120	F9 键
vbKeyF10	121	F10 键
vbKeyF11	122	F11 键
vbKeyF12	123	F12 键
vbKeyF13	124	F13 键
vbKeyF14	125	F14 键
vbKeyF15	126	F15 键
vbKeyF16	127	F16 键


Max、Min 属性 (ActiveX 控件)

•	Max－返回或设置当滚动框处于底部或最右位置时，一个滚动条位置的 Value 属性最大设置值。对于 ProgressBar 控件，它返回或设置其最大值。

•	Min－返回或设置当滚动框处于顶部或最右位置时，一个滚动条位置的 Value 属性最小设置值。对于 ProgressBar 控件，它返回或设置其最小值。

语法

object.Max [= value]

object.Min [= value]

Max 和 Min 属性的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
Value	数值表达式，按照设置值中所述，指定最大或最小的 Value 属性设置值。
设置值

对于每个属性，可指定在 -32,768 和 32,767 范围之间的一个整数，包括 -32,768 和 32,767。缺省设置值为：

•	Max－32,767.

•	Min－0.

说明

Microsoft Windows 操作环境自动地将滚动条范围设置为与窗体、ComboBox 控件、和 ListBox 控件的内容成比例。对于一个滚动条（HScrollBar 或 VScrollBar）控件，无论如何，必须指定这些范围。根据滚动条的具体使用情况，例如，作为输入设备或作为一个速度或数量的指示器，使用 Max 和 Min 设置一个合适的范围。

典型地，你在设计时设置 Max 和 Min。如果滚动范围必须动态地改变，你也能够在运行时在代码中设置它们－例如，当向能够被滚动的数据库增加记录时。使用属性 LargeChange 和 SmallChange，为一个滚动条控件设置最大和最小滚动增量。

注意   如果 Max 被设为比 Min 小的值，那么最大值将被分别设为水平或垂直滚动条的最左或最上位置处。ProgressBar 控件的 Max 属性必须总是比其 Min 属性大一些，并且其 Min 属性必须总是大于或等于 0。

Max 和 Min 属性定义了控件的范围。缺省 ProgressBar 控件的 Min 属性是 0 并且其 Max 属性设置值为 100，表示操作的百分比持续时间。


OLECompleteDrag 事件 (ActiveX 控件)

当源部件被放到目标部件时发生，并通知源部件拖放操作被执行或取消。

语法

Private Sub object_CompleteDrag([effect As Long])

CompleteDrag 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
effect	源对象设置的长整型数，用来识别执行的动作，这样当部件被移动后允许源采取适当的动作（例如，如果源被从一个部件移到另一个部件，则执行删除数据操作）。可能的取值列于“设置值”中。
设置值

effect 设置如下：

常数	值	描述
vbDropEffectNone	0	放目标不接受数据， 或者放操作被取消。
VbDropEffectCopy	1	放结果保存于从源到目标的数据拷贝中。初始数据没有被拖放操作改变。
VbDropEffectMove	2	放结果保存于初始数据的连接中，该数据是在拖放源和放目标之间产生的。
说明

OLECompleteDrag 事件是 OLE 拖放操作最后调用的事件。当对象被放到目标部件时，此事件通知源部件所执行的动作。目标通过 OLEDragDrop 事件的 effect 参数设置此值。基于此，源可决定需采取的适当动作。例如，若对象被移到目标 (vbDropEffectMove)，移动后源需要在自身删除该对象。

如果 OLEDragMode 设置为 Automatic，则 Visual Basic 执行缺省的动作。此事件仍然发生，允许添加或改变动作。

大部分部件支持人工 OLE 拖放事件，也有一些支持自动化 OLE 拖放事件。


OLEDrag 方法 (ActiveX 控件)

引起部件初始化 OLE 拖放操作。

语法

object.OLEDrag

object 所在处代表对象表达式，其值是“应用于”列表中的一个对象。

说明

当调用 OLEDrag 方法时，部件的 OLEStartDrag 事件发生，允许向目标部件提供数据。


Text 属性 (ActiveX 控件) 示例

该示例将具有文件标题的 TreeView 控件置入一个 ListBox 控件。在单击 TreeView 控件中的项目时，窗体的 Label 中将显示 Text 属性。为了试一下这个示例，在窗体上放置 TreeView、 Label 和 ListBox 控件，并将代码粘贴到窗体的声明部分。运行示例并单击任一项目，看看它的 Text 属性。

Private Sub Form_Load()

Dim nodX As Node  '对节点声明对象变量。

Dim i As Integer  '声明变量，将其作为计数器来使用。

'将一个 Node 添加到 TreeView 控件，并调用它到第一个节点

Set nodX = TreeView1.Nodes.Add()

nodX.Text = "First Node"

'置入 ListBox

List1.AddItem "Node1"   ' 将每个项目添加到列表。

List1.AddItem "Node2"

List1.AddItem "Node3"

List1.AddItem "Node4"

List1.AddItem "Node5"

List1.AddItem "Node6"

List1.AddItem "Node7"

'将子节点添加到第一个 Node 对象。用

' ListBox 置入控件。

For i = 0 To List1.ListCount - 1

Set nodX = TreeView1.Nodes.Add(1, tvwChild)

nodX.Text = List1.List(i)

Next i

Treeview1.Nodes(1).Selected = True

nodX.EnsureVisible	'确保节点是可见的。

End Sub

Private Sub TreeView1_NodeClick(ByVal Node As Node)

'显示已单击的 Node 对象的 Text 属性。

Label1.Caption = Node.Text

End Sub


OLEDragDrop 事件 (ActiveX 控件)

当源部件决定放操作能发生，且源部件被放到目标部件时，此事件发生。

注意   仅当 OLEDropMode 被设置为 1 (Manual) 时，此事件才发生。

语法

Private Sub object_OLEDragDrop(data As DataObject, effect As Long, button As Integer, shift As Integer, x As Single, y As Single)

OLEDragDrop 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
data	DataObject 对象，包含源提供的格式，另外也可能包含这些格式的数据。若 DataObject 不包含数据，则当控件调用 GetData 方法时提供数据。SetData 和 Clear 方法不能用在这里。
effect	源对象设置的长整型数，用来识别执行的动作，这样当部件被移动后允许源采取适当的动作（例如，如果源被从一个部件移到另一个部件，则执行删除数据操作）。可能的取值列于“设置值”中。
button	整数，当按下鼠标键时，与鼠标状态相对应。左键为位 0，右键为位 1，中键为位 2。这些位相应的值分别为 1，2 和 4，它代表了鼠标键的状态。可设置三个位中的部分、全部或根本不设置，相应地表明部分、全部按键被按下或没有按键按下。
shift	整数，当按下 SHIFT、CTRL 和 ALT 键时，与这些键状态相对应。 SHIFT 键为位 0，CTRL 键为位 1，ALT 键为位 2。这些位相应的值分别为 1，2 和 4，shift 参数代表了这些键的状态。可设置三个位中的部分、全部或根本不设置，相应地表明部分、全部按键被按下或没有按键按下。例如，同时按下 CTRL 和 ALT 键，shift 值为 6。CTRL
x,y	确定鼠标指针当前位置的数值。x 和 y 值由对象的 ScaleHeight、ScaleWidth、ScaleLeft 和 ScaleTop 属性设置的坐标系统的格式来表示。
设置值

effect 设置如下：

常数	值	描述
vbDropEffectNone	0	放目标不接受数据。
VbDropEffectCopy	1	放结果保存于从源到目标的数据拷贝中。初始数据没有被拖放操作改变。
VbDropEffectMove	2	放结果保存于要从拖放源移到放源的数据中。移动后，拖放源要删除数据。
说明

源 ActiveX 部件应总是屏蔽 effect 参数值，以确保同将来实现的 ActiveX 部件兼容。目前，仅使用了 effect 参数 32 位中的 3 位，然而将来的 Visual Basic 版本就可能用到其它位。所以考虑到将来的问题， 拖源和放目标在进行任何比较之前应屏蔽这些值。

例如，源部件不能把 effect 同 vbDropEffectCopy 相比，如：

If Effect = vbDropEffectCopy...

而是应该屏蔽该值或被搜寻的值，如：

If Effect And vbDropEffectCopy = vbDropEffectCopy...

-或-

If (Effect And vbDropEffectCopy)...

这样，允许在 Visual Basic 新版本中定义新的放效果，并与现存的代码保持向后兼容性。

大部分部件支持人工 OLE 拖放事件，也有一些支持自动化 OLE 拖放事件。


OLEDragMode 属性 (ActiveX 控件)

返回或设置是由部件还是由程序员来处理 OLE 拖放操作。

语法

object.OLEDragMode = mode

OLEDragMode 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
mode	整数，规定部件处理 OLE 拖放操作的方法，如“设置值”中所述。
设置值

mode 设置如下：

常数	值	描述
vbOLEDragManual	0	（缺省）人工。程序员处理所有的 OLE 拖放操作。
VbOLEDragAutomatic	1	自动。部件处理所有的 OLE 拖放操作。
说明

当设置 OLEDragMode 为 Manual 时，必须调用 OLEDrag 方法启动拖放，进而触发 OLEStartDrag 事件。

当设置 OLEDragMode 为 Automatic 时，若想拖出控件，源部件用其包含的数据填充 DataObject 对象，并在初始化 OLEStartDrag 事件（也包括 OLESetData 和其它源级的 OLE 拖放事件）之前设置 effects 参数。这样可以控制拖放操作，允许通过添加其它格式， 或者用 Clear 或 SetData 方法忽略或禁用自动数据来进行调整。

若源的 OLEDragMode 属性被设为 Automatic，并且也没有数据被加载到 OLEStartDrag 事件中，或 aftereffects 设置为 0，则 OLE 拖放操作不发生。

注意   如果控件的 DragMode 属性被设为 Automatic，则 OLEDragMode 的设置被忽略，因为常规的 Visual Basic 拖放事件优先发生。


OLEDragOver 事件 (ActiveX 控件)

当一个部件在另一个部件上拖动时发生。

语法

Private Sub object_OLEDragOver(data As DataObject, effect As Long, button As Integer, shift As Integer, x As Single, y As Single, state As Integer)

OLEDragOver 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
ddta	DataObject 对象，包含源提供的格式，另外也可能包含这些格式的数据。若 DataObject 不包含数据，则当控件调用 GetData 方法时提供数据。SetData 和 Clear 方法不能用在这里。
effect	源对象最初设置的长整型数，用来识别它支持的效果。在事件过程中，此参数必须被目标部件正确地设置。effect 值由所有活动的效果（如设置值表）逻辑 Or 确定。目标部件应检查这些效果以及其它参数以确定哪个动作适合于它，然后把此参数设置为允许的效果之一（如源所规定），以便确定放置选项到部件该执行哪个动作。可能的取值列于“设置值”中。
button	整数，当按下鼠标键时，与鼠标状态相对应。左键为位 0，右键为位 1，中键为位 2。这些位相应的值分别为 1，2 和 4，它代表了鼠标键的状态。可设置三个位中的部分、全部或根本不设置，相应地表明部分、全部按键被按下或没有按键按下。
shift	整数，当按下 SHIFT、CTRL 和 ALT 键时，与这些键状态相对应。SHIFT 键为位 0，CTRL 键为位 1，ALT 键为位 2。这些位相应的值分别为 1，2  和 4，shift  参数代表了这些键的状态。可设置三个位中的部分、全部或根本不设置，相应地表明部分、全部按键被按下或没有按键按下。例如，同时按下 CTRL 和 ALT 键，shift 值为 6。
x,y	在目标窗体或控件中， 规定当前鼠标指针水平 (x) 和垂直 (y) 位置的数。x 和 y 值由对象的 ScaleHeight、ScaleWidth、ScaleLeft 和 ScaleTop 属性设置的坐标系统格式来表示。
state	整数，相应于控件的转换状态，此控件将被拖放到与其相关的目标窗体或控件中。可能的取值列于“设置值”中。
设置值

effect 设置如下：

常数	值	描述
vbDropEffectNone	0	放目标不接受数据。
VbDropEffectCopy	1	放结果保存于从源到目标的数据拷贝中。初始数据没有被拖放操作改变。
VbDropEffectMove	2	放结果保存于要从拖放源移到放源的数据中。移动后，拖放源要删除数据。
VbDropEffectScroll	-2147483648 (&H80000000)	在目标部件中，滚动正在或将要发生。此值与其它值共同使用。注意 仅当在部件中执行自己的滚动时才能应用。
state 设置如下：

常数	值	描述
vbEnter	0	在目标范围内源部件正被拖动。
VbLeave	1	在目标范围之外源部件正被拖动。
VbOver	2	在目标内源部件已经从一个位置移到另一个位置。
说明

注意   如果 state 参数是 vbLeave，表明鼠标指针已离开目标，则 x 和 y 参数保持为零值。

源 ActiveX 部件应总是屏蔽 effect 参数值，以确保同将来实现的 ActiveX 部件兼容。现在仅使用了 effect 参数 32 位中的 3 位，然而将来的 Visual Basic 版本就可能用到其它位。所以考虑到将来的问题，拖源和放目标在进行任何比较之前应屏蔽这些值。

例如，源部件不能把 effect 同 vbDropEffectCopy 相比，如：

If Effect = vbDropEffectCopy...

而应屏蔽该值或被搜寻的值，如：

If Effect And vbDropEffectCopy = vbDropEffectCopy...

-或-

If (Effect And vbDropEffectCopy)...

允许在 Visual Basic 新版本中定义新的放效果，并与现存的代码保持向后兼容性。

大部分部件支持人工 OLE 拖放事件，也有一些支持自动化 OLE 拖放事件。


OLEDropMode 属性 (ActiveX 控件)

返回或设置目标部件如何处理放操作。

语法

object.OLEDropMode [= mode]

OLEDropMode 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
mode	枚举整数，规定部件处理 OLE 拖放操作的方法，如“设置值”中所述。
设置值

mode 设置如下：

常数	值	描述
vbOLEDropNone	0	（缺省）无。目标部件不接受 OLE 放操作，并且显示 No Drop 图标。
VbOLEDropManual	1	人工。目标部件触发 OLE 放事件，允许程序员用代码处理 OLE 放操作。
VbOLEDropAutomatic	2	自动。如果 DataObject 对象包含目标部件能识别的格式的数据，则自动接受 OLE 放操作。当 OLEDropMode 设为 vbOLEDropAutomatic 时，在目标上鼠标事件和 OLE 拖放事件都不会发生。
说明

注意  目标部件检查将在其上拖动的内容，以便确定触发何种事件，是 OLE 拖放事件还是 Visual Basic 拖放事件。在同一时间内仅能拖动一种对象，所以没有部件的冲突，没有触发何种事件的疑惑。


OLEGiveFeedback 事件 (ActiveX 控件)

在每个 OLEDragOver 事件后发生。OLEGiveFeedback 允许源部件提供可视的反馈，例如通过改变鼠标的图标来表明放目标后将发生什么，或者在选项上提供可视的反馈（在源部件中）以指出将发生什么。

语法

Private Sub object_OLEGiveFeedback(effect As Long, defaultcursors As Boolean)

OLEGiveFeedback 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
effectt	在 OLEDragOver 事件中目标部件设置的长整型数， 若放选定项，则由此数确定要执行的动作。允许源采取合适的动作（例如给出可视的反馈）。可能的取值列于“设置值”中。
defaultcursors	布尔值，决定 Visual Basic 使用部件缺省鼠标图标，还是自定义鼠标图标。
	True（缺省） = 使用缺省鼠标图标。
	False = 不用缺省图标。必须用 Screen 对象的 MousePointer 属性设置鼠标图标。
设置值

effect 设置如下：

常数	值	描述
vbDropEffectNone	0	放目标不接受数据。
VbDropEffectCopy	1	放结果保存于从源到目标的数据拷贝中。初始数据没有被拖放操作改变。
VbDropEffectMove	2	放结果保存于要从拖放源移到放源的数据中。移动后，拖放源要删除数据。
VbDropEffectScroll	-2147483648 (&H80000000)	在目标部件中，滚动正在或将要发生。此值与其它值共同使用。注意仅当在部件中执行自己的滚动时才能应用。
说明

如果 OLEGiveFeedback 事件中没有代码，或者如果 defaultcursors 参数设为 True，则 Visual Basic 自动地把鼠标图标设为部件提供的缺省图标。

源 ActiveX 部件应总是屏蔽 effect 参数值，以确保同将来实现的 ActiveX 部件兼容。现在仅使用了 effect 参数 32 位中的 3 位，然而将来的 Visual Basic 版本就可能用到其它位。所以考虑到将来的问题，拖源和放目标在进行任何比较之前应屏蔽这些值。

例如，源部件不能把 effect 同 vbDropEffectCopy 相比，如：

If Effect = vbDropEffectCopy...

而应屏蔽该值或被搜寻的值，如：

If Effect And vbDropEffectCopy = vbDropEffectCopy...

-或-

If (Effect And vbDropEffectCopy)...

允许在 Visual Basic 新版本中定义新的放效果，并与现存的代码保持向后兼容性。

大部分部件支持人工 OLE 拖放事件，也有一些支持自动化 OLE 拖放事件。


OLESetData 事件 (ActiveX 控件)

当目标部件在源的 DataObject 对象上执行 GetData 方法，但是还没有加载规定格式的数据时，在源部件上发生。

语法

Private Sub object_OLESetData(data As DataObject, dataformat As Integer)

OLESetData 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
data	放置所需数据的 DataObject 对象。部件调用 SetData 方法加载所需的格式。
dataformat	整数，确定目标部件所需要的数据格式。源部件用此值来确定向 DataObject 对象加载的内容。
说明

在某些情况下，特别是在源部件支持多种格式时，可能希望延迟向源部件 DataObject 对象加载数据以节省时间。此事件允许源对给定的数据格式仅响应一个请求。调用此事件时，源应该检查 format 参数以确定需加载的内容，然后在 DataObject 上执行 SetData 方法加载数据，这些数据随后被送回到目标部件。


OLEStartDrag 事件 (ActiveX 控件)

当部件的 OLEDrag 方法被执行时，或者在 OLEDragMode 属性被设为 Automatic，部件初始化 OLE 拖放操作时发生。

此事件指定源部件支持的数据格式和放效果。也可用于向 DataObject 对象中插入数据。

语法

Private Sub object_StartDrag(data As DataObject, allowedeffects As Long)

StartDrag 事件语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
data	DataObject 对象，含源所提供的格式以及（可选）适合那些格式的数据。若 DataObject 不包含数据，则当控件调用 GetData 方法时会提供。程序员应提供此事件中该参数的值。SetData 和 Clear 方法不能用于此处。
allowedeffects	长整型数，包含源部件支持的效果。其可能的取值列于“设置值”中。程序员应提供此事件中该参数的值。
设置值

allowedeffects 设置如下：

常数	值	描述
vbDropEffectNone	0	放目标不接受数据。
VbDropEffectCopy	1	放结果保存于从源到目标的数据拷贝中。初始数据没有被拖放操作改变。
VbDropEffectMove	2	放结果保存于要从拖源移到放源的数据中。移动后，拖源要删除数据。
说明

源部件应该逻辑 Or 所支持的数据并把结果放到 allowedeffects 参数中。目标部件使用此值确定合适的动作（以及合适的用户反馈）。

如果部件的 OLEDragMode 属性被设为 Automatic，StartDrag 事件也会发生。这样就允许在部件执行该操作后，再次向 DataObject 对象加入格式及数据。也可以通过清除 DataObject 对象（用 Clear 方法）忽略部件的缺省行为，然后加入自己的数据和格式。

除非目标部件需要，可能希望延迟向 DataObject 对象中加载数据。这样，由于没有加载多余的数据格式，使源部件节省了时间。当目标在 DataObject 上执行 GetData 方法时，若 DataObject 中未包含所需的数据，则源的 OLESetData 事件会发生。此时，数据可被加载到 DataObject 中，这将依次地向目标提供数据。


SetData 方法 (ActiveX 控件)

用指定的数据格式将数据插入 DataObject 对象。

语法

object.SetData [data], [format]

SetData 方法的语法具有以下几部分：

部分	描述
object	必需的。对象表达式 其值是“应用于”列表中的对象。
data	可选的。变量，包含传递给 DataObject 对象的数据。
format	可选的。常数或者值，它指定所传递的数据的格式。
设置值

format 的设置值为：

常数	值	描述
vbCFText	1	文本 (.txt文件)
vbCFBitmap	2	位图 (.bmp文件)
vbCFMetafile	3	元文件 (.wmf 文件)
vbCFEMetafile	14	增强的元文件 (.emf 文件)
vbCFDIB	8	与设备无关的位图 (DIB)
vbCFPalette	9	调色板
vbCFFiles	15	文件的列表
vbCFRTF	-16639	丰富的文本格式 (.rtf文件)
说明

在 Visual Basic (VB) 的对象浏览器的对象库中列举这些常数。

data 参数是可选的。因此可以设置几种不同的格式，不必对每种格式都分别加载数据，源部件就可支持这些格式。经过几次调用 SetData 来设置多重格式，每次都使用一种不同格式。如果想要刷新，则应使用 Clear 方法清除 DataObject 的所有数据和格式信息。

format 参数 也是可选的，但无论是 data ，还是 format 参数，都必须是被指定的。如果指定了 data ，但未指定 format，则 Visual Basic 将试图确定数据的格式。如果未能成功，则生成一个错误。当目标要求指定的数据和格式，但未提供数据，则发生源 OLESetData 事件，而且资源可以提供所需的数据类型。

对 GetData and SetData 方法可以使用不同于设置值中列举的数据格式，包括用户定义的经 Windows 通过 RegisterClipboardFormat() API 函数注册的格式。但有几点需要告诫：

•	当数据未识别指定的数据格式时，SetData 方法要求数据具有字节数组的形式。

•	当数据具有不能识别的数据格式时，尽管 Visual Basic 可透明地将返回的字节数组转换成其它数据类型，比如字符串类型，GetData 方法也总是返回字节数组中的数据。

•	对某个在其数组结尾具有任意字节的操作系统，当在这个操作系统上运行时， GetData 返回的字节数组将大于实际数据。原因在于， Visual Basic 不知道数据的格式，它只知道操作系统分配给数据的内存大小。分配的内存通常要比数据实际所需要大。所以，在所分配的内存段的结尾可能有多余字节。结果，必须用适当的函数以有意义的方式解释返回的数据（例如，如果数据具有文本格式，则按具体长度截断字符串）。


Picture 属性 (ActiveX 控件)

返回或设置控件中要显示的图片。对于 OLE 容器控件，在设计时不可用在运行时为只读。

语法

object.Picture [= picture]

Picture 属性有下列组成部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
picture	字符串表达式，指定一个包含图片的文件，“设置值”中有详细说明。
设置值

picture 的设置值如下：

设置值	描述
(None)	（缺省值）无图片。
(Bitmap, icon, metafile, GIF, JPEG)	指定一个图片。设计时可以从属性窗口中加载图片。在运行时，也可以在位图，图标，或元文件上使用 LoadPicture 函数来设置该属性。
说明

在设计时，利用“编辑”菜单中的“复制”、“剪切”和“粘贴”命令通过剪贴板来传递图片，运行时，可以使用剪贴板方法，诸如具有非文本剪贴板常数 vbCFBitmap、vbCFMetafile 和 vbCFDIB 的 GetData、SetData 和 GetFormat，它们列在对象浏览器中的 Visual Basic (VB) 对象库中。

在设计时设置 Picture 属性，图片被保存起来并与窗体同时加载。如果创建可执行文件，该文件中包含该图象。如果在运行时加载图片，该图片不和应用程序一起保存。用 SavePicture 语句可以从窗体或图片框的图片存储到文件中。

注意   运行时，Picture 属性可以被设置为任何其它对象的 DragIcon、Icon、Image 或 Picture 属性，或者可将 LoadPicture 函数返回的图片分配给它。


SelLength、SelStart、SelText 属性 (ActiveX 控件)

•	SelLength－返回或设置所选择的字符数。

•	SelStart－返回或设置所选择的文本的起始点；如果没有文本被选中，则指出插入点的位置。

•	SelText－返回或设置包含当前所选择文本的字符串；如果没有字符被选中，则为零长度字符串 ("")。

这些属性在设计时.是不可用的。

语法

object.SelLength [= number]

object.SelStart [= index]

object.SelText [= value]

SelLength、SelStart、和 SelText 属性的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
number	一个用来指定被选择字符数的数值表达式。对于 SelLength 和 SelStart，设置值的有效范围是 0 到文本长度－在 ComboBox 或 TextBox 控件编辑区中字符的总数。
index	一个用来指定所选择文本的起始点的数值表达式，“设置值”中有详细描述。
value	包含所选择文本的字符串表达式。
说明

为下面这些任务应使用这些属性，如设置插入点、建立插入范围、在控件中选择子串、或清除文本等。与 Clipboard 对象联合使用，这些属性对于复制、剪切、和粘贴操作是很有用的。

当使用这些属性时：

•	SelLength 的设置比 0 小会导致一个运行时错误。

•	SelStart 的设置比文本长度大，会使该属性设置为现有文本长度；SelStart 的改变将使选择改变到插入点并将 SelLength 设置为 0。

•	SelText 的设置为新值，会将 SelLength 设置为 0 并用新字符串代替所选择的文本。


ShowTips 属性 (ActiveX 控件)

返回一值，决定是否对对象显示工具提示 。

语法

object.ShowTips [= value]

ShowTips 属性的语法具有以下几部分：

部分	描述
object	对象表达式 其值是“应用于”列表中的对象。
value	布尔表达式 指定是否显示 工具提示 ，如“设置值”中所描述。
设置值

 value 的设置值为：

设置	描述
True	（缺省）控件中的每个对象都能显示一个相关联的字符串， 这是 ToolTipText 属性的设置，该属性在对象之下的一个小矩形中。在运行时，当用户的光标在对象上逗留达一秒钟时， 工具提示就会出现。
False	在运行时，对象将不显示 工具提示 。
说明

在设计时 可在控件的“属性页”对话框中的通用选项卡上设置 ShowTips 属性。


Text 属性 (ActiveX 控件)

返回或设置包含在对象中的文本。

语法

object.Text [= string]

Text 属性的语法具有以下几部分：

部分	描述
object	对象表达式 ，其值是“应用于”列表中的对象。
string	字符串表达式 ，指定出现在对象中的文本。


Value 属性 (ActiveX 控件)

返回或设置对象的值。

语法

object.Value [= integer]

 Value 属性的语法具有以下几部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的对象。
integer	对 Slider 控件的一个长整数，指定滑块的当前位置。对 ProgressBar 控件的一个整数，指定 ProgressBar 控件的值。对其它控件，请参阅以下设置值。
设置值

对 Button 对象， integer 的设置值为：

常数	值	描述
tbrUnPressed	0	（缺省）。当前未按下按钮，也未复选按钮。
tbrPressed	1	当前按下或复选按钮。。
说明

•	Slider 控件－返回或设置滑块的当前位置。 Value 总是在 Slider 控件的 Max 属性值和 Min 属性值之间。

•	ProgressBar 控件－返回或设置一值，指出操作大致接近完成。增加 Value 属性并不会按照 Value 属性的精确值改变 ProgressBar 控件的外观。 Value 总是在 Max 属性值和 Min 属性值之间。在设计时不可用。


Value 属性 (ActiveX 控件) 示例

该示例使用 Value 属性来决定在 Toolbar 控件上显示相关联的 ImageList 控件的哪个图标。试以下示例，将 Toolbar 控件放在窗体上，并将代码粘贴在窗体的声明部分。然后运行示例。

Private Sub Toolbar1_ButtonClick(ByVal Button As Button)

'使用键值来决定已单击哪个按钮。

Select Case Button.Key

Case "Done"	'复选按钮。

If Button.Value = vbUnchecked Then

'未复选按钮。

Button.Value = vbChecked	'复选按钮。

' 假定有一个具有"down"键的

' ListImage 对象。

Button.Image = "down"

Else	' Uncheck the 按钮

Button.Value = vbUnchecked

' 假定有一个具有"down"键的

' ListImage 对象。

Button.Image = "up"

End If

' 更多的可能。

End Select

End Sub


RemoteHost 属性 (ActiveX 控件)

返回或设置远程计算机，控件向它发送数据或从它那里接收数据。既可提供主机名，比如 "FTP://ftp.microsoft.com"，也可提供点格式下的 IP 地址字符串，比如 "100.0.1.1"。

语法

object.RemoteHost = string

RemoteHost 属性的语法具有以下几部分：

部分	描述
object	对象表达式 其值是“应用于”列表中的对象。
string	远程计算机的名称或地址。
数据类型

String

说明

在指定该属性时，应更新 URL 属性来显示新值。如果更新 URL 的主机部分，则也要更新该属性来反映新值。

在调用 OpenURL 或 Execute 方法时也可改变 RemoteHost 属性。

在运行时直到下一个连接之前，改变该值都不会造成什么影响。


RemotePort 属性 (ActiveX 控件)

返回或设置要连接的远程端口号

语法

object.RemotePort = port

RemotePort 属性的语法具有以下几部分：

部分	描述
object	对象表达式 ，其值是“应用于”列表中的对象。
port	要连接的端口。该属性的缺省值是 80。
数据类型

Long

说明

在设置 Protocol 属性时，将对每个协议自动把 RemotePort 属性设置成适当的缺省端口。下表列出缺省端口号：

端口	描述
80	HTTP，通常用于 WorldWideWeb 连接。
21	FTP。


hDC 属性 (ActiveX 控件)

返回一个句柄 ，该句柄是由 Microsoft Windows 运行环境提供给一个对象的设备描述体 。

语法

object.hDC

object 所在处代表一个对象表达式 ，其值是“应用于”列表中的一个对象。

说明

该属性是 Windows 运行环境的设备描述体句柄。 Windows 运行环境，通过给 Grid 对象和应用程序中每个 Grid 和 Grid 控件分配一个设备描述体，管理系统显示。可以用 Print( ) 属性引用对象的设备描述体句柄。这提供了一个传递给 Windows API调用的值。

对于 Printer 窗体 Picture 控件，在设置 cdlReturnDC 标志时，该属性为打印机对话框中选择的打印机，返回一设备描述体，或设置 cdlReturnIC 标志时，返回一信息关联。

注意     hDC 属性值可以在程序运行中改变，因此不要将该值存储在变量中，应在每次需要时使用 hDC 属性。

 AutoRedraw 属性能引起 hDC 属性改变。如果窗体或 窗体 PictureBox 容器的 AutoRedraw 属性设置为 True，hDC 将作为持久图形 的设备描述体句柄（等价于 Image 属性）。当 AutoRedraw 属性为 False 时，hDC 属性是窗体窗口或 PictureBox 容器的真正的 hDC 值。程序运行中，不论 AutoRedraw 设置为何值，hDC 属性都可以改变。


Height、Width 属性 (ActiveX 控件)

返回或设置对象的维数、或 DBGrid 控件 Columns 对象的宽度。对于 Printer 和 Screen 对象，在设计时不可用。

语法

object.Height [= number]

object.Width [= number]

Height 和 Width 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
number	数值表达式，指定对象的维数，“设置值”中有详细说明。
设置值

大小如下计算：

•	Form －窗体的外部高度和宽度，包括边框和标题栏。

•	Control －从控件边框的中心度量，以使边框宽度不同的控件能够正确对齐。这些属性使用控件容器的度量单位。

•	Printer 对象－为打印设备设置的纸张物理尺寸，在设计时无效。如果在运行时设置该属性，则使用这些属性的值而不用 PaperSize 属性的设置。

•	Screen 对象－屏幕的高度和宽度；在设计时间无效，在运行时为只读。

•	Picture 对象－以 HiMetric 为单位的图片的高度和宽度。

说明

对于 Form、Printer 和 Screen 对象，这些属性值是以缇来度量的。对于窗体或控件，这些属性值随着用户或调整对象大小而改变。所有对象的这些属性的最大值与系统有关。

对不允许设置这些属性的打印机驱动程序，若设置 Height 和 Width 属性，不会发生错误但纸张的大小保持不变。 对只允许某些 缇值的打印机驱动程序，设置 Height 和 Width 属性时，不会发生错误，且该属性被设置为驱动程序所允许的值。例如，可以将 Height 设置成 150 但驱动程序可能会把它设置成 144。

对基于对象全区代作或计算，如改变对象大小或移动对象，要使用 Height、Width、Left 和 Top 属性。对基于对象内部区域的操作或计算，如在一对象内绘制或移动对象，要使用 ScaleLeft、ScaleTop、ScaleHeight 和 ScaleWidth 属性。

注意   DriveListBox 控件或 ComboBox 控件的 Height 属性不能改变，这两控件的 Style 属性设置为 0（下拉组合框）或 2（下拉列表框）。

对于 DBGrid 控件的 Columns 对象，Width 按包含 DBGrid 的对象的度量单位来指定。Width 的缺省值为 DBGrid 的 DefColWidth 属性值。

对于 Picture 对象，用 ScaleX 和 ScaleY 方法将 HiMetric 单位转换为所需的单位。


Index 属性 (ActiveX 控件)

返回或设置数，它唯一指定集合中的对象。

语法

object.Index

对象所在处是对象表达式 ，其值是“应用于”列表中的对象。

说明

按照缺省，Index 属性被设置成在集合中创建对象的次序。集合中的第一个对象的索引总是 1。

当集合中的对象重编次序时，比如将 Sorted 属性 设置成 True时，对象的 Index 属性值可以改变希望 Index 属性动态地变化，则通过使用 Key 属性来引用集合中的对象将会更有益。。


Left, Top 属性 (ActiveX 控件)

•	Left－返回或设置对象内部的左边与它的容器的左边之间的距离。

•	Top－返回或设置对象的内顶部和它的容器的顶边之间的距离。

语法

object.Left [= value]

object.Top [= value]

Left 和 Top 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
value	数值表达式，用于指定距离。
说明

对于窗体，Left 和 Top 属性总以缇为单位来表达；对于控件，它们的度量单位决定于它的容器的坐标系统。这些属性值随着用户或程序中移动该对象而改变。对于公共对话框和 Timer 控件，这些属性在运行时无效。

对任一个属性，都可以指定单精度数值。

用 Left、Top、Height 和 Width 属性来完成基于对象外部维数的操作，如移动或改变尺寸。用 ScaleLeft、ScaleTop、ScaleHeight 和 ScaleWidth 来完成基于对象内部尺寸的操作，如绘出或移动包含在该对象中的对象。与比例相关的属性只适用于 Picturebox 控件和 Form 以及 Printer 对象。


Remove 方法 (ActiveX 控件)

该方法从集合中删除一项。

语法

object.Remove (index)

Item 方法的语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的对象。
index	必需的。字符串表达式，指定被访问对象在集合中的名称或索引。
说明

对于 LinkedWindows 集合，从当前链接的几个窗口的集合中删除一个窗口。被删除的窗口变成一个有自己的 LinkedWindowFrame 的浮动窗口。此时创建 LinkedWindowFrame 窗口。

对于 VBProjects 集合，从该集合中删除指定的工程。

对于 References 集合，从该集合中删除指定的引用。


Tag 属性 (ActiveX 控件)

返回或设置一个表达式用来存储程序中需要的额外数据。与其它属性不同，Tag 属性值不被 Visual Basic 使用；可以用该属性来标识对象。

语法

object.Tag [= expression]

Tag 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
expression	字符串表达式用来标识对象，缺省值为零长度字符串 ("")。
说明

利用该属性可以给对象赋予一个标识字符串，而不会影响其任何其它属性设置值或引起副作用。当需要检查控件或作为变量传递给过程的 MDIForm 对象的标识时，Tag 属性是有用的。

提示   创建一个新的窗口实例时，给 Tag 属性赋予唯一值。


Visible 属性 (ActiveX 控件)

返回或设置一指示对象为可见或隐藏的值。

语法

object.Visible [= boolean]

Visible 属性语法包含下面部分：

部分	描述
object	对象表达式，其值是“应用于”列表中的一个对象。
boolean	布尔表达式指定对象是可见还是隐藏。
设置值

boolean 的设置值为：

设置值	描述
True	（缺省值）对象是可见的。
False	对象是隐藏的。
说明

要在启动时隐藏一个对象，在设计时将 Visible 属性设置为 False。在代码中设置该属性能够在运行时隐藏然后又重新显示控件以响应某特别事件。

注意   对窗体用 Show 或 Hide 方法，和在代码中将 Visible 属性分别设置为 True 或 False 的效果是一样的。


Object 属性 (ActiveX 控件)

返回对象与/或对象的方法或属性的设置。

语法

object.Object[.Property | .Method]

Object 属性的语法具有以下几部分：

部分	描述
object	对象表达式 ，其值是“应用于”列表中的对象。
property	对象支持的属性。
method	对象支持的方法。
说明

用该属性指定要在 Automation 任务中使用的对象。

在自动化任务中通过使用对象的属性和方法来使用 Object 属性返回的对象。对属性和方法支持的信息，请参阅有关创建对象的应用程序的文档。


属性页 (ActiveX 控件)

为获得包含在控件的“属性页”对话框中的帮助， 单击对应控件之下的按钮。然后单击属性名称以获得包含该属性的帮助。

Animation 控件	Multimedia MCI 控件
CommonDialog 控件	PictureClip 控件
DBCombo 控件	ProgressBar 控件
DBList 控件	RichTextBox 控件
ImageList 控件	Slider 控件
ListView 控件	SSTab 控件
MAPIMessages 控件	StatusBar 控件
MAPISession 控件	TabStrip 控件
MaskedEdit 控件	ToolBar 控件
MSChart 控件	TreeView 控件
MSComm 控件	UpDown 控件
MSFlexGrid 控件	Winsock 控件
属性页

Animation 控件
自动播放	AutoPlay
背景样式	BackStyle
居中对齐	Center
OLE 拖放模式	OLEDropMode
Common Dialog 控件
取消引发错误	CancelError
颜色	Color
复制	Copies
缺省扩展名	DefaultExt
对话框标题	DialogTitle
文件名称	FileName
过滤器	Filter
过滤器索引	FilterIndex
标志	Flags
字体名称	FontName
字体大小	FontSize
起始页	FromPage
帮助命令	HelpCommand
帮助上下文	HelpContext
帮助文件	HelpFile
帮助键	HelpKey
初始化路径	InitDir
最大	Max
文件最大长度	MaxFileSize
最小	Min
缺省打印机	PrinterDefault
终止页	ToPage
DBCombo 控件
外观	Appearance
有效	Enabled
整体高度	IntegralHeight
锁定	Locked
匹配项	MatchEntry
鼠标指针	MousePointer
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
样式	Style
DBList 控件
外观	Appearance
有效	Enabled
整体高度	IntegralHeight
锁定	Locked
匹配项	MatchEntry
鼠标指针	MousePointer
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
ImageList 控件
高度	Height
图象	Image
图象数	Image Count
索引	Index
键	Key
标记	Tag
使用屏蔽颜色	UseMaskColor
宽度	Width
ListView 控件
对齐	Alignment
外观	Appearance
调整	Arrange
边框样式	BorderStyle
有效	Enabled pro
隐藏列头	HideColumnHeaders
隐藏选择	HideSelection
图像列表	ImageList
索引	Index
键	Key
标签编辑	LabelEdit
标签换行	LabelWrap
鼠标指针	MousePointer
多重选择	MultiSelect
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
排序	Sorted
排序关键字	SortKey
排序顺序	SortOrder
标记	Tag
文本	Text
查看	View
宽度	Width
MAPIMessages 控件
地址主题	AddressCaption
地址编辑字段数	AddressEditFieldCount
地址标签	AddressLabel
可修改的地址	AddressModifiable
地址分辨用户界面	AddressResolveUI
获取消息类型	FetchMsgType
取排序的	FetchSorted
取非只读的	FetchUnreadOnly
MAPISession 控件
下载邮件	DownloadMail
登录对话框	LogonUI
新建对话	NewSession
密码	Password
用户名	UserName
MaskedEdit 控件
允许提示	AllowPrompt
按 Tab 键顺序接受焦点	AutoTab
边框样式	BorderStyle
剪贴板模式	ClipMode
有效	Enabled
格式	Format
隐藏选择	HideSelection
掩码	Mask
最大长度	MaxLength
鼠标指针	MousePointer
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
提示字符	PromptChar
包含提示	PromptInclude
MSChart 控件
2D	2D
3D	3D
对齐	Alignment
自动缩放	Automatic scaling
坐标轴	Axis
颜色	Color
排除系列	Exclude series
字形	Font style
字体	Font
隐藏系列	Hide series
主要部分	Major divisions
最大	Maximum
平均	Mean
最小	Minimum
次要部分	Minor divisions
方向	Orientation
模式颜色	Pattern color
模式	Pattern
在第二 Y 轴上画	Plot on 2nd Y axis
属性名称	属性名称
回归	Regression
行中的系列	行中的系列
系列类型	Series type
系列	系列
系列	系列
阴影	阴影
显示图例	显示图例
显示标记	显示标记
显示标记	显示标记
显示标尺	显示标尺
大小	大小
堆栈系列	堆栈系列
标准偏差	标准偏差
删除线	删除线
样式	样式
样式	样式
样式	样式
样式	样式
样式	样式
文本	文本
下划线	下划线
宽度	宽度
宽度	宽度
宽度	宽度
宽度	宽度
宽度	宽度
MSComm 控件
通讯端口	CommPort
DTR 有效	DTREnable
EOF 有效	EOFEnable
握手协议	Handshaking
输入缓冲区大小	InBufferSize
输入长度	InputLen
Null 禁止	NullDiscard
输出缓冲区大小	OutBufferSize
校验错替代字符	ParityReplace
R 阀值	RThreshold
RTS 有效	RTSEnable
设置值	Settings
S 阀值	SThreshold
MSFlexGrid 控件
允许整行或整列选择	AllowBigSelection
允许用户调整大小	AllowUserResizing
列	Cols
填充样式	FillStyle
定长列	FixedCols
定长行	FixedRows
显示焦点区域	FocusRect
字体	Font
格式	Format
网格行	GridLines
固定网格行	GridLinesFixed
突出显示	HighLight
合并单元	MergeCells
鼠标指针	MousePointer
图片类型	PictureType
最小行高度	RowHeightMin
行	Rows
滚动条	ScrollBars
选定模式	SelectionMode
文本样式	TextStyle
固定文本样式	TextStyleFixed
自动换行	WordWrap
Multimedia MCI 控件
自动有效	AutoEnable
BackEnabled	BackEnabled
BackVisible	BackVisible
边框样式	BorderStyle
设备类型	DeviceType
EjectEnabled	EjectEnabled
EjectVisible	EjectVisible
有效	Enabled
文件名	FileName
框架	Frames
鼠标指针	MousePointer
NextEnabled	NextEnabled
NextVisible	NextVisible
OLE 拖放模式	OLEDropMode
方向	Orientation
PauseEnabled	PauseEnabled
PauseVisible	PauseVisible
PlayEnabled	PlayEnabled
PlayVisible	PlayVisible
PrevEnabled	PrevEnabled
PrevVisible	PrevVisible
RecordEnabled	RecordEnabled
记录模式	RecordMode
RecordVisible	RecordVisible
可共享的	Shareable
静态	Silent
StepEnabled	StepEnabled
StepVisible	StepVisible
StopEnabled	StopEnabled
StopVisible	StopVisible
更新间隔	UpdateInterval
PictureClip 控件
列	Cols
行	Rows
ProgressBar 控件
外观	Appearance
边框样式	BorderStyle
有效	Enabled
最大	Max
最小	Min
鼠标指针	MousePointer
OLE 拖放模式	OLEDropMode
RichTextBox 控件
外观	Appearance
允许 OLE 放入	AutoVerbMenu
边框样式	BorderStyle
缩进	BulletIndent
滚动条无效	DisableNoScroll
有效	Enabled
文件名[从...加载]	FileName [load from]
隐藏选择	HideSelection
锁定	Locked
最大长度	MaxLength
鼠标指针	MousePointer
多行文本	MultiLine
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
右边距	RightMargin
滚动条	ScrollBars
Slider 控件
有效	Enabled
大幅调整	LargeChange
最大	Max
最小	Min
鼠标指针	MousePointer
OLE 拖放模式	OLEDropMode
方向	Orientation
选定范围	SelectRange
选定长度	SelLength
选定起点	SelStart
微调	SmallChange
滑块频率	TickFrequency
滑块样式	TickStyle
SSTab 控件
当前选项卡	CurrentTab
有效	Enabled
鼠标指针	MousePointer
OLE 拖放模式	OLEDropMode
方向	Orientation
显示焦点区域	ShowFocusRect
样式	Style
选项卡标题	TabCaption
选项卡标题	TabCaption
选项卡高度	TabHeight
选项卡最大宽度	TabMaxWidth
每行选项卡数	TabsPerRow
自动换行	WordWrap
StatusBar 控件
实际宽度	Actual Width
对齐	Alignment
自动调整大小	AutoSize
斜面	Bevel
有效	Enabled
索引	Index
键	Key
最小宽度	Minimum Width
鼠标指针	MousePointer
OLE 拖放模式	OLEDropMode
图片	Picture
显示提示	ShowTips
简单文本	SimpleText
样式	Style
标记	Tag
文本	Text
工具提示文本	ToolTipText
TabStrip 控件
标题	Caption
有效	Enabled
图象	Image
图像列表	ImageList
索引	Index
键	Key
鼠标指针	MousePointer
多行	MultiRow
OLE 拖放模式	OLEDropMode
显示提示	ShowTips
样式	Style
选项卡固定高度	TabFixedHeight
选项卡固定宽度	TabFixedWidth
选项卡宽度样式	TabWidthStyle
标记	Tag
工具提示文本	ToolTipText
TreeView 控件
外观	Appearance
边框样式	BorderStyle
有效	Enabled
隐藏选择	HideSelection
图像列表	ImageList
缩进	Indentation
标签编辑	LabelEdit
行样式	LineStyle
鼠标指针	MousePointer
OLE 拖动模式	OLEDragMode
OLE 拖放模式	OLEDropMode
路径分隔符	PathSeparator
排序	Sorted
样式	Style
ToolBar 控件
允许自定义	AllowCustomize
外观	Appearance
边框样式	BorderStyle
按钮高度	ButtonHeight
按钮宽度	ButtonWidth
标题	Caption
描述	Description
有效	Enabled
帮助上下文标识符	HelpContextID
帮助文件	HelpFile
图象	Image
图像列表	ImageList
索引	Index
键	Key
混合状态	MixedState
鼠标指针	MousePointer
OLE 拖放模式	OLEDropMode
显示提示	ShowTips
样式	Style
标记	Tag
工具提示文本	ToolTipText
值	Value
可见	Visible
宽度	Width
可换行的	Wrappable
UpDown 控件
对齐	Alignment
自动合作者	AutoBuddy
合作者控件	BuddyControl
合作者属性	BuddyProperty
递增	Increment
最大	Max
最小	Min
OLE 拖放模式	OLEDropMode
方向	Orientation
同步合作者	SyncBuddy
值	Value
换行	Wrap
Winsock 控件
本地端口	LocalPort
协议	Protocol
远程主机	RemoteHost
远程端口	RemotePort


RightToLeft 属性 (ActiveX 控件)

返回布尔值，指出文本显示方向并在双向系统上控制可见外观。

语法

object.RightToLeft

RightToLeft 属性 语法具有以下部分：

部分	描述
object	对象表达式 ，其值是“应用于”列表中的对象。
设置值

从 RightToLeft 属性可能返回的布尔值为：

设置值	描述
True	控件在双向平台上运行，比如在阿拉伯语的 Windows95 或 希伯来语的 Windows95 上运行，而且，文本从右到左运行。控件应修改其性能，比如在文本框或列表框的左边安放垂直滚动条，在文本框的右边放置标签，等等。
False	控件应该就象在非双向平台上那样运行，比如就象在英语的 Windows95 上那样，而且，文本从左到右运行。如果容器不实现这一环境属性，则其为缺省值。


Refresh 方法 (ActiveX 控件)

强制全部重绘一个窗体或控件。

语法

object.Refresh

 object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

说明

在下列情况下使用 Refresh 方法：

•	在另一个窗体被加载时显示一个窗体的全部。

•	更新诸如 FileListBox 控件之类的文件系统列表框的内容。

•	更新 Data 控件的数据结构。

Refresh 方法不能用于 MDI 窗体，但能用于 MDI 子窗体。不能在 Menu 或 Timer 控件上使用 Refresh 方法。

通常，如果没有事件发生，窗体或控件的绘制是自动处理的。但是，有些情况下希望窗体或控件立即更新。例如，如果使用文件列表框、目录列表框或者驱动器列表框显示当前的目录结构状态，当目录结构发生变化时可以使用 Refresh 更新列表。

可以在 Data 控件上使用 Refresh 方法来打开或重新打开数据库（如果 DatabaseName、 ReadOnly、 Exclusive 或 Connect 属性的设置值发生改变），并能重建控件的 Recordset 属性内的 dynaset。