Discussion :

[gatsu07]

Bonjour,
je bloque sur un problème depuis quelque temps. Lorsque je charge mon formulaire, j'aimerais mettre une valeur dans une textbox.
Je fais le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Sub Form_Activate()
Form_etat_synchro.t_inqueue.Enabled = True
Form_etat_synchro.t_inqueue.Locked = False
Form_etat_synchro.t_inqueue.Value = "test"

Mais il me met une erreur lors de l'ouveture de mon formulaire :
"impossible d'attribuer une valeur à cet objet ouvert"
Ce champs est lié à une datasource, mais dans le cas présent ce datasource ne renvoit rien, donc je ne vois pas pourquoi je ne peux pas mettre de valeur dans ma textbox ...
merci de vos éclaircissements.

[loufab]

Bonjour,

Utilise plutot sur l'événement Sur Chargement.

Cordialement,

[gatsu07]

C'est ce que j'avais fait avant, et c'était pareil

[loufab]

Est-ce que ta requête source est modifiable ?

Est-ce que ton formulaire n'est pas verrouillé (propriété Modif à Oui, type Recorset pas sur instantané...) ?

[gatsu07]

Ma requête source modifiable ?? dans le formulaire ?
si c'est ca que tu veux dire, non. C'est une vue qui alimente mes champs.

Je ne pense pas que mon formulaire soit vérouillé, j'ai mis les propriétés :
locked=false
enabled=true
recordset="ma_source"

[loufab]

Ma requête source modifiable ?? dans le formulaire ?
si c'est ca que tu veux dire, non. C'est une vue qui alimente mes champs.

Je ne pense pas que mon formulaire soit vérouillé, j'ai mis les propriétés :
locked=false
enabled=true
recordset="ma_source"

Si tu parles des propriétés du code fourni il se rapporte à un controle (t_inqueue) et non au formulaire (Form_etat_synchro).

Regarde dans les propriétés de ton formulaire voir si ces propriétés sont correctes.

[gatsu07]

C'est bon ca marche maintenant merci.
Par contre, j'ai toujours un problème quand j'essaye de mettre le focus sur un mes textbox. Je fais cela afin de pouvoir tester si le champs contient des données, si il n'en contient pas je lui initialise une valeur.
Je fais ca a la base pour essayé d'afficher les champs de mon formulaire même quand ma vue dont il dépend ne retourne rien.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Me.t_inqueue.Enabled = True
    Me.t_inqueue.Locked = False
    Form_etat_synchro.t_inqueue.SetFocus
    If Nz(Me.t_inqueue, "") = "" Then
        Me.t_inqueue.ControlSource = ""
        Me.t_inqueue.Value = 0
    End If

[keita]

bonjour
Essai comme ça pour voir:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If isnull(Me.t_inqueue) or Me.t_inqueue = "" Then
        Me.t_inqueue.ControlSource = ""
        Me.t_inqueue.Value = 0
End If

A+

[gatsu07]

Bonjour,
j'ai essayé ton petit code, mais cela me fait la même erreur
"erreur 2427
Expression sans paramètres"
tu as une autre idée ?

[gatsu07]

Finalement j'arrive à éluder cette erreur. voici mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
If IsNull(Me.t_inqueue) = False Then
        Me.t_inqueue.ControlSource = ""
        Me.t_inqueue.Value = 0
    End If
    If IsNull(Me!t_outqueue) = False Then
        Me.t_outqueue.ControlSource = ""
        Me.t_outqueue.Value = 0
        Me.t_outqueue.Visible = True
   End If

Par contre mes champs n'apparaissent toujours pas, sauf si je les mets dans la section "en tête" de mon formulaire. Pour l'instant ils sont dans la section "Détail", et quand je fais un msgbox(Me.t_inqueue) j'ai bien la bonne valeur, mais le champs n'apparait pas ...
J'ai comparé les valeurs de mes deux sections, et tous est à l'identique. Je ne comprends plus rien et j'aimerais faire une application "propre", ne pas mettre mes champs dans la section "en tête".