database - Access ，选择大小写ActiveControl.Name？

我在表单访问中有两个组合框（c1，c2），带有按钮搜索，如果用户从c1中选择一个值并单击搜索，则应打开一个FORM1，如果用户从c2中选择一个值并单击搜索，则应打开FORM2。

Private Sub Commande6_Click()
    Select Case ActiveControl.Name
        Case "c1"
            DoCmd.OpenForm "FORM1"
        Case "c2"
            DoCmd.OpenForm "FORM2"
        Case Else
            'traitement
     End Select
End Sub

最佳答案

如果单击一个组合框，然后单击搜索按钮，则A组合框不是最后一个单击的对象，因此它不是活动的-搜索按钮是（Commande6在您的示例中）

Public lastCBclicked as String

Private Sub c1_Click()
    lastCBclicked  = ActiveControl.Name
End Sub

Private Sub c2_Click()
    lastCBclicked  = ActiveControl.Name
End Sub

Private Sub Commande6_Click()
  Select Case lastCBclicked
    Case "c1"
        DoCmd.OpenForm "FORM1"
    Case "c2"
        DoCmd.OpenForm "FORM2"
    Case Else
        'traitement
   End Select
End Sub

关于database - Access ，选择大小写ActiveControl.Name？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/49490912/