DefLng K

на следующие строки

DefInt A-F

DefLng K

DefStr M

Еще раз запустите приложение и нажмите на кнопку ПУСК. В приложении будет напечатана следующая строка:

16. Добавьте в область объявления переменных и констант следующие строки:

Const Stroka1 As String = "Переменные и константы в программе"

Const Stroka2 As String = "Избегайте ошибок при объявлении типов переменных и констант."

17. Полностью замените текст программного кода процедуры, которая выполняется при нажатии кнопки ПУСК, на следующий:

Private Sub cmdПуск_Click()

K = H + G

K = K * 2

F = H - G

F = F - 10000

M = "OK!"

Print Stroka1

Print K, F, M

Print Stroka2