Code Block |
---|
'1 Задать вопрос пользоватею If MsgBox("Вы уверены что хотите создать технический документ?", vbYesNo Or vbInformation, "Внимание!") = vbNo Then Exit Function End If |
Code Block |
---|
'1 Задать вопрос пользоватею If MsgBox("Вы уверены что хотите создать технический документ?", vbYesNo Or vbInformation, "Внимание!") = vbNo Then Exit Function End If |