Rubrik: Variablen & Strings | 15.08.02 |
ASCII-Code eines Zeichens ermitteln VB-Version: VB5, VB6 | ||
Views: 69.653 |
Immer wieder wird gefragt: Wie kann ich den ASCII-Code eines Zeichensermitteln? Natürlich könnte man einfach einen Blick in diese Tabelle in unserer Rubrik Befehlsreferenz werfen, aber ich denke, dass die Frage so nicht gemeint ist .
Also starten wir ein neues Projekt mit einem Textfeld, einem Label und zweiCommandButtons. Dann brauchen wir nur noch folgenden Code:
Option Explicit Dim iAscCode As Integer Dim sChar As String ' Zeichen in ASCII-Code umwandeln Private Sub Command1_Click() iAscCode = Asc(Text1.Text) Label1.Caption = iAscCode End Sub ' ASCII-Code in Zeichen umwandeln Private Sub Command2_Click() sChar = Chr(Text1.Text) Label1.Caption = sChar End Sub
Natürlich ist das nur ein ganz einfaches Beispiel ohneFehlerbehandlungsroutine, d. h. wenn Sie z. B. mehr als einen Buchstabeneingeben wird nur der ASCII-Code für den ersten Buchstaben angezeigt, oder wennSie eine nicht existierende Code-Zahl eingeben, erhalten Sie einenLaufzeitfehler. Dieses Beispiel soll lediglich demonstrieren, wie Sie denASCII-Code eines Zeichens ermitteln bzw. wieder zurückwandeln können.