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. Diese Seite wurde bereits 69.701 mal aufgerufen. |
vb@rchiv CD Vol.6 Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung sevWizard für VB5/6 Professionelle Assistenten im Handumdrehen Erstellen Sie eigene Assistenten (Wizards) im Look & Feel von Windows 2000/XP - mit allem Komfort und zwar in Windeseile :-) |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |