Private Sub komada_Exit(Cancel As Integer)
Cancel = KontrolaKomada
End Sub