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

-2

当我进入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

来源

2017-10-04 cinemassacres

代码应该被集成为**文本**在问题中，而不是截图。 – fvu

@fvu编辑为包含代码 – cinemassacres

“停止工作”意味着什么 - 错误消息，错误结果，什么都没有发生？你有没有调试过？ – June7