Str Function

рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐рд▓рд╛рдИ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрджрдЫ ред

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


Str (рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐)

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

рд╕реНрдЯреНрд░рд┐рдЩ

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

рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐: рдХреБрдиреИ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ ред

Str рдкреНрд░рдХрд╛рд░реНрдпрд▓реЗ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЪрд▓ рд╡рд╛ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдЧрдгрдирд╛ рдЧрд░реЗрдХреЛ рдкрд░рд┐рдгрд╛рдо рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрджрдЫ ред рдЛрдгрд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдШрдЯрд╛рдЙ рдЪрд┐рдиреНрд╣рджреНрд╡рд╛рд░рд╛ рдЕрдЧрд╛рдбрд┐ рдмрдвреНрдЫрди ред рдзрдирд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдЦрд╛рд▓реАрдард╛рдЙрдБ(рдпреЛрдЧ рдЪрд┐рдиреНрд╣рдХреЛ рд╕рдЯреНрдЯрд╛рдорд╛)рджреНрд╡рд╛рд░рд╛ рдЕрдЧрд╛рдбрд┐ рдмрдвреНрдЫрдиреН ред

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

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

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


Sub ExampleStr
Dim iVar As Single
Dim sVar As String
    iVar = 123.123
    sVar = LTrim(Str(iVar))
    MsgBox sVar & chr(13) & Str(iVar)
End Sub

Please support us!