Für alle die beim Untericht unseres Lehrers nicht mehr mitkommen. Hinter den Kulissen von Microsoft Office - ich beziehe mich dabei nur auf Word - gibt es eine Funktion die sich Visual Basic nennt. Visual Basic ist eine Programmiersprache. Davon gibt es noch eine menge andere, die sich alle irgndwie ähneln und doch auch wieder nicht. Aber nun zu der einen. Visual Basic Um zu dem Fenster zu kommen, auf dem man programmieren kan, muss man zunächst einmal eine leere Word-Datei öffnen. Dann geht man auf Extras - Makros - Visual Basic Editor. Hierauf öffnet sich eine neue Seite. Auf der Taskleiste kann man zwischen beiden Seiten wechseln. Nun klickt man oben im Menü auf () und dann auf (). Dann öffnet sich ein Fenster - das Unterprogramm - zum Programmieren. Will man kontrollieren ob das was man erschaffen hat funktioniert, so muss man nur oben in der Leiste auf das Play- Zeichen klicken. Daraufhin spult Word das Programm ab. Will man etwas ändern, muss man zunächst wieder auf Stopp drücken. Hat man dann das Fenster, dann eröffnet man ein Unterprogramm mit folgenden Wörtern: Sub Zeigermeldung () End Sub Das Wort Zeigermeldung kann durch belibige ersetzt werden. Ich nenne es einfach mal so. Wir wollen mit etwas einfachem anfangen. Einer Messagebox z.B. Das sind diese dämlichen Kästchen die uns immer netterweise bescheid geben, wenn dem Programm eine Handlung nicht passt. Und um uns an denen zu rächen, schreiben wir ihnen jetzt selbst mal einen Text. Das geht so: Sub Zeigermeldung ()        MsgBox  " Ich hasse diese Boxen", vbYESNO, "Beschwerde" End Sub Dann Kommt eine Box in der Als Überschrift Steht: Beschwerde. Ihr wisst schon. Wie oben in dem Dokument "Neues Dokument","Dokument 1" Oder "Unbenannt" steht. das vbYESNO bezieht sich auf die Antworten die man anklicken kann. Hier also Yes ( Ja) und No (Nein). Lässt man den Platz wischen den Kommas leer, dann kann man nur auf OK klicken. Soweit alles klar? Und über den Auswahlmöglichkeiten und unter der Überschrift steht halt das mit ich hasse diese Boxen. Eigentlich ganz einfach oder? Hat man Jetzt ganz viele Boxen hintereinander, ja das geht auch, dann kann man einen Konstanten Titel einfügen. Das sieht dann so aus: Sub Zeigermeldung () Const Titel = "Beschwerde" MsgBox  "Ich hasse diese Boxen" , vbYESNO, Titel MsgBox  "Die nerven mich" vbYESNO, Titel MsgBox  "Die sollen weggehen" , vbYESNO, Titel MsgBox  "Aaah haut ab! " ,vbYESNO , Titel End Sub Alles easy oder? Es erscheinen also 4Boxen hintereinander ,alle mit dem Titel Beschwerde und den jeweiligen Aussagen. Ob man Ja oder Nein anklickt, hat aber bisher keine auswirkung. Und das kommt als nächstes. Wenn man Excel kennt - sich mit Excel auskennt - kennt man sicherlich auch die Wenn-Dann-Sonst-Formel. Die gibt es bei Visual Basic auch. Nur halt auf Englisch: If Then Else. Wir wollen nun ein Zahlenspiel erstellen, bei dem man eine Zahl eingibt und der PC dann sagt, ob die Zahl zwischen 0 und 5, über 5 oder unter 0 liegt.  Gleichzeitug lernen wir noch die Inputbox kennen. Das sieht so aus: Sub Zeigermeldung ()      Dim Zahl As Double      Titel = "Ergebnis"      Zahl = Inputbox("Geben Sie ihre Zahl ein")      If Zahl < 0 Then          MsgBox " Ihre Zahl ist kleiner Null" ,, Titel      Else      If Zahl <5 Then        MsgBox " Ihre Zahl liegt zwischen Null und Fünf" ,, Titel      Else        MsgBox "Ihre Zahl liegt über 5" ,, Titel      End If      End If End Sub Das war vielleich ein bisschen viel auf einmal, aber ich versuche es zu erklären. Dim Variable As Double legt die Variable als Kommazahl fest. Eine andere Möglichkeit außer Double wäre Integer , eine Ganzzahl.  Das mit dem titel kennen wir. Dann die Inputbox.. Die benutzt man, wenn der Anwender eine Zahl oder eine Zeichenkette selbst einfügen soll. Die If Then Else erklärt eigendlich nur Wenn Das und Das ist, dann mache das und das, wenn das nicht zutrifft, schaue ob das passt. wenn das passt, mache das. wenn nicht, mache das. Verwirrend oder?  Vieleicht kann man das mit einer Zeichnung besser erklären.