Verifies that an object's geometry contains RhinoScript user data.
Rhino.IsObjectData (strObject)
| strObject | Required. String. The object's identifier. | 
| Boolean | True or False indicating whether or not the object's geometry contains any RhinoScript user data if successful. | 
| Null | If not successful, or on error. | 
Dim strObject, blnResult
strObject = Rhino.GetObject("Select object")
If Not IsNull(strObject) Then
blnResult = Rhino.IsObjectData(strObject)
If blnResult = True Then
Rhino.Print "This object's geometry contains RhinoScript user data"
Else
Rhino.Print "This object's geometry contains no RhinoScript user data"
End If
End If