将cad嵌入到vb中
摘要: Option Explicit Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As LongPrivate Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As LongPrivate lHwnd As Long Private Sub Form_Load() On Error GoTo ErrTrap Dim acadAp
阅读全文
posted @
2011-04-17 16:50 潘奕涛 阅读(48) |
评论 (0) 编辑