从单选button组捕获值

我正在尝试捕获单选button组中存储的选定值。 例如，我有两个单选button（没有特定的命名约定）分组在一起，组名称为“1”。 我想知道是否有办法获得哪个选项被选中，而不必为实际的单选button本身专门执行IF elseif语句。

理想情况下，我希望代码能够说这个选项组，检索文本文件的值，并移动到下一个单选button组。

我正在创build一个调查结果需要被捕获到一个.txt文件。

谢谢。

Answer 1

我想你将不得不testing每个单选button控件的值。 该组只确保在该组中select一个（或零个）无线电选项。 请记住，有可能没有select任何选项。

Answer 2

我没有具体尝试组，但这里是如何使用框架（就我所了解的框架类似于具有分离选项的组）而言的。

• 这个例子的用户表单的名字是' UF '
• 包含多个选项的第一帧的名称是“ Frame1 ”

• 包含多个选项的第二帧的名称是“ Frame2 ”

  'get the option selected within Frame1 Dim opt as Control For Each opt in UF.Frame1.Controls If TypeName(opt) = "OptionButton" And opt = True Then x = MsgBox(opt.Caption) 'Outputs Caption of Selected Option in Frame1 End If Next '---------------------------------------- '---------------------------------------- 'and this would get the option selected within Frame2 Dim opt as Control For Each opt in UF.Frame2.Controls If TypeName(opt) = "OptionButton" And opt = True Then x = MsgBox(opt.Caption) 'Outputs Caption of Selected Option in Frame2 End If Next