Val Function
рд╕реНрдЯреНрд░рд┐рдЩрд▓рд╛рдИ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐рдорд╛ рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрджрдЫ ред
рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:
Val(рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд╛рда)
рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:
рдбрдмрд▓
рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:
рдкрд╛рда: рд╕реНрдЯреНрд░рд┐рдЩ рдЬрд╕рд▓реЗ рдирдореНрдмрд░рдХреЛ рдкреНрд░рддрд┐рдиреАрдзрд┐рддреНрд╡ рдЧрд░реНрджрдЫ ред
ValрдкреНрд░рдХрд╛рд░реНрдп рдкреНрд░рдпреЛрдЧ рдЧрд░реНрджрд╛,рддрдкрд╛рдИрдБ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рд░реВрдкрд╛рдиреНрддрд░рдг рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ рдЬрд╕рд▓реЗ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рднрд┐рддреНрд░ рдирдореНрдмрд░рд╣рд░реВрдХреЛ рдкреНрд░рддрд┐рдиреАрдзрд┐рддреНрд╡ рдЧрд░реНрджрдЫ ред рдпреЛ Str рдкреНрд░рдХрд╛рд░реНрдпрдХреЛ рдЙрд▓реНрдЯреЛ рд░реВрдк рд╣реЛ ред рдпрджрд┐ рдпрд╕рд▓реЗ рд╕реНрдЯреНрд░рд┐рдЩрд╣рд░реВрдХреЛ рдЦрдгреНрдбрдорд╛ рдорд╛рддреНрд░ рдирдореНрдмрд░рд╣рд░реВ рд╕рдореНрдорд┐рд▓рд┐рдд рдЧрд░рдХреЛ рдЦрдгреНрдбрдорд╛ рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рдкрд╣рд┐рд▓реЛ рдЙрдкрдпреБрдХреНрдд рдХреНрдпрд╛рд░реЗрдХреНрдЯрд░рд╣рд░реВ рдорд╛рддреНрд░ рд░реВрдкрд╛рдиреНрддрд░ рд╣реБрдиреНрдЫ ред рдпрджрд┐ рд╕реНрдЯреНрд░рд┐рдЩрд▓реЗ рдХреБрдиреИ рдирдореНрдмрд░рд╣рд░реВ рд╕рдореНрдорд┐рд▓рд┐рдд рдирдЧрд░рд╛рдПрдХреЛ рдЦрдгреНрдбрдорд╛ValрдкреНрд░рдХрд╛рд░реНрдпрд▓реЗ реж рдорд╛рди рдлрд░реНрдХрд╛рдЙрдБрдЫ ред
рдЙрджрд╛рд╣рд░рдг:
Sub ExampleVal
MsgBox Val("123.123")
MsgBox Val("A123.123")
End Sub