Str Function
рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐рд▓рд╛рдИ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрджрдЫ ред
рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:
Str (рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐)
рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:
рд╕реНрдЯреНрд░рд┐рдЩ
рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:
рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐: рдХреБрдиреИ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ ред
Str рдкреНрд░рдХрд╛рд░реНрдпрд▓реЗ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЪрд▓ рд╡рд╛ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдЧрдгрдирд╛ рдЧрд░реЗрдХреЛ рдкрд░рд┐рдгрд╛рдо рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрджрдЫ ред рдЛрдгрд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдШрдЯрд╛рдЙ рдЪрд┐рдиреНрд╣рджреНрд╡рд╛рд░рд╛ рдЕрдЧрд╛рдбрд┐ рдмрдвреНрдЫрди ред рдзрдирд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдЦрд╛рд▓реАрдард╛рдЙрдБ(рдпреЛрдЧ рдЪрд┐рдиреНрд╣рдХреЛ рд╕рдЯреНрдЯрд╛рдорд╛)рджреНрд╡рд╛рд░рд╛ рдЕрдЧрд╛рдбрд┐ рдмрдвреНрдЫрдиреН ред
рдЙрджрд╛рд╣рд░рдг:
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