Project) (Application.CheckField 方法

True 是表示 如果選取的任務或資源符合指定的準則。

語法

expression。 CheckField (_Field_, _Value_, _Test_, _Op_, _Field2_, _Value2_, _Test2_)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Field 必要 String 要搜尋的欄位名稱。
Value 必要 String 要比較的值與 欄位 指定之欄位的值。
Test 選用 String 欄位 和 值 之間所進行的比較類型。 預設值為"等於"。 可以是下列 其中一個比較字串。
Op 選用 字串 使用 [欄位]、[ 測試] 和 [值 ] 建立的準則與第二個準則的關聯性。 [ 作業 ] 引數可以設為"和"或"。
欄位2 選用 字串 要搜尋的第二個欄位名稱。
Value2 選用 字串 要與使用 Field2 指定的欄位值進行比較的值。
測試 2 選用 字串 Field2 與 Value2 之間進行的比較類型。 可以是與 Test 相同的比較字串之一。

比較字串

比較字串 描述
"equals" Field 的值等於 Value 。
"does not equal" Field 的值不等於 Value 。
"is greater than" Field 的值大於 Value 。
"is greater than or equal to" Field 的值大於或等於 Value 。
"is less than" Field 的值小於 Value 。
"is less than or equal to" Field 的值小於或等於 Value 。
"is within" Field 的值在 Value 之間。
"is not within" Field 的值不在 Value 之間。
"contains" 欄位 包含 值 。
"does not contain" 欄位 不包含 Value 。
"contains exactly" 欄位 確實包含 Value 。

傳回值

Variant

範例

下列範例會判斷 Duration 的值是否等於 1，並且顯示適當的訊息。

Sub Check_Field() 
 
 Dim T As Task 
 Dim Result As Boolean 
 
 Set T = ActiveProject.Tasks(3) 
 Result = CheckField("Duration", "1", "equals") 
 
 If Result Then 
 Result = MsgBox(T.GetField(pjTaskName) + " task Duration is equal to value specified.", vbOKOnly, "CheckField Method") 
 Else 
 Result = MsgBox(T.GetField(pjTaskName) + " task Duration is not equal to value specified.", vbOKOnly, "CheckField Method") 
 End If 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • Last updated on