Вопросы спецам

[alleonid]

Имею следующие вопросы:
1) Можно ли по умолчанию значения всех переменных As Double установить равными не нулю, а 1?
2) Можно ли событию, состоящему в нажатии крестика в верхнем правом углу формы назначить не закрытие (выгрузку формы), как по умолчанию, а просто Visible = False?
Заранее благодарен.

[X-BOND]

1. Думаю, что нет.

2.

Код: Выделить всё

Private Sub Form_Unload(Cancel As Integer)
    Cancel = 1
    Me.Hide
End Sub


[GSerg]

1. Нет.
2. Да, путём обработки Form_Unload, установки Cancel=true и вызова me.hide.

[Amed]

Надёжное прикрытие

[alleonid]

Всем - большой сэнкс.