VBA：如何在组合框项目中分配sql语句并在按钮单击时执行？

Question

这是我的目标方案，

1. 单击单选按钮，如果组合框中的真实显示项目（来自db）
2. 在combobox中选择项目
3. 单击“确定”按钮，运行SQL语句并生成新工作簿

我的问题是，有没有更好的方法在组合项中分配特定的sql语句？

    If ComboBox1.Text = “Desktop” Then
       'query = "Select * from Desktop"
        call DesktopList
    Else If ComboBox1.Text = “Laptop” 
      'query = "Select * from Laptop"
       call LaptopList
    End If

Answer 1

在变量中获取 ComboBox1 的值，并在查询中调用该变量。

像 ComboSelectValue = ComboBox1.Text

之类的东西

然后您可以在查询中使用它

query = select * from ComboSelectValue