Application.CheckField 方法 (Project)
如此 如果选定的任务或资源满足指定的条件。
语法
expression。 CheckField (_Field_, _Value_, _Test_, _Op_, _Field2_, _Value2_, _Test2_)
expression：表示 Application 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Field | 必需 | String | 要搜索的域的名称。 |
| Value | 必需 | String | 要使用 字段 指定字段的值进行比较的值。 |
| Test | 可选 | String | 字段 与 值 之间进行比较的类型。 默认值为"等于"。 可以是以下 比较字符串之一。 |
| 操作 | 可选 | String | 使用 Field、 Test 和 Value 建立的条件如何与第二个条件相关。 Op 参数可以设置为"和"或"。 |
| Field2 | 可选 | String | 要搜索的第二个域的名称。 |
| Value2 | 可选 | 字符串 | 要与 Field2 指定的字段的值进行比较的值。 |
| Test2 | 可选 | 字符串 | Field2 和 Value2 之间的比较类型。 可以是与 Test 相同的比较字符串之一。 |
比较字符串
| 比较字符串 | Description |
|---|---|
| "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" | 字段 不包含 值 。 |
| "contains exactly" | 字段 只包含 值 。 |
返回值
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 支持和反馈，获取有关如何接收支持和提供反馈的指南。