Hatch（Bricks Type) Problem

mildleevba · 发表于 2006-10-10 23:54:00

为什么我这个程序运行不出来呢，还有Adjust变量我不是太懂，请大家帮我看一下，谢谢

唐僧肉 · 发表于 2006-10-11 15:19:00

你是什么问题没讲清楚。

另外cad的hatch问题多多，特别是hatch的比例问题，可能导致意外错误而程序不报错。

mildleevba · 发表于 2006-10-11 22:06:00

是啊,正如你说的程序确实没报错可就是运行不了,如果运行成功的话会出现CAD中第一个图,就是有交错效果的那个,这个Adjust变量的初始值是什么?它到底表示什么啊?其中内嵌的IF条件你觉得有错吗?哎,我是从别的书上看来的,可这是我遇到的第一个难以解释的问题.

很感激你的回复,谢谢

唐僧肉 · 发表于 2006-10-12 09:24:00

Global Const Pi = 3.14159
Sub DrawCircleOfBricks()
frmCircleOfBricks.Show
End Sub
晕啊，就这么一段代码，怎么运行？你看过代码没有？

mildleevba · 发表于 2006-10-12 22:39:00

那一段是在模块里的啊，其他主要的都在UserForm的代码里了。

Adjust被声明为静态的，可是之前它没有被赋值，按理说只能as new xx，可突然冒出那么一句，叫人搞不懂。

我看的是Mastering AutoCAD VBA，那本书里的，是pdf版。代码按书里的都没错啊，我又检查了一遍。哎，这个问题弄不好，只能先放着了

唐僧肉 · 发表于 2006-10-13 13:20:00

Private Sub cmdCreatePavers_Click()
Unload Me
DrawCircularPavers
End Sub
将unload me写在调用子程DrawCircularPavers之后再运行一下。

呵呵，这个错误太。。。。。。

账号		自动登录	找回密码
密码			注册