@Igor123455

Помогите пожалуйста назначить задачи кнопкам на приближение отдаления, сохранения и закрытие чертежа в AutoCad

'*******Процедура открытия чертежа************
Private Sub Command1_Click()
Label1.Visible = True
Set acd = CreateObject("autocad.application") 'запускаем AutoCAD
Set dr = acd.Documents
dr.Open ("C:\AutoCAD_23\Stanok.dwg") 'открываем чертеж
acd.Visible = True
Form1.Caption = "Станок" 'переименовываем главную форму
Form1.Show
Form1.Height = 10855 'устанавливаем высоту главной формы
Frame1.Visible = True 'делаем видимой панель параметров
Command1.Enabled = False
End Sub

'*******Приблизить*************
Private Sub Command24_Click()

End Sub
'*******Отдалить*************
Private Sub Command24_Click()

End Sub

'*******Сохранить чертеж*************
Private Sub Command24_Click()

End Sub

'*******Закрыть программу*************
Private Sub Command25_Click()
Rem acd.Close 'зарываем чертеж
Rem acd.quit
End Sub

0

@analyst

Приближение и удаление: http://www.kxcad.net/autodesk/... c-6c77.htm
Сохранить чертежь:
http://www.kxcad.net/autodesk/... c-6c8e.htm
Закрыть автокад:
http://www.cadtutor.net/forum/... wn-AutoCAD
http://www.cadforum.cz/cadforu... p?tip=6487
В общем по этой теме инфы хватает)

1

@Igor123455

Извиняюсь программирование на VB 6.0 для работы с чертежом в AutoCAD

0

@analyst

http://bit.pirit.info/forum/viewtopic.php?t=6626
А можно попробовать на прямую к автокаду обращаться.

1