Point.PointTypeId (property, read)

Syntax Point.PointTypeId
Description String. To retrieve the character based Point Type ID.
Example 
Sub Main()
   Dim MyPoint as new Point
   MyPoint.Id = "CP_DIGITAL"
   if MyPoint.PointTypeId = "DIGITAL" then
      MsgBox "It is a digital point"
   else
      MsgBox "Point Type ID is : " & MyPoint.PointTypeId
   end If
End Sub
See Also Point.DataType (property, read)