Len Function
рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдХреНрдпрд╛рд░реЗрдХреНрдЯрд░рд╣рд░реВрдХреЛ рдирдореНрдмрд░ рд╡рд╛ рдмрд╛рдЗрдЯрд╣рд░реВрдХреЛ рдирдореНрдмрд░ рдлрд░реНрдХрд╛рдЙрдБрдЫ рдЬрд╕рдХреЛ рдЪрд▓ рд╕рдЩреНрдЧреНрд░рд╣ рдЧрд░реНрдирд▓рд╛рдИ рдЖрд╡рд╢реНрдпрдХ рд╣реБрдиреНрдЫ ред
рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:
Len (рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд╛рда)
рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:
рд▓рд╛рдореЛ
рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:
рдкрд╛рда: рдХреБрдиреИ рд╕реНрдЯреНрд░рд┐рдЩ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рд╡рд╛ рдЕрд░реНрдХреЛ рдкреНрд░рдХрд╛рд░рдХреЛ рдЪрд▓ ред
рдЙрджрд╛рд╣рд░рдг:
Sub ExampleLen
Dim sText as String
sText = "Las Vegas"
MsgBox Len(sText) REMрд▓реЗ реп рдлрд░реНрдХрд╛рдЙрдБрдЫ
End Sub