共用方式為


應用程式檢查欄位方法 (專案)

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

語法

expressionCheckField (_Field_, _Value_, _Test_, _Op_, _Field2_, _Value2_, _Test2_)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Field 必要 String 要搜尋的欄位名稱。
Value 必要 String 要比較的值與 欄位 指定之欄位的值。
Test 選用 String 欄位 之間所進行的比較類型。 預設值為"等於"。 可以是以下其中一種 比較串
樓主 選用 字串 場域測試價值 所建立的標準如何與第二個標準相關。 [ 作業 ] 引數可以設為"和"或"。
田野2 選用 字串 要搜尋的第二個欄位名稱。
Value2 選用 字串 要比較的值與欄位 Field2 指定的值比較。
測試2 選用 字串 Field2Value2 之間的比較類型。 也可以是和 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 支援與意見反應