Visual Basic 6 ist eine ereignisgesteuerte Programmiersprache für Windows , die ursprünglich auf BASIC basiert. Die Sprache enthält viele Funktionen und Anweisungen für String-Manipulation . Ersetzen eines Zeichens in einem String mit einem anderen ist ein wichtiger Schritt in vielen String-Manipulation Aufgaben, einschließlich der Kryptographie , Desinfektion Eingang und Bearbeiten von Text , wenn der Benutzer es Typen . In Visual Basic 6 können Sie ein Zeichen durch ein anderes zu ersetzen mit der Mid-Anweisung . Anleitung
1

Kopieren Sie die Zeichenfolge , die Sie in einer Variablen ändern. Dies ist notwendig, da die Mid-Anweisung arbeitet mit Variablen , aber nicht mit den Eigenschaften von Klassen oder Kontrollen . (Wenn die Zeichenfolge, die Sie ändern möchten ist bereits in einer Variablen , können Sie diesen Schritt überspringen. )

Dim StringToModify als String

StringToModify = Text1.Text
2 < p> Bestimmen Sie , welches Zeichen Sie ersetzen möchten . Wenn das gewünschte Zeichen zu ersetzen, wird in der gleichen Position jedes Mal sein , geben Sie die Position als Nummer. ( Der Charakter Nummerierung beginnt bei 1 ). Andernfalls bestimmen den Charakter der Position und speichern sie in einer Variablen. In diesem Beispiel wird das letzte Zeichen in der Zeichenfolge :

Dim CharacterPosition als Integer

CharacterPosition = Len ( StringToModify )
3

den Charakter Ersetzen mit Mid . Die Mid-Anweisung hat drei Argumente : der String geändert werden , die Startposition des Abschnitts ersetzt werden , und die Länge des Abschnitts ersetzt werden. ( . Da Sie ein einzelnes Zeichen ersetzen möchten, die Länge wird immer 1 sein ) Dieses Beispiel ersetzt den Charakter mit einem Kapital D:

Mid ( StringToModify , CharacterPosition , 1) = "D"

4

Kopieren zurück in das Eigentum , wenn Sie eine Immobilie im ersten Schritt kopiert :

Text1.Text = StringToModify