Question

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

理想情况下，我希望代码可以说看看这个选项组，检索文本文件的值并移动到下一个单选按钮组。

我正在创建一个调查，其结果需要捕获到.txt文件中。

感谢。

Answer 1

我认为您将不得不测试每个单选按钮控件项的值。该组仅确保在该组中选择一个（或零）无线电选项。请记住，可能没有选择任何选项。

Answer 2

我还没有特别尝试使用群组，但是在这里，你可以在用户表单上使用框架（据我所知，框架与具有隔离选项的组的工作方式类似）。

此示例的用户表单名称为＆＃39; UF ＆＃39;
包含多个选项的第一个框架的名称是＆＃39; 第1帧＆＃39;

包含多个选项的第二个框架的名称是＆＃39; 第2帧＆＃39;

'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

从单选按钮组捕获值

2 个答案: