Add 方法

此頁沒有內(nèi)容條目
內(nèi)容

expandtri全部顯示

blueup應(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 方法可以刪除已有的屬性。

blueup應(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ù)為 acBetweenacNotBetween 時,與條件格式的第二部分關(guān)聯(lián)的 Variant 值或表達(dá)式(否則,忽略該參數(shù))??梢允浅A恐祷蜃址怠?/span>

說明

使用 FormatConditions 集合的 Delete 方法可以從組合框或者文本框控件中刪除已有的 FormatConditions 集合。

blueup應(yīng)用于 Pages 集合對象的 Add 方法。

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 集合上。

blueup應(yīng)用于 AdditionalData 對象的 Add 方法。

添加在調(diào)用 ExportXML 方法時將包括的額外表或查詢。返回 AdditionalData

expression.Add(var)

expression   必需。返回 AdditionalData 對象的表達(dá)式。

var   必需String 型。要添加的表或查詢的名稱。

blueup應(yīng)用于 SmartTagProperties 對象的 Add 方法。

向智能標(biāo)記添加自定屬性。返回 SmartTagProperty。

expression.Add(Name, Value)

expression   必需。返回 SmartTagProperties 對象的表達(dá)式。

Name   必需 String 型。用于自定義屬性的名稱。

Value   必需 Variant 型。自定義屬性的名稱。

blueup應(yīng)用于 SmartTags 對象的 Add 方法。

向窗體、控件或數(shù)據(jù)訪問頁添加智能標(biāo)記。返回 SmartTag。

expression.Add(Name)

expression   必需。返回一個 SmartTags 集合的表達(dá)式。

Name   必需 String 型。要添加的智能標(biāo)記的名稱。

示例

blueup應(yīng)用于 Pages 集合對象。

下面的示例將頁添加到“設(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