Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvorte štyri premenné , ktoré budete používať pre kontrolu znak tabulátora zadaním nasledujúci kód jazyka VBA :
Dim tabString As String Dim
char ako string
Dim dĺžku As Integer
Dim xCntr As Integer
2
Pridať reťazec s jazýčkom na " tabString " premenné pridaním nasledujúceho kódu :
tabString = " dobrý " a vbTab a " ráno "
3
Získajte dĺžku reťazca zadaním nasledujúceho :
length = ľan ( tabString )
4
slučku cez každého znaku v reťazci a skontrolujte , či znak tabulátora pomocou " Chr ( 9 ) " funkciu pridaním nasledujúceho kódu VBA :
char = ľavý ( tabString , 1 )
xCntr = 0. To dĺžka - 1
tabString = Right ( tabString , Ľan ( tabString ) - 1 )
char = Chr ( 9 ) Potom
MsgBox " Indexové číslo " & xCntr & " je karta v reťazci . "
End If
char = ľavý ( tabString , 1 )
Ďalšie xCntr