access VBA教程：在 Visual Basic 中设置窗体、报表和控件属性

时　间:2012-04-07 22:02:13
作　者:网行者   ID：12122  城市：江门
摘　要:在 Visual Basic 中设置窗体、报表和控件属性
正　文:

Form、Report 和Control 对象都是Microsoft Access对象。可以在Sub、Function 或事件过程中设置这些对象的属性。也可以设置窗体和报表节的属性。

设置窗体或报表的属性

引用Forms 或Reports集合中单个窗体或报表，后跟属性名及其属性值。例如，若要将“客户”窗体的 Visible属性设为 True (-1)，请使用以下代码行：

Forms!Customers.Visible = True

使用对象的 Me属性，也可以在对象模块中设置窗体或报表的属性。使用 Me属性的代码比使用完整对象名称的代码执行得更快。例如，要将“客户”窗体的 RecordSource属性设为一个SQL 语句，以便在“客户”窗体模块中返回“公司名称”字段以“A”开头的所有记录，可使用以下代码行：

Me!RecordSource = "Select * FROM Customers " _
    & "Where CompanyName Like 'A*'"

设置控件的属性

引用 Form 或 Report对象的Controls集合中的控件。既可以隐式引用也可以显式引用 Controls集合；如果使用隐式引用，那么代码会执行得更快。下面的示例用于设置“客户”窗体中名为“客户ID”的文本框的 Visible属性：

' Faster method.
Me!CustomerID.Visible = True

' Slower method.
Forms!Customers.Controls!CustomerID.Visible = True

设置控件属性的最快的方法是在对象的模块中使用对象的 Me属性。例如，可以使用以下代码来切换“客户”窗体中名为“客户ID”的文本框的 Visible属性：

With Me!CustomerID
    .Visible = Not .Visible
End With

设置窗体或报表节的属性

引用 Forms 或 Reports集合中的窗体或报表，后跟 Section属性和用于标识该节的整型数或常量。下面的示例将“客户”窗体页面页眉节的 Visible属性设为 False：

Forms!Customers.Section(3).Visible = False

Me!Section(acPageHeader).Visible = False

注意

• 对于需要设置的每个属性，可以在“帮助”索引中查阅该属性，查找如下信息：
  • 是否可从 Visual Basic 设置属性。
  • 可用于设置该属性的视图。不是每个属性都能在所有的视图中进行设置。例如，只有在窗体“设计”视图中才能设置窗体的“边框样式”属性。
  • 可用于设置该属性的值。当在 Visual Basic 中设置属性时，常常会使用其他的不在属性表中的设置。例如，如果属性设置是从列表中进行选择，必须使用对应每个选项的值或数字。
• 若要在 Visual Basic 中设置控件的默认属性，可使用DefaultControl属性。