Поделиться через


Свойство ApplicationSettings.FreeformDrawingPrecision (Visio)

Определяет допустимый предел ошибки, когда инструмент Freeform рисует прямую линию, прежде чем переключится на рисование сплайна. Для чтения и записи.

Синтаксис

expression. FreeformDrawingPrecision

Выражение Переменная, представляющая объект ApplicationSettings .

Возвращаемое значение

Длинное целое

Замечания

Задание свойства FreeformDrawingPrecision эквивалентно настройке параметра Точность на вкладке Дополнительно в диалоговом окне Параметры Visio (перейдите на вкладку Файл и нажмите кнопку Параметры).

Возможные значения для свойства FreeformDrawingPrecision варьируются от 0 (tight) до 10 (Loose). Значение по умолчанию равно 5.

Пример

В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать свойство FreeformDrawingPrecision для печати текущего параметра точности рисования свободной формы в окне Интерпретация. Здесь также показано, как получить объект ApplicationSettings из объекта Visio Application .

Public Sub FreeformDrawingPrecision_Example() 
 
    Dim vsoApplicationSettings As Visio.ApplicationSettings 
    Dim lngPrecisionSetting As Long 
 
    Set vsoApplicationSettings = Visio.Application.Settings 
    lngPrecisionSetting = vsoApplicationSettings.FreeformDrawingPrecision 
 
    Debug.Print lngPrecisionSetting 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.