Visual Basic-Anwendungen in der Regel können Benutzer zur Eingabe von Daten über die Tastatur . Desinfektion und Umwandlung dieser Rohdaten in verwertbare Daten ist eine wesentliche Aufgabe für die Entwickler . Zum Beispiel ist es oft notwendig, filtern und entfernen nicht-alphabetischen Zeichen , Anwendungen von Sicherheitslücken zu schützen. Reinigung und Pflege von Daten Einheitlichkeit ist wichtig, wenn die Speicherung von Daten , die die Erstellung von doppelten Datensätzen verhindern. Visual Basic 6 bietet viele String-Handling- Funktionen , so dass es eine einfache Aufgabe , um Code, der für nicht-alphabetischen Zeichen überprüft schreiben. Anleitung
1

Öffnen Sie Visual Basic 6 aus dem "Start "-Symbol in der Windows- Task-Leiste befindet .
2

Wählen Sie " Standard.exe " und klicken Sie auf "Öffnen" um eine neue Visual Basic 6 -Anwendung zu starten .
3

Ziehen Sie das " Textbox ", um das Fenster mit der Aufschrift " Form1 ", die Schaffung eines Textfeld " Text1 ".
< br > 4

Ziehen Sie das " CommandButton " -Symbol, um das Fenster mit der Aufschrift " Form1 " eine Schaltfläche mit der Bezeichnung " Command1. "
5

Doppelklicken Sie auf die Schaltfläche " Command1 " , um den Code zu öffnen Fenster . Unterhalb der Zeile " Private Sub Command1_Click () " fügen Sie den Code :

dim scompare As String

dim icount As Integer

icount = 1 To Len ( Text1. Text )

scompare = Mid $ ( Text1.Text , icount , 1) german

Text1.Text = Mid $ ( Text1.Text , icount + 1 , Len _ ( Text1.Textt ) )

Wenn scompare Like ( " [AZ] " ) Or _

scompare Like ( " [az] " ) Or _

scompare Like ( "# ") Then

MsgBox (" Alpa Zeichen nur " )

Else

msgbox ( nicht-alphabetischen Zeichen gefunden ")

Exit Function End

Wenn

Weiter icount
6

Drücken Sie die Taste "F5" , um den Visual Basic-Anwendung ausführen . Geben Sie den Text in das Textfeld überprüfen . Klicken Sie auf den Button mit der Aufschrift " Command1 ", und eine Meldung wird Display überprüfen, ob der Text des Alphabets ist oder nicht.