Problème avec un SETFOCUS

voilà je fais ça ds mon appli : "txt_nom.SetFocus"

et là il plante et me sors comme message d'erreur : "erreur 5 : Argument ou appel de procédure incorrect"

eskil faut une référence spécial de VB pour utiliser ça? pcq jusque là ça a tjrs marché chez moi

Ben nan , t'as pas besoin de ndéclarartion spéciale , mais regardes si ton composante n'est )pas en visible=False , ou Enabled=False ...

Si ça marche tj pas , tu peux essayer de m'envoyer ton code par e-mail et j'essayerais de voir d'ou ça vient : vbbigbrotherdv@aol.com
.:: aKheNAtHoN ::.
[->www.myhackerside.fr.st<-]


-------------------------------
Réponse au message :
-------------------------------

voilà je fais ça ds mon appli : "txt_nom.SetFocus"

et là il plante et me sors comme message d'erreur : "erreur 5 : Argument ou appel de procédure incorrect"

eskil faut une référence spécial de VB pour utiliser ça? pcq jusque là ça a tjrs marché chez moi

voilà mon code :

Private Sub B_Ok_Click()

On Error GoTo TraiteErreur

Me.Enabled = False

'Contrôle des champs
If Len(Trim(F_Connexion.txt_Bdd.Text)) = 0 Then
MsgBox "Veuillez saisir un nom de base de données", vbExclamation, "Valeur incorrect"
txt_Bdd.SetFocus
End If


...


et il plante sur le setfocus :(
alors ke je suis sur un textbox visible = true et textbox enabled = true

ca doit venir du Me.enabled=false ; si ta feuille n'est pas accessible, tu ne peux donc pas acceder aux controle a l'interieur



-------------------------------
Réponse au message :
-------------------------------

voilà mon code :

Private Sub B_Ok_Click()

On Error GoTo TraiteErreur

Me.Enabled = False

'Contrôle des champs
If Len(Trim(F_Connexion.txt_Bdd.Text)) = 0 Then
MsgBox "Veuillez saisir un nom de base de données", vbExclamation, "Valeur incorrect"
txt_Bdd.SetFocus
End If


...


et il plante sur le setfocus :(
alors ke je suis sur un textbox visible = true et textbox enabled = true

Ton probléme n'est pas dans la fonction si ça se trouve et c'est pour ça que je t'avais dit de m'evoyer carément tout le projet , car dans le petit code que tu as écrit y'a aparement aucun pb ... Passes le tout et je te dirais ce que qui merde , car c'est surement ailleurs ...

.:: aKheNAtHoN ::.
[->www.myhackerside.fr.st<-]


-------------------------------
Réponse au message :
-------------------------------

ca doit venir du Me.enabled=false ; si ta feuille n'est pas accessible, tu ne peux donc pas acceder aux controle a l'interieur



-------------------------------
Réponse au message :
-------------------------------

voilà mon code :

Private Sub B_Ok_Click()

On Error GoTo TraiteErreur

Me.Enabled = False

'Contrôle des champs
If Len(Trim(F_Connexion.txt_Bdd.Text)) = 0 Then
MsgBox "Veuillez saisir un nom de base de données", vbExclamation, "Valeur incorrect"
txt_Bdd.SetFocus
End If


...


et il plante sur le setfocus :(
alors ke je suis sur un textbox visible = true et textbox enabled = true

Me culpa tout le monde ;)
en fait tout le monde me dit c ton machin ki doit être en enabled = false
mais bon je disais non mais si en fait :(
faute d'étourderie ;)

Hé ben ! C chouette si t'as trouvé ... méa culpa accépté :-P

.:: aKheNAtHoN ::.
[->www.myhackerside.fr.st<-]