用户登陆
站点日历
站点统计
最新评论
根据AutoCAD的版本来确定使用ObjectDBX的版本 [ 日期：2009-02-17 ] [ 来自：Private Sub UserForm_Initialize()
'根据AutoCAD的版本来确定使用ObjectDBX的版本
If Left(Version, 2) = "15" Then
Set objDbx = CreateObject("ObjectDBX.AxDbDocument.1")
ElseIf Left(Version, 2) = "16" Then
Set objDbx = CreateObject("ObjectDBX.AxDbDocument.16")
End If
End Sub
'根据AutoCAD的版本来确定使用ObjectDBX的版本
If Left(Version, 2) = "15" Then
Set objDbx = CreateObject("ObjectDBX.AxDbDocument.1")
ElseIf Left(Version, 2) = "16" Then
Set objDbx = CreateObject("ObjectDBX.AxDbDocument.16")
End If
End Sub
|
|
是啊哈哈哈哈哈
| 发表评论 - 不要忘了输入验证码哦！ | |||
| 作者： | 用户：
密码： 注册？ 验证： |
||
| 评论：
禁止表情 禁止UBB 禁止图片 识别链接 识别关键字 
 
 
 
 
 
  
 
|
|
||
