Связывание объекта Application
|
Sub AutoOpen() ' Связывание объекта Application с событиями Set App1.AppEv = Application End Sub |
| Листинг 1.70. |
| Закрыть окно |
|
Sub AutoOpen() ' Связывание объекта Application с событиями Set App1.AppEv = Application End Sub |
| Листинг 1.70. |
| Закрыть окно |