Len Function

рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдХреНрдпрд╛рд░реЗрдХреНрдЯрд░рд╣рд░реВрдХреЛ рдирдореНрдмрд░ рд╡рд╛ рдмрд╛рдЗрдЯрд╣рд░реВрдХреЛ рдирдореНрдмрд░ рдлрд░реНрдХрд╛рдЙрдБрдЫ рдЬрд╕рдХреЛ рдЪрд▓ рд╕рдЩреНрдЧреНрд░рд╣ рдЧрд░реНрдирд▓рд╛рдИ рдЖрд╡рд╢реНрдпрдХ рд╣реБрдиреНрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:


Len (рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд╛рда)

рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:

рд▓рд╛рдореЛ

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдкрд╛рда: рдХреБрдиреИ рд╕реНрдЯреНрд░рд┐рдЩ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рд╡рд╛ рдЕрд░реНрдХреЛ рдкреНрд░рдХрд╛рд░рдХреЛ рдЪрд▓ ред

рддреНрд░реБрдЯрд┐ рд╕рдЩреНрдХреЗрддрд╣рд░реВ

5 рдЕрд╡реИрдз рдХрд╛рд░реНрдп-рд╡рд┐рдзрд┐ рдХрд▓

рдЙрджрд╛рд╣рд░рдг:


Sub ExampleLen
Dim sText as String
    sText = "Las Vegas"
    MsgBox Len(sText) REMрд▓реЗ реп рдлрд░реНрдХрд╛рдЙрдБрдЫ
End Sub