+- Modscenter • Centrum modyfikacji do gier (https://modscenter.pl)
+-- Dział: Hyde Park (https://modscenter.pl/forum_hyde-park_280)
+--- Dział: Ogólne (https://modscenter.pl/forum_og%C3%B3lne_281)
+---- Dział: Komputery i Internet (https://modscenter.pl/forum_komputery-i-internet_286)
+---- Wątek: Quiz VBS - nie działa odpowiedź "nie" (/thread_quiz-vbs-nie-dzia%C5%82a-odpowied%C5%BA-nie_24675)
Quiz VBS - nie działa odpowiedź "nie" - 12Bernard12 - 16-03-2014
Siema.
Ostatnio chciałem wykorzystać
zwykłe komunikaty Windowsa
do stworzenia mini-quizu.
Wszysto szło dobrze do czasu
aż pojawiały się błędne
odpowiedzi po których program
miał się wyłączać, a pracował
dalej. Wczoraj ogarnąłem to i
gdy odpowiedź prawidłowa to
"tak" program działa, a pi
wybraniu odpowiedzi złej ("nie")
wyłącza się. Pojawił się kolejnu
problem. Jak zrrobić coś
takiego:
Czy FC Barcelona to polski klub?
<--- pytanie
Tak <--- zła odpowiedź,
program się wyłącza.
Nie <--- dobra odpowiedź,
pojawia się kolejne pytanie.
Oto mój sktypt:
odp = msgbox("Czy chcesz
zacząć gre?", vby
if odp =6 then
msgbox"Za chwile pojawi się
pierwsze pytanie."
odp = msgbox("Czy Motul to
firma olejowa?", vby
if odp =6 then
msgbox"Gratulacje, to poprawna
odpowiedź."
else
msgbox"Niestety, to zła
odpowiedź. Program zostanie
zamknięty."
end if
else
msgbox"Program zostanie
zamknięty"
end if
Gdyby był ktoś łaskawy i
wytłumaczył mijak to zrobić i
ewentualnie dodał takie pytanie
byłbym wdzięczny.
Ps. Chyb to już pisałem, ale
piszę na VBDcript (.vbs) i na
Win7.