End Sub

6. В окне редактора кода выберите вверху слева в выпадающем списке объект cmdОчистить, а правом выпадающем списке – событие MouseMove (Движение мыши). Напишите следующий программный код (заключенный между командами Private Sub и End Sub):

Private Sub CmdОчистить_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

FrmСтих.Cls

End Sub

7. Для программирования щелчка на кнопке ВЫХОД достаточно записать команду End – конец программы:

Private Sub CmdВыход_Click()

End