VBA选项button如何链接到模块？

您好我有一个用户表单，允许您从信息中select，并以特定的格式作为string粘贴。 我有一个单独的模块创build这个string如下：

Sub Skeleton_Query1() UserForm2.Show strQuery = "SEL " & Chr(10) & strSelectedColumns & Chr(10) & "FROM Database.Table1 A" _ & Chr(13) & "Left Join Database.Table2 B" & Chr(10) _ & "On A = B " & Chr(13) End Sub 

其中strSelectedColumns是来自用户窗体的信息。

我基本上想打勾我有如下的选项button：

 Private Sub OptionButton3_Click() strPeriodicButton = UserForm2.OptionButton3 End Sub 

我想要的是添加类似于下面的东西到我的模块，所以如果我勾选选项框，它会检查看是否打勾或添加一个string到我的上面的string：

 If strPeriodicButton = True Then strPeriodic = strQuery & "Left Join Periodic Table" Range("B2").Value = strPeriodic ElseIf strPeriodicButton = False Then Range("B2").Value = strQuery 

以供参考：

 Public strSelectedColumns As String, srtQuery As String, strPeriodicButton As Boolean, strPeriodic As String