LibreOffice 7.5 Help
рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд░рд┐рдмреЗрд╢ рдЪрд▓рдХреЛ рдорд╛рди рдлрд░реНрдХрд╛рдЙрдБрдЫ ред рдкрд░рд┐рдмреЗрд╢ рдЪрд▓ рддрдкрд╛рдИрдБрд╕рдБрдЧ рднрдПрдХреЛ рд╕рдЮреНрдЪрд╛рд▓рди рдкреНрд░рдгрд╛рд▓реАрдХреЛ рдкреНрд░рдХрд╛рд░рдорд╛ рдирд┐рд░реНрднрд░ рдЧрд░реНрджрдЫ ред
Environ (рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд░рд┐рдмреЗрд╢)
String
рдкрд░рд┐рдмреЗрд╢: рдкрд░рд┐рдмреЗрд╢ рдЪрд▓рдХрд╛ рд▓рд╛рдЧрд┐ рддрдкрд╛рдИрдБ рдорд╛рди рдлрд░реНрдХрд╛рдЙрди рдЪрд╛рд╣рдиреБрд╣реБрдиреНрдЫ ред
Sub ExampleEnviron
Dim sTemp As String
sTemp=Environ ("TEMP")
If sTemp = "" Then sTemp=Environ("TMP")
MsgBox "'" & sTemp & "'" ,ремрек,"рдЕрд▓реНрдкрдХрд╛рд▓рд┐рди рдлрд╛рдЗрд▓рд╣рд░реВрдХреЛ рдбрд╛рдЗрд░реЗрдХреНрдЯрд░реА:"
End Sub