Rhino.HatchPatternDescription (strHatch)
strHatch |
Required. String. The name of an existing hatch pattern. |
String |
The hatch pattern's description if successful. |
Null |
If not successful, or on error. |
Dim arrPatterns, strPattern, strDesc
arrPatterns = Rhino.HatchPatternNames
For Each strPattern In arrPatterns
strDesc = Rhino.HatchPatternDescription(strPattern)
If IsNull(strDesc) Then
Rhino.Print strPattern
Else
Rhino.Print strPattern & " - " & strDesc
End If
Next