Pourquoi mon code a-t-il cessé de fonctionner?

-2

Lorsque j'ai entré docmd. Dans mon code cela a fonctionné, jusqu'à ce que je l'ai fermé alors il a cessé de fonctionner ici est mon code.Pourquoi mon code a-t-il cessé de fonctionner?

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

Source

2017-10-04 cinemassacres

Le code doit être intégré en tant que ** text ** dans la question, pas en tant que capture d'écran. – fvu

@fvu modifié pour inclure le code – cinemassacres

Qu'est-ce que 'cessé de travailler' signifie - message d'erreur, mauvais résultats, rien ne se passe? Avez-vous pas débogué? – June7

Je pense que le formulaire que vous appelez ouvre alors la fermeture immédiatement (voyez-vous « flash ») parce que la forme d'ouverture se concentrer et la DoCmd.Close agit sur la forme qui a le focus. Le formulaire d'appel reste ouvert. Spécifiez le formulaire à fermer.

DoCmd.Close acForm, "form name", acSaveNo

Source

2017-10-04 18:11:52 June7

DoCmd.Close ferme l'objet ayant actuellement la mise au point. C'est le formulaire ouvert dans la ligne précédente. Je suppose que vous voulez fermer le formulaire qui exécute ce code. Donc, écrivez:

DoCmd.Close acForm, Me.Name

Source

2017-12-02 18:44:52

Pourquoi mon code a-t-il cessé de fonctionner?

Répondre

Questions connexes