在VB程序中能填充自定义的、不放在acad.pat中的图案吗，请各位指教！

凤子

我想用VB程序填充一个自定义图案，图案定义不放在acad.pat文件中，程序如下： patternName = tam PatternType = acHatchPatternTypeUserDefined
bAssociativity = True

' Create the associative Hatch object in model space Set hatchObj = AutoCAD.Application.ActiveDocument.ModelSpace.AddHatch(PatternType, patternName, bAssociativity) 可改变PatternType的值 怎么不行呢，请各位指教

凤子

我已经解决了，谢谢各位！