Ez az oktatóanyag bemutatja, hogyan kell használni a Len VBA függvényt egy karakterlánc hosszának meghatározásához.
Len függvény
A VBA Len függvény egy megadott karakterlánc hosszát adja vissza.
VBA Len gróf karakterek
A VBA Len függvény megszámolja a karaktereket egy karakterláncban.
| 1234567891011121314151617 | Len Lengyel Példa_1 ()MsgBox Len ("12345") 'Az eredmény: 5MsgBox Len ("12") 'Az eredmény: 2MsgBox Len ("1") 'Az eredmény: 1MsgBox Len ("") 'Az eredmény: 1- Van benne egy szóköz.MsgBox Len ("") 'Az eredmény: 0MsgBox Len ("AB Cd") eredménye: 5End Sub |
VBA Len húrok vagy változatok
A VBA Len Function képes megszámolni a karakterláncokat karakterláncként vagy változatként deklarált változókban. Valójában a VBA Len egy változatot karakterláncként kezel. Ha a VBA Len egész, hosszú, egyszeri vagy dupla számot használ, akkor a VBA Len számolni fogja a változó tárolásához szükséges bájtok számát.
| 123456789101112131415161718192021222324252627282930313233 | Len LenxPélda_2 ()Dim VarEx1 karakterlánckéntVarEx1 = 12345Az MsgBox Len (VarEx1) eredménye: 5„Len számolja a változó karaktereinek számátDim VarEx2 mint változatVarEx2 = 12345Az MsgBox Len (VarEx2) eredménye: 5„Len számolja a változó karaktereinek számátDim VarEx3 mint egészVarEx3 = 12345Az MsgBox Len (VarEx3) eredménye: 2'Len számolja a változó tárolásához használt bájtok számátDim VarEx4 As LongVarEx4 = 12345MsgBox Len (VarEx4) 'Az eredmény: 2'Len számolja a változó tárolásához használt bájtok számátDim VarEx5 SingleVarEx5 = 12345Az MsgBox Len (VarEx5) eredménye: 2'Len számolja a változó tárolásához használt bájtok számátDim VarEx6 Mint kettősVarEx6 = 12345Az MsgBox Len (VarEx6) eredménye: 2'Len számolja a változó tárolásához használt bájtok számátEnd Sub |
VBA Len gróf Egy karakter előfordulásai
A VBA Len függvény használható a VBA Replace funkcióval, hogy megszámolja, hányszor található meg egy karakter egy karakterláncban.
A VBA Replace Function funkció helyettesíthet egy sztringet egy másik karakterlánccal:
| 1 | MsgBox Replace ("XBCX", "X", "7") 'Az eredmény: "7BC7" |
A Replace segítségével eltávolíthatjuk azokat a karaktereket, amelyekkel „” szeretnénk számolni, majd megtaláljuk a hosszúságbeli különbséget a csere előtt és után.
| 1234567891011121314 | Len Lengyelpélda_3 ()Dim StrEx mint karakterlánc 'Határozzon meg egy karakterlánc -változótStrEx = "Jack, John, Jim, Jordan"MsgBox Len (StrEx) - Len (Cserélje (StrEx, ",", ""))) 'Az eredmény: 3- A fenti kód lebontásaAz MsgBox Len (StrEx) eredménye: 20MsgBox Replace (StrEx, ",", "") 'Az eredmény: "JackJohnJimJordan"MsgBox Len (Replace (StrEx, ",", "")) 'Az eredmény: 17MsgBox Len (StrEx) - Len (Replace (StrEx, ",", ""))) 'Az eredmény: 20-17 = 3End Sub |
VBA Len gróf Alszúrások előfordulása
A VBA Len függvény használható a VBA Replace funkcióval, hogy megszámolja, hányszor található egy karakterlánc egy sztringben.
A VBA Replace Function funkció helyettesíthet egy sztringet egy másik karakterlánccal:
| 1 | MsgBox Replace ("XB cX", "X", "7") 'Az eredmény: "7B c7" |
A Replace segítségével eltávolíthatjuk azokat az alláncokat, amelyekkel a „” jelzéssel szeretnénk számolni, majd megtaláljuk a hosszúságbeli különbséget a csere előtt és után. Végül fel kell osztanunk a különbséget a kicserélt allánc hosszával.
| 12345678910111213141516171819 | Len -példa al4 ()Dim StrEx mint karakterlánc 'Határozzon meg egy karakterlánc -változótStrEx = "Jack, John, Jim, Jordan"Dim SubStr mint karakterlánc 'Határozzon meg egy sztring változótSubStr = ","'Meg fogjuk találni, hogy a SubStr hányszor található a StrEx -en belülMsgBox (Len (StrEx) - Len (Csere (StrEx, SubStr, ""))) / Len (SubStr) 'Az eredmény: 3- A fenti kód lebontásaAz MsgBox Len (StrEx) eredménye: 23MsgBox Replace (StrEx, SubStr, "") 'Az eredmény: "JackJohnJimJordan"MsgBox Len (Csere (StrEx, SubStr, "")) 'Az eredmény: 17MsgBox Len (StrEx) - Len (Csere (StrEx, SubStr, "")) 'Az eredmény: 23-17 = 6MsgBox (Len (StrEx) - Len (Csere (StrEx, SubStr, ""))) / Len (SubStr)'Az eredmény: (23-17)/2 = 3End Sub |
