乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 56|回复: 4

执行次序如何调整?

[复制链接]

72

主题

2726

帖子

9

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3014
发表于 2004-5-8 11:31:00 | 显示全部楼层 |阅读模式
ThisDrawing.SendCommand "-insert" & vbCr & "123" & "s" & "1" & vbCr
ThisDrawing.ModelSpace(ThisDrawing.ModelSpace.Count - 1).Explode
这两句代码在VBA里是顺序执行,在VB.Net里却倒过来了,应该如何调整?
回复

使用道具 举报

34

主题

372

帖子

7

银币

中流砥柱

Rank: 25

铜币
508
发表于 2004-5-8 12:28:00 | 显示全部楼层
以前在VBA编程中多次遇到SendCommand方法导致执行顺序错乱的问题,所以该方法最好还是不要使用的好。
回复

使用道具 举报

72

主题

2726

帖子

9

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3014
发表于 2004-5-8 12:30:00 | 显示全部楼层
本来是想用该方法做拖动效果的,看样子。。。。
回复

使用道具 举报

72

主题

2726

帖子

9

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3014
发表于 2004-5-8 12:42:00 | 显示全部楼层
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却不行,晕,害我忙了半天
回复

使用道具 举报

34

主题

372

帖子

7

银币

中流砥柱

Rank: 25

铜币
508
发表于 2004-5-9 15:51:00 | 显示全部楼层
本来我还想用VB.NEt写一下以前用C++写的ARX程序,现在失望了。
不过我觉得你上面的程序好像更多的还是使用VBA的方法,用VB.NET开发ARX程序,应该以系统提供的那些封装类为主,ActiveX的方法可以作为补充。
一点个人意见。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-6-28 05:46 , Processed in 0.245282 second(s), 62 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表