應(yīng)用于 AccessObjectProperties 集合對象的 Add 方法。
使用 Add 方法可以向 AccessObject 對象的 AccessObjectProperties 集合中添加作為 AccessObjectProperty 對象的新屬性。
expression.Add(PropertyName, Value)
expression 必需。返回一個 AccessObjectProperties 集合對象的表達(dá)式。
PropertyName 必需 String 型。字符串表達(dá)式,表示新屬性的名稱。
Value 必需 Variant 型。Variant 類型值,對應(yīng)于選項設(shè)置。根據(jù)特定選項的可能設(shè)置來設(shè)置該參數(shù)。可以是常量值或字符串值。
說明
使用 AccessObjectProperties 集合的 Remove 方法可以刪除已有的屬性。
應(yīng)用于 FormatConditions 集合對象的 Add 方法。
使用 Add 方法可以向組合框或文本框控件的 FormatConditions 集合中添加作為 FormatCondition 對象的條件格式。
expression.Add(Type, Operator, Expression1, Expression2)
expression 必需。返回一個 FormatConditions 集合對象的表達(dá)式。
Type 必需 AcFormatConditionType。要添加的格式條件的類型。
AcFormatConditionType 可以是下列 AcFormatConditionType 常量之一: |
acExpression |
acFieldHasFocus |
acFieldValue |
Operator 可選 AcFormatConditionOperator。如果 Type 參數(shù)為 acExpression,則忽略 Operator 參數(shù)。如果將該參數(shù)留空,則采用默認(rèn)常量 (acBetween)。
AcFormatConditionOperator 可以是下列 AcFormatConditionOperator 常量之一: |
acBetween 默認(rèn) |
acEqual |
acGreaterThan |
acGreaterThanOrEqual |
acLessThan |
acLessThanOrEqual |
acNotBetween |
acNotEqual |
Expression1 可選 Variant 型。與條件格式的第一部分關(guān)聯(lián)的 Variant 值或表達(dá)式??梢允浅A恐祷蜃址?。
Expression2 可選 Variant 型。當(dāng) Operator 參數(shù)為 acBetween 或 acNotBetween 時,與條件格式的第二部分關(guān)聯(lián)的 Variant 值或表達(dá)式(否則,忽略該參數(shù))??梢允浅A恐祷蜃址怠?/span>
說明
使用 FormatConditions 集合的 Delete 方法可以從組合框或者文本框控件中刪除已有的 FormatConditions 集合。
Add 方法為選項卡控件的 Pages 集合添加一個新的 Page 對象。
expression.Add(Before)
expression 必需。返回一個 Pages 集合對象的表達(dá)式。
Before 可選 Variant 型。Integer 型,用來指定 Page 對象的索引,新的 Page 對象將添加到該對象之前。Page 對象的索引和該 Page 對象的 PageIndex 屬性值相對應(yīng)。如果忽略該參數(shù),則新的 Page 對象將添加到集合的末尾。
說明
Pages 集合中的第一個 Page 對象對應(yīng)于選項卡控件中最左邊的頁,索引為 0。第二個 Page 對象為緊接其右邊的第一頁,索引為 1,選項卡控件中的所有其他 Page 對象以此類推。
如果將 Before 參數(shù)值指定為 0,新的 Page 對象將位于 Pages 集合中第一個 Page 對象之前。然后新的 Page 對象成為該集合中的第一個對象,其索引為 0。
只有當(dāng)窗體在“設(shè)計”視圖中時,才可以將 Page 對象添加到選項卡控件的 Pages 集合上。
應(yīng)用于 AdditionalData 對象的 Add 方法。
添加在調(diào)用 ExportXML 方法時將包括的額外表或查詢。返回 AdditionalData。
expression.Add(var)
expression 必需。返回 AdditionalData 對象的表達(dá)式。
var 必需String 型。要添加的表或查詢的名稱。
應(yīng)用于 SmartTagProperties 對象的 Add 方法。
向智能標(biāo)記添加自定屬性。返回 SmartTagProperty。
expression.Add(Name, Value)
expression 必需。返回 SmartTagProperties 對象的表達(dá)式。
Name 必需 String 型。用于自定義屬性的名稱。
Value 必需 Variant 型。自定義屬性的名稱。
應(yīng)用于 SmartTags 對象的 Add 方法。
向窗體、控件或數(shù)據(jù)訪問頁添加智能標(biāo)記。返回 SmartTag。
expression.Add(Name)
expression 必需。返回一個 SmartTags 集合的表達(dá)式。
Name 必需 String 型。要添加的智能標(biāo)記的名稱。
下面的示例將頁添加到“設(shè)計”視圖中窗體上的選項卡控件中。要試用該示例,請新建包含選項卡控件 TabCtl0 的窗體 Form1。將下列代碼粘貼到標(biāo)準(zhǔn)模塊中,然后運(yùn)行它:
Function AddPage() As Boolean
Dim frm As Form
Dim tbc As TabControl, pge As Page
On Error GoTo Error_AddPage
Set frm = Forms!Form1
Set tbc = frm!TabCtl0
tbc.Pages.Add
AddPage = True
Exit_AddPage:
Exit Function
Error_AddPage:
MsgBox Err & ": " & Err.Description
AddPage = False
Resume Exit_AddPage
End Function