| Sub, Dim, Debug.Print, End Sub |
| |
| |
| Sub Versuch1() | Variablen müssen stets mit Dim, Private oder Public |
| Dim a As String | deklariert werden. |
| Dim B$ | Die Variablen a, B und c sind Strings = Zeichenketten. |
| Dim c$ | |
| a = "Erster" | Ein String. |
| B = "Versuch" | Noch ein String. |
| c = a & " " & B | Hier werden Strings mit einem Leerfeld verbunden. |
| Debug.Print c | Ausgabe im Direktbereich: "Erster Versuch". |
| End Sub | |
| |
| Sub Versuch2() | |
| Dim a As Integer | Die Variable a und B sind Integer = Zahlen. |
| Dim B As Integer | |
| Dim c As String | Die Zahlen sollen jedoch als String (Zeichenkette) |
| a = "1" | ausgegeben werden. |
| B = "2" | Die Strings werden nicht berechnet, sondern mit "&" |
| c = a & B | verbunden. |
| MsgBox c | Ausgabe in MessageBox: "12". |
| End Sub | |
| |
| Sub Versuch3() | |
| Dim x As Integer | x, y und z sind nun als Zahlen deklariert. |
| Dim y As Integer | |
| Dim z As Integer | |
| x = 9 | |
| y = 4 | |
| z = x + y | Hier wird die Summe aus x und y berechnet (+). |
| MsgBox z | Ausgabe in MessageBox: "13". |
| End Sub | |
| |
| Private Sub Form_Load() | Starten des Programms. |
| Versuch1 | |
| Versuch2 | |
| Versuch3 | |
| Unload Me | |
| End Sub | |
| |
zurück