Question

当我进入docmd时。在我的代码中它起作用，直到我关闭它然后它停止工作在这里是我的代码。

Private Sub Command1_Click()
    If (Txtusername = "123" And txtpassword = 123) Then
    DoCmd.OpenForm FormName:="Kappa", View:=acNormal, DataMode:=acFormPropertySettings, windowMode:=acWindowNormal
    DoCmd.Close
    Else
        MsgBox "Incorrect Login or Password"
    End If
End Sub

Answer 1

我希望你调用的表单是打开然后立即关闭（你看到它'flash'）因为开始表单获得焦点而DoCmd.Close正在具有焦点的表单上。呼叫表格仍然开放。指定要关闭的表单。

DoCmd.Close acForm, "form name", acSaveNo

Answer 2

DoCmd.Close关闭当前具有焦点的对象。这是在上一行中打开的表单。我假设您要关闭运行此代码的表单。所以，写：

DoCmd.Close acForm, Me.Name

为什么我的代码停止工作？

2 个答案: