Ist eine Codezeile ein Kommentar

Ist eine Codezeile ein Kommentar

Funktion

Diese Funktion prüft, ob die übergebene Codezeile aus einem Kommentar besteht.

Code

Public Function IstZeileKommentar(strZeile As String) As Boolean

'Variablen deklarieren strZeile = Trim$(strZeile)
If Left$(strZeile, 1) = "'" Or Left$(strZeile, 3) = "Rem" Then IstZeileKommentar = True End If
End Function

Beschreibung

Im ersten Schritt werden führende Leerzeichen entfernt. Dann wird geprüft, ob die Zeile mit einem Apostroph (') oder mit dem Schlüsselwort "Rem" beginnt.

Verweise

Dieser Code funktioniert ohne dass zusätzliche Verweise erforderlich sind.