Чтобы выбрать опцию кнопки из кадров в VB

Question

Я использовал 4 кнопки выбора в каждом кадре на from.Точно так же я взял 10 кадров в форме ... теперь я просто хочу сохранить значение этих опционных кнопок из каждого фрейма в базе данных MSaccess ... Так что результатом в базе данных будет 10 значений опционных кнопок для каждого фрейма ...Пожалуйста, помогите мне

Answer 1

Если ваш вопрос на самом деле «Как я могу получить выбранную опцию кнопки в группе», то вам нужно проверить каждый из них по очереди. Самое простое это:

'Get the selected option from frame 1
If Frame1Option1.Value Then
  Value1 = 1
ElseIf Frame1Option2.Value Then
  Value1 = 2
ElseIf Frame1Option3.Value Then
  Value1 = 3
ElseIf Frame1Option4.Value Then
  Value1 = 4
End If

'Get the selected option from frame 2
If Frame2Option1.Value Then
  Value2 = 1
ElseIf Frame2Option2.Value Then
  Value2 = 2
ElseIf Frame2Option3.Value Then
  Value2 = 3
ElseIf Frame2Option4.Value Then
  Value2 = 4
End If

Если вы сделаете их массивом управления в каждом кадре, то вы можете упростить код до чего-то вроде:

Dim Index As Long

'Get the selected option from frame 1
For Index = Frame1Options.LBound To Frame1Options.UBound
  If Frame1Options(Index).Value Then Value1 = Index
Next

Их установка становится такой же простой:

Frame1Options(Value1).Value = True