Hvordan konvertere en tekstboks eiendom til en desimal

Visual Basic 6 er et grafisk programmeringsspråk for Windows. En vanlig bruk for VB6 er å lage en dataregistrering grensesnitt for en database eller et annet program. Et slikt grensesnitt må ta data oppgitt av brukeren og konvertere den til et format som den underliggende programvaren kan bruke. En av de vanligste eksemplene på dette er å ta tekst skrevet inn av brukeren inn i en tekstboks kontroll og konvertere den til en numerisk verdi.

Bruksanvisning

1 Sjekk at TextBox inneholder en rekke:

Hvis IsNumeric (Text1.Text) Deretter

Den IsNumeric funksjonen avgjør om en streng inneholder en numerisk verdi. Dette er viktig fordi du prøver å konvertere en ikke-numerisk streng til et heltall ville føre til en feil.

2 Konverter TextBox Text eiendom til et heltall:

PIN = CDbl (Text1.Text)

Den CDbl funksjonen konverterer en numerisk verdi til et desimaltall.

3 Sett variabelen til en standardverdi dersom Tekst eiendommen ikke er numerisk:

Ellers

PIN = 0

Slutt om

Du kan også varsle brukeren på dette punktet at en ugyldig verdi ble angitt.

Hint

• Den variable der det konverterte nummeret er lagret må være enten en dobbel eller en variant. For å lagre et nummer i en Integer eller Long variabel, bruk "Cint" eller "CLng" -funksjon.