Du kan forbedre ytelsen til Visual Basic-programmet ved ikke å måtte sjekke hver tegnet som er angitt av brukeren. I VB , kan du bruke " IsNumeric " funksjonen for å fastslå om dataene oppga er numerisk . Denne funksjonen returnerer en boolsk verdi som angir om et uttrykk kan evalueres som et tall. Du kan bruke en streng variabel for å fange opp tekst som angis av brukeren, og bruke " IsNumeric "-funksjonen til å sjekke variabelen. Instruksjoner
en

Launch Microsoft Visual Basic Express og klikk " Nytt prosjekt " på ruten til venstre på skjermen . Klikk på " Visual Basic " nedenfor " Installerte maler , " klikk "Windows Forms Application " og klikk " OK " for å starte et nytt prosjekt .
2

Dobbeltklikk på " TextBox " kontroll på " Toolbox »-panelet for å legge en til skjemaet. Legge til en " knapp " ved hjelp av samme teknikk
3

Dobbeltklikk på knappen for å lage en knapp klikkhendelsen , og legg til følgende kode for å lage to variabler : .
< P > Dim numericCheck Som Boolean

Dim inputTxt As String
4

Skriv inn følgende kode for å få verdien i tekstboksen og sjekk om det er numerisk ved hjelp av " IsNumeric "-funksjon:

inputTxt = Me.TextBox1.Text

numericCheck = IsNumeric ( inputTxt )
5

Legg til følgende kode ved hjelp av boolsk variabel og la brukeren vite om verdien ble numeriske : en p Hvis numericCheck Deretter

MsgBox ( " . Du skrev en numerisk verdi " )

Else

MsgBox ( "Du har ikke angi et numerisk verdi . ")

End If
6

Trykk" F5 "for å kjøre koden og klikk" Button1 . "