VBScript - Problem z Powrotem

MATIK 09
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 7
0

Witam mam znowu problem z VBScript Wiem że ten język programowania jest już przestarzały i i tak nikt go nie używa ale lubię się nim bawić. I przychodzę z pytaniem, czy można w jakiś sposób Powrócić do poprzedniego komunikatu? w sensie Mam taki skrypt:

h=InputBox("Wpisz hasło","Program")
if h="haslo" then
w=MsgBox("Witamy w Programie",0+64,"Program")
else
b=MsgBox("Niepoprawne hasło. Czy chcesz kontynuować?",4+16,"Program")
if b =6 then
Tutaj chce powrócić do h
else
Wscript.Quit
end if
end if

PerlMonk
  • Rejestracja: dni
  • Ostatnio: dni
  • Lokalizacja: Warszawa 🐪
  • Postów: 1719
2

Chcesz ponownie wyświetlić komunikat h=InputBox("Wpisz hasło","Program") jeśli b = 6? Jeśli tak, to pewnie przyda ci się pętla, np.

Kopiuj
do
    ...
loop while b = 6 
Pawel L.
  • Rejestracja: dni
  • Ostatnio: dni
  • Lokalizacja: Warszawa
  • Postów: 40
1

Ewidentnie sugerujesz użycie polecenia Goto, którego użycie nie jest zalecane w żadnych dobrych praktykach programowania.
Ja proponuję odwrócić logikę drugiego warunku

Kopiuj
 	if b <> 6 then
		Wscript.Quit
	end if

i całość Twojego kodu objąć pętlą nieskończoną.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.