在 Visual Basic 中設(shè)置窗體、報(bào)表和控件屬性

全部顯示

Form、Report 和 Control 對象都是 Microsoft Access 對象。可以在 Sub、Function 或事件過程中設(shè)置這些對象的屬性。也可以設(shè)置窗體和報(bào)表節(jié)的屬性。

設(shè)置窗體或報(bào)表的屬性

引用 Forms 或 Reports 集合中單個窗體或報(bào)表，后跟屬性名及其屬性值。例如，若要將“客戶”窗體的 Visible 屬性設(shè)為 True (-1)，請使用以下代碼行：

Forms!Customers.Visible = True

使用對象的 Me 屬性，也可以在對象模塊中設(shè)置窗體或報(bào)表的屬性。使用 Me 屬性的代碼比使用完整對象名稱的代碼執(zhí)行得更快。例如，要將“客戶”窗體的 RecordSource 屬性設(shè)為一個 SQL 語句，以便在“客戶”窗體模塊中返回“公司名稱”字段以“A”開頭的所有記錄，可使用以下代碼行：

Me.RecordSource = "SELECT * FROM Customers " _

    & "WHERE CompanyName Like 'A*'"

設(shè)置控件的屬性

引用 Form 或 Report 對象的 Controls 集合中的控件。既可以隱式引用也可以顯式引用 Controls 集合；如果使用隱式引用，那么代碼會執(zhí)行得更快。下面的示例用于設(shè)置“客戶”窗體中名為“客戶ID”的文本框的 Visible 屬性：

' Faster method.

Me!CustomerID.Visible = True

' Slower method.

Forms!Customers.Controls!CustomerID.Visible = True

設(shè)置控件屬性的最快的方法是在對象的模塊中使用對象的 Me 屬性。例如，可以使用以下代碼來切換“客戶”窗體中名為“客戶ID”的文本框的 Visible 屬性：

With Me!CustomerID

    .Visible = Not .Visible

End With

設(shè)置窗體或報(bào)表節(jié)的屬性

引用 Forms 或 Reports 集合中的窗體或報(bào)表，后跟 Section 屬性和用于標(biāo)識該節(jié)的整型數(shù)或常量。下面的示例將“客戶”窗體頁面頁眉節(jié)的 Visible 屬性設(shè)為 False：

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

Me!Section(acPageHeader).Visible = False

注釋