Visual Basic 6 är ett grafiskt programmeringsspråk för Windows . Ett vanligt användningsområde för VB6 är att skapa ett gränssnitt datainmatning för en databas eller annat program . Ett sådant gränssnitt måste ta data matas in av användaren och konvertera det till ett format som den underliggande mjukvaran kan använda . En av de vanligaste exemplen på detta är att ta text som angetts av användaren i en textruta kontroll och konvertera det till ett numeriskt värde . Instruktioner
1
Kontrollera att textrutan innehåller ett antal :
p Om IsNumeric ( Text1.Text ) Sen
IsNumeric funktion avgör om en sträng innehåller ett numeriskt värde . Detta är viktigt eftersom du försöker konvertera en icke - numerisk sträng till ett heltal skulle orsaka ett fel
2
Konvertera textrutan text-egenskap till ett heltal : .
PIN = CDbl ( Text1 . Text ) katalog
CDbl funktionen omvandlar ett numeriskt värde till ett decimaltal
3
Ställ in variabeln på ett standardvärdet om egenskapen Text är inte numeriskt : .
Else
PIN = 0
End If
Du kan också varna användaren vid denna punkt som ett ogiltigt värde angavs .
Addera