执行次序如何调整?
ThisDrawing.SendCommand "-insert" & vbCr & "123" & "s" & "1" & vbCrThisDrawing.ModelSpace(ThisDrawing.ModelSpace.Count - 1).Explode
这两句代码在VBA里是顺序执行,在VB.Net里却倒过来了,应该如何调整? 以前在VBA编程中多次遇到SendCommand方法导致执行顺序错乱的问题,所以该方法最好还是不要使用的好。 本来是想用该方法做拖动效果的,看样子。。。。 VB.net总又一些Bug,前段时间发现不能对同一实体附多次扩展数据
如:
Sub test()
Dim a As AcadObject
ThisDrawing.Utility.GetEntity a, pnt
Dim datatype(1) As Integer, data(1) As Variant
datatype(0) = 1001: data(0) = "Test"
datatype(1) = 1000: data(1) = "This is a Test1"
a.SetXData datatype, data
data(1) = "This is a Test2"
a.SetXData datatype, data
End Sub
VBA里可以,VB.net却不行,晕,害我忙了半天 本来我还想用VB.NEt写一下以前用C++写的ARX程序,现在失望了。
不过我觉得你上面的程序好像更多的还是使用VBA的方法,用VB.NET开发ARX程序,应该以系统提供的那些封装类为主,ActiveX的方法可以作为补充。
一点个人意见。
页:
[1]