Вопрос : Radio кнопка центризуя в отчете о доступа

Ответ : Radio кнопка центризуя в отчете о доступа

Я соглашаюсь, radio кнопки уродск после того как я печатан. Алтернативы:

 • Using символы в свойстве формы yes/no выражения,
 • using изображения (более сложные),
 • рисующ круги using метод Me.Circle,
 • рефрен от кнопок печатание radio.

Для первого разрешения, попытка для того чтобы найти 2 символа в имеющихся купелях которые smogли пройти для пустого круга и заполненного круга. Если вы находите что-то, то вы любите, мы можете показать вам как использовать их в коробке текста соединенной к выражению основанному на вашем поле.

Я могу понять идею напечатать что-то смотрит и чувствует как на экране форма, но она посмотрела бы очень более лучше с более традиционным планом.

Например, скажите по буквам вне «да» или «нет», печать только вариант который выбран, etc., котор вы можете также установить прямоугольник вокруг выбранного деталя, смелейшие оно и серый цвет вне другое, или польза красит в зависимости от конечного пункта маршрута рапорта.
__________________

Кодий под инструментами вторая идея: using Me.Circle. Это будет всем модулем рапорта: функция OldRadio нарисует круги для того чтобы передразнить кнопки варианта. Для этого, котор нужно работать, сделайте кнопки варианта незримой; функция будет использовать метрическую систему мер управления для того чтобы нарисовать круг выбранного размера (сделайте коробки управления более большим к кругам притяжки более большим). В виду того что кнопки варианта незримы, их ярлыки будут также. Вам нужно разделить ярлыки от управления (отрезать И наклеить на работах раздела славно).

Позвонен от всех разделов содержа кнопки варианта, пример для раздела детали только.

Удача!
(°v°)

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35:

Вариант точный Приватная функция OldRadio (psec как [_SectionInReport]) Тусклое ctl как управление Тусклое lngCX как длиной Тусклое lngCY как длиной Тусклое lngRad как длиной Для каждого ctl в psec. Управление Если ctl.ControlType = acOptionButton после этого lngCX = ctl. Левая сторона + ctl. Ширина/2 lngCY = ctl. Верхняя часть + ctl. Высота/2 lngRad = ctl. Ширина/2 'круг притяжки Me.FillStyle = 1 'прозрачное Me.Circle (lngCX, lngCY), lngRad Me.FillStyle = 0 'опаковое Если ctl. Значение = True после этого Me.FillColor = vbBlack Me.Circle (lngCX, lngCY), lngRad/2 Ctl ElseIf. Значение = ложно после этого 'ничего Еще 'Null Me.FillColor = RGB (153, 153, 153) Me.Circle (lngCX, lngCY), lngRad * 3/4, vbWhite Закончитесь если Закончитесь если Следующее ctl Функция конца Приватное Sub Detail_Format (Cancel как интежер, FormatCount как интежер) Деталь OldRadio Подводная лодка конца