Как убедиться, что было выбрано OptionButton.Value

Question

В настоящее время я делаю приложение Excel VB. Тем не менее, я застрял на данный момент. Я пытаюсь сделать выбор между двумя OptionButton обязательными.

Я попробовал код

If Me.PWebOption.Value = False & Me.BWebOption = False Then
        MsgBox "Please choose a type of website"
        Exit Sub
End If

Но это не дает мне требуемых результатов. Я пытался поместить их в скобки и все, но все еще застрял. Я уверен, что это тривиальный ответ, но я только начинаю понимать VB, поэтому, пожалуйста, прости меня.

Большое спасибо заранее.

Answer 1

Я попробовал ваш код, и он работает, если вы измените & на А . Я создал 2 кнопки Option, назвал их и без проблем запустил код с «И».

Если это все еще не работает, то я думаю, что:

• одна или обе кнопки OptionButton не ложны

или:

• вы получаете доступ к неправильным кнопкам Option.

Попробуйте

Debug.Print Me.PWebOption.Value
Debug.Print Me.BWebOption.Value
Debug.Print Me.PWebOption 'just for fun'
Debug.Print Me.BWebOption 

Все должно возвращать false. Также попробуйте поставить Option Explicit в начале вашего кода, чтобы убедиться, что вы получаете доступ только к тем объектам, которые действительно существуют.

Примечание: В VBA & используется только для объединения, а: И, Или и Не являются логическими операторами.

Answer 2

Я не уверен, что это ошибка копирования / вставки или нет, но в первой части вы вызываете .Value, а во второй - просто используете саму опцию. Если ваш код будет таким:

If Me.PWebOption.Value = False & Me.BWebOption.Value = False Then 
        MsgBox "Please choose a type of website" 
        Exit Sub 
End If

(Обратите внимание, что он использует .Value в обоих вариантах.)