索引篇 共55页[1 2 3 4 5 6 7 > » <... 最后一页]

属性索引(E-F)

返回或设置一个值，该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。
语法：
object.Enabled [= boolean]
object 对象表达式，其值是“应用于”列表中的一个对象。如果 object 被省略，则与活动窗体模块相联系的窗体被认为是 object。
boolean 一个用来指定 object 是否能够对用户产生的事件作出反应的布尔表达式。
boolean 的设置为：
True （缺省）允许 object 对事件作出反应。
False 阻止 object 对事件作出反应。

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

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

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

例：该例使一个 CommandButton 控件有效而不管 TextBox 控件是否包含文本。要试用此例，先将下面的代码粘贴到带有 CommandButton 和 TextBox 控件的一个窗体的声明部分，然后按下 F5 键并在文本框中随意输入一些内容。

Private Sub Form_Load ()
Text1.Text = "" ' 清除文本框的内容。
Command1.Caption = "Save" ' 在按钮上放置标题。
End Sub

Private Sub Text1_Change ()
If Text1.Text = "" Then '查看文本框是否为空。
Command1.Enabled = False '使按钮无效。
Else
Command1.Enabled = True '使按钮有效。
End If
End Sub

Font

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

txtFirstName.Font.Bold = True

FontBold

按下述格式返回或设置字体样式：Bold、Italic、Strikethru 和 Underline。

注意： 包含 FontBold、FontItalic、FontStrikethru 和 FontUnderline 属性是为了 CommonDialog 控件的使用，并与早期的 Visual Basic 版本保持兼容。如果需要其它的功能，请使用新的 Font 对象属性（对CommonDialog 控件不可用）。

语法：
object.FontBold [= boolean]
object.FontItalic [= boolean]
object.FontStrikethru [= boolean]
object.FontUnderline [= boolean]

boolean 布尔表达式，指定字体样式，“设置值”中有详细说明。
boolean 的设置值如下：
True （除 CommonDialog 控件外，FontBold 的缺省值）使用该样式格式。
False （FontItalic、FontStrikethru 和 FontUnderline，以及 CommonDialog 控件中的 FontBold 的缺省值）不使用该样式格式。

说明：
可以通过这些字体属性，在设计时用属性窗口或在运行时使用代码来格式化文本。对于 Picturebox 控件及 Form 和 Printer 对象，设置这些属性不会影响在控件或对象上已经绘出的图片和文本。对于其它控件，改变字体将会在屏幕上立刻生效。

若和 CommonDialog 控件一起使用这些属性，必须将 Effects 标志置位。

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

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

例：这个例子中，每单击一次鼠标，就将窗体中的文本置成两种样式组合之一。要尝试这个例子，请将代码粘贴到窗体的声明部分，然后按 F5 键并单击窗体。

Private Sub Form_Click ()
FontStrikethru = Not FontStrikethru ' 转换strikethrough。
FontItalic = Not FontItalic ' 转换字体样式。
Print "Now is the time!" ' 输出文本。
End Sub

FontName

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

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

语法：
object.FontName [= font]
font 字符串表达式，指定所用的字体名。

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

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

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

例：这个例子使用指定字体输出每种字体的名称。要尝试这个例子，请将代码粘贴到窗体的声明部分。按 F5 键运行该程序，然后单击窗体。每单击一次窗体就输出一个字体的名称。

Private Sub Form_Click ()
Static I ' 声明变量。
Dim OldFont
OldFont = FontName ' 保留原来的字体。
FontName = Screen.Fonts(I) ' 改变到新的字体。
Print Screen.Fonts(I) ' 输出字体的名称。
I = I + 1 ' 计数器增一。
If I = FontCount Then I = 0 ' 重新开始。
FontName = OldFont ' 恢复原来的字体。
End Sub

FontSize

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

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

语法：
object.FontSize [= points]
points 数值表达式，用磅为单位指定所用字体的大小。

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

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

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

例：这个例子中，每单击一次鼠标，就使用两种不同大小的字体在窗体中输出文本。要尝试这个例子，请将代码粘贴到窗体的声明部分。按 F5 键运行该程序，然后单击窗体。

Private Sub Form_Click ()
FontSize = 24 ' 设置字体大小(FontSize)。
Print "This is 24-point type." ' 使用大字体输出。
FontSize = 8 ' 设置 FontSize.
Print "This is 8-point type." ' 使用小字体输出。
End Sub

ForeColor

BackColor－返回或设置对象的背景颜色。
ForeColor－返回或设置在对象里显示图片和文本的前景颜色
语法：
object.BackColor [= color]
object.ForeColor [= color]
color 值或常数，确定对象前景或背景的颜色，“设置值”中有详细说明。
设置值：
Visual Basic 用 Microsoft Windows 运行环境的红-绿-蓝 (RGB) 颜色方案。color 的设置值如下：
标准 RGB 颜色： 使用调色板或在代码中使用 RGB 或 QBColor 函数指定的颜色。
系统缺省颜色： 由对象浏览器中的 Visual Basic (VB) 对象库所列的系统颜色常数指定的颜色。Windows 运行环境替换使用用户在控制面板设置值中的选择。

对所有的窗体和控件，在设计时的缺省设置值如下：
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 运行环境中显示文本，文本和背景的颜色必须都是原色。如果所选择的文本或背景颜色没有显示出来，则选择颜色中可能有抖动色－也就是说，最多由三种不同颜色的像素组成的颜色。如果对文本或背景选择了抖动色，则会用最接近的原色来代替。