Microsoft Small Basic - poradnik programowania: Różnice pomiędzy wersjami

Microsoft Small Basic - poradnik programowania (tekst źródłowy)

Wersja z 13:40, 9 maj 2016

Dodane 1524 bajty , 9 maj 2016

→‎And (i), Or (lub)

WizualnieWikikod

Kenex

Administratorzy interfejsu, Administratorzy

16 020

edycji

@@ Linia 650: / Linia 650: @@
 Poniższa forma jest niepoprawna:
 * <code> <s>If (X > 0 And < 10) Then</s> </code>
+=== Tunel z Else ===
+Załóżmy, że chcemy, by powyższy program zawsze wyświetlał tylko jeden napis, a gdy żaden warunke nie został spełniony, również wyświetlał powiadomienie. W takiej sytuacji dobrze skorzystać z kilku <code>Else</code>.
+<code>
+<poem>
+TextWindow.WriteLine("Czy rodzice kupili rower?")
+odpowiedź1 = TextWindow.Read()
+TextWindow.WriteLine("Czy rodzice kupili komputer?")
+odpowiedź2 = TextWindow.Read()
+If (odpowiedź1 = "tak" And odpowiedź2 = "tak") Then
+  TextWindow.WriteLine("Dotrzymali słowa, jeśli obiecali rower I komputer")
+'''''Else'''''
+  If (odpowiedź1 = "tak" Or odpowiedź2 = "tak") Then
+    TextWindow.WriteLine("Dotrzymali słowa, jeśli obiecali rower LUB komputer.")
+  '''''Else'''''
+    TextWindow.WriteLine("Żaden warunek nie został spełniony.")
+  EndIf
+EndIf
+</poem>
+</code>
+Gdy w żadnym polu nie wpiszesz "tak":<br>
+http://i.imgur.com/7dbVKMw.png
+Gdy w jednym polu wpiszesz "tak":<br>
+http://i.imgur.com/CULz3Cv.png
+Gdy w obu polach wpiszesz "tak":<br>
+http://i.imgur.com/Renj23V.png
+Spójrzmy na kod programu. n działa w sposób następujący:
+* Jeśli ''odpowiedź1 = "tak" i odpowiedź2 = "tak"'' wtedy wyświetl napis "''Dotrzymali słowa, jeśli obiecali rower I komputer''"
+* Jeśli nie, wtedy sprawdza kolejny warunek:
+** Jeśli ''odpowiedź1 = "tak" lub odpowiedź2 = "tak"'' wtedy wyświetl napis "''Dotrzymali słowa, jeśli obiecali rower LUB komputer''"
+** Jeśli nie, wtedy wyświetl napis "''Żaden warunek nie został spełniony''"
 === Przykład: Ocenianie kwadry socjotypu ===