Тема: как определить програмно какая версия Автокада рус. или анг.

Как определить програмно какая версия Автокада русская или английская? программа пишется на VB, нужно для того чтобы выбрать тип линии, в зависимости от языка, они по-разному называются.
Заранее, огромное спасибо!

Re: как определить програмно какая версия Автокада рус. или анг.

Application.LocaleID

Re: как определить програмно какая версия Автокада рус. или анг.

Александр не совсем понятно как эту функцию использовать
попробовал такой вариант, но этот код не работает
  Set adr = ACD.Application.LocaleID
  MsgBox adr

Re: как определить програмно какая версия Автокада рус. или анг.

Что значит не работает? Пример из справки AutoCAD:

Sub Example_LocaleID()
    ' This code retrieves the Locale ID and displays it in a message box
    MsgBox "The locale ID is " & ThisDrawing.Application.LocaleId, , "LocaleID Example"
    
End Sub

Для английской версии возвращает 1033, для русской 1049

Re: как определить програмно какая версия Автокада рус. или анг.

Спасибо, теперь работает

MsgBox ACD.Application.LocaleID