Het is gebruikelijk om gemengde gegevens van de gebruiker , zoals letters en cijfers in een variabele halen . Een programmeur zou dan moeten de nummers uit die variabele en gebruiken als nodig . In Visual Basic for Applications ( VBA ) , kunt u de functie " IsNumberic " gebruiken om te controleren of een uitdrukking als een nummer kan worden geëvalueerd . Als de expressie alleen getallen bevat , zal de functie return " waar is. " Maar als het letters en cijfers bevat , zal de uitdrukking " valse ". Terug Instructies
1 Maak een nieuwe sub- procedure om te controleren of een getal in een string door de volgende code : Private Sub checkForNumber
( ) kopen van 2 Verklaar twee variabelen , een om de string te houden met cijfers en letters en de andere voor enkele personages , zoals in het volgende : Dim strVar
als Koord Dim oneChar
als Koord
strVar = " 12 sdf 3456 "
3 Voeg de volgende code aan lijn door elk karakter in de string . Controleer voor nummers en deze weergeven door het venster Direct :
Doe terwijl strVar < > " " oneChar
= Links ( strVar , 1 ) strVar
= Right ( strVar , Len ( strVar ) - 1 ) op Twitter Als IsNumeric ( oneChar ) dan Debug.Print
( oneChar ) End
Als Loop
< br > Goedkope 4 Voltooi de procedure door toevoeging van " End Sub " en druk op " Ctrl " en " G " om de onmiddellijke venster weer te geven . Druk op " F5 " om de code uit te voeren .
|
