GetSolarVersion Function

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

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

s = GetSolarVersion

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

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

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

Sub ExampleGetSolarVersion

Dim sSep As String

    sSep = GetSolarVersion

    MsgBox sSep,ремрек,"рд╕реМрд░реНрдп рдкреНрд░рд╡реАрдзреАрдХреЛ рд╕рдВрд╕реНрдХрд░рдг рдирдореНрдмрд░"

End Sub