Visual Basic-programmer vanligvis tillater brukerne å legge inn data ved hjelp av tastaturet . Desinfiserende og transformere denne rå informasjon til brukbare data er en viktig oppgave for utbygger . For eksempel er det ofte nødvendig å filtrere og fjerne ikke- alfabetiske tegn til å beskytte programmer fra sikkerhetsproblemer . Rensing data og opprettholde ensartethet er viktig når du skal lagre data , noe som vil hindre etableringen av like poster . Visual Basic 6 gir mange streng håndtering funksjoner , noe som gjør det til en grei oppgave å skrive kode som sjekker for ikke- alfabetiske tegn. Instruksjoner
en

Åpen Visual Basic 6 fra "Start "-ikonet , som ligger på oppgavelinjen i Windows .
2

Velg " Standard.exe " og klikk " Åpne" å starte et nytt Visual Basic 6 program.
3

Dra " Tekstboks' "-ikonet til vinduet merket " Form1 ," skape en tekstboks merket " Tekst1 . "

4

Dra " CommandButton "-ikonet til vinduet merket " Form1 ," skape en knapp merket " Command1 . "
5

Dobbeltklikk på knappen merket " Command1 " for å åpne koden vinduet. Under streken merket " Private Sub Command1_Click ( )" lim inn koden : en

dim scompare As String

dim iCount As Integer

For iCount = 1 To Len ( Text1. tekst)

scompare = Mid $ ( Text1.Text , iCount , 1 )

Text1.Text = Mid $ ( Text1.Text , iCount + 1 , Len _ ( Text1.Textt ) )
p Hvis scompare Som ("[ AZ] " ) Eller _

scompare Som ( " [a ] " ) Eller _

scompare Som ( " #" ) Then

MsgBox ( " Alpa tegn only" )

Else

MsgBox (Non - Alfabetisk tegn funnet " )

Exit Function

End Hvis

Neste iCount
6

Trykk " F5" tasten for å utføre den Visual Basic-programmet . Skriv inn teksten du ønsker å sjekke inn tekstboksen. Klikk på knappen merket " Command1 ", og en melding vil bli visning verifisere hvis teksten er alfabetisk eller ikke.