Returns the translation unit with the given node number.

Syntax:

GetTransUnit( NodeNumber As Long ) As TransUnit
Return: TransUnit
Parameters: NodeNumber Node number of the translation unit to be returned.

Example:
Dim ProjFile As ProjectFile
Dim TU As TransUnit

Set ProjFile = Application.ActiveProjectFile

If (ProjFile.IsTransUnit(117)) Then
    Set TU = ProjFile.GetTransUnit(117)
End If

See also:

Class ProjectFile


Last Updated: 03/11/04