{"id":55000115,"date":"2017-12-01T00:00:00","date_gmt":"2020-03-27T19:29:58","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=115"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Visual_Basic_Bedingungen_und_Schleifen","status":"publish","type":"post","link":"https:\/\/vbentwickler.de\/Visual_Basic_Bedingungen_und_Schleifen\/","title":{"rendered":"Visual Basic: Bedingungen und Schleifen"},"content":{"rendered":"

Wer bisher mit VBA oder C# gearbeitet hat und zu VB wechseln möchte, sieht sich bei der Entwicklung von WPF-Anwendungen einigen Änderungen gegenüber. Dieser Artikel liefert die Grundlagen zur Programmierung von Bedingungen wie If…Then oder Select Case und von Schleifen wie For…Next, For…Each oder Do While. Zum Experimentieren mit den Beispielen nutzen wir das Tool LINQPad 5. <\/b><\/p>\n

Wer von VBA kommt, wird wenig Probleme haben, sich in Visual Basic für .NET einzuarbeiten. Wer nur C# kennt oder sich daran gewöhnt hat, muss sich erst ein wenig einarbeiten. Hier kommen nämlich die wichtigsten Konstrukte bei der Programmierung von Methoden und Funktionen: Bedingungen und Schleifen. Die Beispiele dieses Artikels haben wir der Einfachheit halber wieder im Tool LINQPad5 ausprobiert, das wir im Artikel LINQPad: LINQ, C# und VB einfach ausprobieren<\/b> bereits vorgestellt haben.<\/p>\n

Einfaches If…Then<\/h2>\n

Eine einfache If…Then<\/b>-Bedingung prüft, ob der angegebene Ausdruck wahr ist und führt dann die zwischen der If<\/b>– und der End If<\/b>-Zeile enthaltenen Anweisungen aus:<\/p>\n

Dim <\/span>intZahl As Integer<\/span>\r\nintZahl = 10\r\nIf <\/span>intZahl > 5 Then<\/span>\r\n     Debug.WriteLine(\"intZahl ist größer als 5\")\r\nEnd If<\/span><\/pre>\n
Von C# kommend ist das eine Umstellung, denn auch hier fallen die geschweiften Klammern weg und die Semikola am Ende der Befehlszeilen. Auch ist es hier nicht mehr möglich, eine einfache Zeile einfach ohne geschweifte Klammern hinter der If<\/b>-Zeile einzufügen. Es gibt aber auch unter VB eine vereinfachte Schreibweise für einfache Anweisungen. Hier lassen Sie dann einfach die Zeile End If <\/b>weg und fügen die auszuführende Zeile einfach an die Bedingung an:<\/p>\n
If <\/span>intZahl > 5 Then<\/span> Debug.WriteLine(\"intZahl ist größer als 5\")<\/pre>\n
If…Then…Else-Bedingung<\/h2>\n
Nehmen wir noch einen Else<\/b>-Zweig hinzu, um Anweisungen anzugeben, die bei Nichterfüllung der Bedingung ausgeführt werden sollen. Dann sieht die Bedingung wie folgt aus:<\/p>\n
If <\/span>intZahl > 5 Then<\/span> \r\n     Debug.WriteLine(\"intZahl ist größer als 5\")\r\nElse<\/span> \r\n     Debug.WriteLine(\"intZahl ist nicht größer als 5\")\r\nEnd If<\/span><\/pre>\n
Wenn der erste Teil der Bedingung hier nicht eintritt, wird auf jeden Fall der zweite Teil hinter dem Schlüsselwort Else <\/b>ausgeführt. Sie können statt Else <\/b>auch das Schlüsselwort ElseIf <\/b>verwenden und eine zweite Bedingung angeben. Im folgenden Beispiel müssen wir allerdings beachten, dass im Falle von intZahl = 5 <\/b>keiner der beiden Zweige ausgeführt wird:<\/p>\n
If <\/span>intZahl > 5 Then<\/span>\r\n     Debug.WriteLine(\"intZahl ist größer als 5\")\r\nElse<\/span>If intZahl < 5 Then\r\n     Debug.WriteLine(\"intZahl ist nicht größer als 5\")\r\nEnd If<\/span><\/pre>\n
Für diesen Fall können wir aber auch noch einen finalen Else<\/b>-Zweig anhängen, der auf jeden Fall ausgeführt wird. Der Else<\/b>-Zweig kann allerdings nur als letzte Bedingung verwendet werden:<\/p>\n
If <\/span>intZahl > 5 Then<\/span>\r\n     Debug.WriteLine(\"intZahl ist größer als 5\")\r\nElse<\/span>If intZahl < 5 Then\r\n     Debug.WriteLine(\"intZahl ist nicht größer als 5\")\r\nElse<\/span>\r\n     Debug.WriteLine(\"Keine der angegebenen Bedinungen traf zu.\")\r\nEnd If<\/span><\/pre>\n
Sie können mehrere ElseIf<\/b>-Zweige einsetzen. Das ist ein großer Unterschied zu C#, denn dort gibt es gar kein ElseIf<\/b> (nur eine vereinfachte Schreibweise für verschachtelte If<\/b>-Bedingungen mit Else If<\/b>). Hier müssen Sie für solche Fälle mit verschachtelten Bedingungen arbeiten, wenn Sie If…Then <\/b>nutzen wollen.<\/p>\n
Verschachtelte If…Then-Bedingung<\/h2>\n
If…Then<\/b>-Bedingungen lassen sich ineinander verschachteln:<\/p>\n
If <\/span>intZahl > 5 Then<\/span>\r\n     Debug.WriteLine(\"intZahl ist größer als 5\")\r\nElse<\/span>If \r\n     If <\/span>intZahl > 3 Then<\/span>\r\n         Debug.WriteLine(\"intZahl ist größer als 3 und kleiner als 5\")\r\n     Else<\/span>\r\n         Debug.WriteLine(\"intZahl ist kleiner gleich 3\")\r\n     End If<\/span>\r\nEnd If<\/span><\/pre>\n
Verwendung von If…Then in einer Zeile mit IIf<\/h2>\n
Die von VBA bekannte Funktion IIf <\/b>können Sie unter C# nicht verwenden, es gibt dort eine alternative Schreibweise mit gleicher Funktion. Unter VB jedoch steht IIf <\/b>wie unter VBA zur Verfügung. Dabei erwartet die Funktion drei Parameter:<\/p>\n