|
Dobrý deň chcem sa spytať ako v inputboxe stlačením CANCEL vykonám operaciu Exit Sub takto to mám ak nezadam žiaden nazov
zadaj: Dim novy_nazov As String = InputBox("Zadajte nový názov:", "Aplikácia")
'tu potrebujem podmienku ak stlacim CANCEL
'If novy_nazov = False Then Exit Sub ' to mi nefunguje
If novy_nazov = "" Then
MsgBox("Nezadali ste žiaden nový názov")
GoTo zadaj
End If
Ďakujem
|