Rubrik: Variablen/Strings | VB-Versionen: VB.NET | 16.08.07 |
Ascii-Code eines Strings ermitteln In VB.NET ganz einfach einen String in ASCII-Codes zerlegen | ||
Autor: Rene Beukert | Bewertung: | Views: 19.753 |
www.renebeukert.de | System: WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Nachfolgender Code zeigt, wie man einen String in seine Ascii-Codes zerlegt.
' erst mal einen String definieren z.B. Dim sString As String = My.User.Name.ToString ' dann nachsehen wie lang er ist Dim nLen As Integer = sString.Length ' noch was für die Ausgabe bestimmen inkl. einer Zuordnung damit VS nicht meckert Dim msg As String = "" ' die Länge des Strings in eine Schleife legen und For a As Integer = 1 To nLen ' (ein Array beginnt bei null deswegen -1 damit es korrekt läuft ) ' und mit Asc und .Chars die Schleife durchlaufen und in msg den ' ASCII-Code der einzelnen Zeichen des Strings speichern msg = msg & Asc(sString.Chars(a - 1)) & vbCrLf Next a MsgBox("Der ASCII-Code des Strings " & My.User.Name.ToString & _ " lautet:" & vbCrLf & msg)