[VB] Erreur avec SETFOCUS

Erreur avec SETFOCUS [VB] - Programmation

Marsh Posté le 22-07-2002 à 19:25:03    

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


Message édité par dinbougre888 le 22-07-2002 à 19:32:24
Reply

Marsh Posté le 22-07-2002 à 19:25:03   

Reply

Marsh Posté le 22-07-2002 à 20:02:21    

siouplé :jap: :(
[:sisicaivrai] tant ke ça marche pas chui ds kk [:sisicaivrai]
 
pourtant sur un projet test bah ça marche :(

Reply

Marsh Posté le 22-07-2002 à 20:12:31    

txt_nom, c'est une textBox ?


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 22-07-2002 à 20:34:33    

Quand tu fais un .SetFocus sur un controle d'une fenêtre, il faut que le controle soit .Enabled = True et que ta fenêtre soit chargée.
 
Si tu fais un .SetFocus dans un Form_Load(), ca fait cette erreur
 
Donc, change ton .SetFocus de place, ou joue avec l'ordre des .TabIndex des controles.

Reply

Marsh Posté le 22-07-2002 à 21:00:42    

non il est ds un Bouton_Click
et c sur un textbox enabled = true :(
 
je pige pas :(
avant il marchait et paf ché pas pk il marche plus :(

Reply

Marsh Posté le 22-07-2002 à 21:40:45    

bah là, je vois pas
 
envoie moi ton code si tu veux (spark@libertysurf.fr)

Reply

Marsh Posté le 22-07-2002 à 23:21:19    

Private Sub B_Ok_Click()
 
Dim User_login      As String
 
    On Error GoTo TraiteErreur
     
    Me.Enabled = False
    Sablier
     
    '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
        Fleche
        Me.Enabled = True
        Exit Sub
    End If
...

 
:(

Reply

Marsh Posté le 22-07-2002 à 23:34:54    

la fenêtre doit être active pour qu'un controle puisse avoir le focus.
 
au lieu de faire
 
txt_Bdd.SetFocus  
Me.Enabled = True  
 
 
fait
 
Me.Enabled = True  
txt_Bdd.SetFocus  
 
dans cet ordre, ca devrait marcher

Reply

Marsh Posté le 23-07-2002 à 08:41:47    

c déjà comme ça :(

Reply

Marsh Posté le 23-07-2002 à 10:17:28    

Bah dans l'exemple que tu as donné, c'est pas le cas...
Ton problème de l'erreur 54 vient obligatoirement de ce genre d'erreurs. Soit c'est la fenetre qui n'est pas chargée, soit elle est .Enabled  =False, soit c'est le control qui n'est pas .Enabled = True.
Ca ne peut pas venir d'autre chose pour un .SetFocus.
 
Donc, vérifie bien ton code.
Et si tu trouves pas, envoie le moi.
 
@+

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed