通过

ViewSingle.Name Property

  • 项目
Project Developer Reference

Returns the name of a ViewSingle object. Read/write String.

Syntax

expression.Name

expression   A variable that represents a ViewSingle object.

Return Value
String

Example
The following example displays the task names that contain the specified text.

Visual Basic for Applications 
  Sub NameExample()

Dim t As Task
Dim x As String
Dim y As String

    x = InputBox$("Search for tasks that include the following text in their names:")

If Not x = "" Then
    For Each t In ActiveProject.Tasks
        If InStr(1, t.Name, x, 1) Then
            y = y &amp; vbCrLf &amp; t.ID &amp; ": " &amp; t.<strong class="bterm">Name</strong>
			            End If
    Next t

    If Len(y) = 0 Then
        MsgBox "No tasks with the text " &amp; x &amp; " found in the project",     vbExclamation
    Else
        MsgBox y
    End If
End If



End Sub

See Also