VBScript - Problem z Powrotem

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

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.

do
    ...
loop while b = 6 
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

 	if b <> 6 then
		Wscript.Quit
	end if

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

1 użytkowników online, w tym zalogowanych: 0, gości: 1