Ms access 在IF子句中使用变量

我正在Access 2010中编程一些表单，想检查一些单选按钮是否被选中

我想使用一个直到循环，因为每行有38个问题需要检查

我用过这个，但它不起作用

Me.OptionQ(lNum).Value

这是我想要使用的完整的IF语句

Dim lNum AS Long

lNum = 1


Do Until lNum = 39


 If Me.OptionQ(lNum).Value = 1 Then
     MsgBox "Option 1 is selected"
 ElseIf Me.OptionQ(lNum).Value = 2 Then
     MsgBox "Option 2 is selected"
 ElseIf Me.OptionQ(lNum).Value = 3 Then
     MsgBox "Option 3 is selected"
 Else
     MsgBox "Please choose an answer for every question."
     Exit Do
 End If
lNum = lNum + 1

Loop

---

我搜索了很多，但似乎没有办法这样做。

我想你是说你有一套38个控件，名为OptionQ1到OptionQ38

如果这是正确的，您可以检查每个控件的值，并使用更简单的代码执行您想要的操作

lNum=1至38的

选择Case Me.Controls（“OptionQ”和lNum.Value
案例1至3
MsgBox“Option”和Me.Controls（“OptionQ”和lNum.Value&_
“已选定”
其他情况
MsgBox“请为每个问题选择一个答案。”
退出
结束选择
下一个

它怎么不起作用？我想我有点问题。OptionQ（lNum）。value它怎么不起作用？发生了什么？它会爆炸吗？编译错误：找不到方法或数据成员。我认为这是由带有按钮的标签名称引起的。表单上的名称是OptionQ1 OptionQ2 OptionQ3，依此类推，我希望下次有一个数值，你应该告诉我们你想做什么，问题是什么，而不是让我们去猜测。是的，这就是我想做的。