1 Visual Basic Scritpts

2 Początek Otwieramy Start, Wszystkie programy, Notatnik

3 Hasło Wpisujemy: a=inputbox(„Wpisz hasło”) if a=„hasło”thenmsgbox”hasło prawidłowe” else msgbox”hasło nieprawidłowe”, vbcritical end if

4 Zapisujemy Plik, Zapisz jako, nazwa.vbs, Wszystkie pliki

5 Pytanie msgbox”Odpowiesz na pytanie” odp =msgbox(„pytanie”)if odp =6 then msgbox”dobrze” else msgbox”źle” end if

6 Zapisujemy Plik, Zapisz jako, nazwa.vbs, Wszystkie pliki

7 Kalkulator x=inputbox("Wpisz dzialanie, które mam policzyc:") msgbox x&" = "&eval(x)

8 Zapisujemy Plik, Zapisz jako, nazwa.vbs, Wszystkie pliki