GetSolarVersion Function

рд╣рд╛рд▓рдХреЛ LibreOffice рд╕рдВрд╕реНрдХрд░рдгрдХреЛ рдЖрдиреНрддрд░рд┐рдХ рдирдореНрдмрд░ рдлрд░реНрдХрд╛рдЙрдБрдЫ ред

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


s = GetSolarVersion

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

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

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


Sub ExampleGetSolarVersion
Dim sSep As String
    sSep = GetSolarVersion
    MsgBox sSep,ремрек,"рд╕реМрд░реНрдп рдкреНрд░рд╡реАрдзреАрдХреЛ рд╕рдВрд╕реНрдХрд░рдг рдирдореНрдмрд░"
End Sub