Ako Skontrolujte , či sú čísla v jazyku VBA

Je bežné načítanie zmiešané dáta od užívateľa , ako sú písmená a čísla v premennej . Programátor by potom potrebné extrahovať čísla z tejto premennej a používať ich podľa potreby . V aplikácii Visual Basic for Applications ( VBA ) , môžete použiť funkciu " IsNumberic " , skontrolujte , či sa výraz možno vyhodnotiť ako číslo . Ak výraz obsahuje iba čísla , funkcia vráti hodnotu " true " . Ale ak obsahuje písmená a čísla , bude výraz vráti " false " . Pokyny dovolená 1

Vytvoriť nový čiastkové postup pre kontrolu čísla v reťazci zadaním nasledujúci kód :

Private Sub checkForNumber ( )
2

deklarovať dve premenné , jeden držať reťazec s číslami a písmenami a druhý pre jednotlivé znaky , ako v nasledujúcom príklade : klipart

Dim strVar As String Dim

oneChar As String

strVar = " 12 SDF 3456 "
3

Pridajte nasledujúci kód prechádzať každý znak v reťazci . Pozrite sa na čísla a ich zobrazenie pomocou okna Immediate :

robiť , keď strVar < > " "

oneChar = ľavý ( strVar , 1 )

strVar = Right ( strVar , Ľan ( strVar ) - 1 )

Ak IsNumeric ( oneChar ) Potom

Debug.Print ( oneChar )

End If

Loop
Stránka 4

Dokončite postup tým , že pridá " End Sub " a stlačte " Ctrl " a " G " sa zobrazí v okamžitom okne . Stlačením tlačidla " F5 " spustiť kód .

• Predchádzajúca strana: Ako povoliť a zakázanie textové pole s rádiom tlačidlo Visual Basic 
• Ďalšia strana: Ako vytvoriť príkaz , ktorý Vymaže text v jazyku Visual Basic 6