2015-11-09 20 views
0

У меня есть 4 кнопки опций в группе опций и один из них выбран, то кнопка ОК нажата, но я получил ошибку вот мой код:Опции в группе опций выбрана

Private Sub btnOk_Click() 

If opt1 = True Then 

MsgBox "Success" 

End if 

End Sub 
+0

какая строка вы ошибаетесь и что говорит об ошибке? вам, возможно, придется ссылаться на свою кнопку выбора как 'yes/no', противоположную' true/false'. Кроме того, это может быть 'me.opt1', что вам нужно использовать – LiamH

+0

. Вам почти никогда не нужно читать кнопки параметров самостоятельно. Каждая кнопка имеет «OptionValue», а группе параметров присваивается значение выбранного параметра. Это значение, с которым вы обычно работаете. – Andre

+0

Кроме того, в какой программе вы работаете? Excel/Access/Word/Outlook - удалите ненужные теги. – Andre

ответ

0

Положите дополнительные кнопки в вариант группы, а затем написать свой код так:

Select Case Me.fTimePeriod 

    Case Is = 1: sTime = "Option 1 Selected" 
    Case Is = 2: sTime = "Option 2 Selected" 
    Case Is = Null: sTime = "Nothing Selected" 

End Select 

Msgbox sTime 

fTimePeriod это название группы опций. Случай 1 - это первый вариант, второй - второй. Добавьте еще примеры case для получения дополнительных параметров.

Смежные вопросы