Discussion :

[SeaWolf601]

Mesdames, mlle, messieurs, bonjour

Voici le sujet du controle d'aujourd'hui :

Un developpeur en herbe (moi) a décidé de tester la valeur d'une combobox sur un evennement, AfterUpdate (Apres MAJ).
avec un code tel que :

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub MEMBERS_AfterUpdate()
 
If IsNull(MEMBERS) Then
 
MsgBox ("CE MEMBRE NE POSSEDE PAS D E-MAIL")
Me.Commande43.Enabled = False
End If
 
End Sub

Hors il ne souhaite pas tester la valeur de la premiere colonne de la liste deroulante, mais la seconde, car cette liste déroulante possede deux colonnes. dont la seconde est cachée bien entendu, sinon ce serais pas drole.



Comment doit faire se developpeur (si on peu lui donner ce nom) pour arriver à tester la valeur de la seconde colonne, tout en la laissant invisible.

Voila... je rammasse les copies dans une heure.

[Faw]

salut maestro, un tyuaux:
ou tu changes de colonne liée ou tu fais référence à la bonne colonne
par son index...
F1 sur Column

[SeaWolf601]

salut maestro, un tyuaux:
ou tu changes de colonne liée ou tu fais référence à la bonne colonne
par son index...
F1 sur Column

Hello,
Alors si je change de colonne lié ça me renvoit enffectivement une valeur nulle dans ma ComboBox mais par je ne sait quel miracle la condition ne se déclenche pas.

Quand à lui indiquer la collonne par l'index.
ce qui donne ceci, si je me suis pas trompé dans la syntaxe.
(au passage merci je ne connaissait pas cette "fonction")

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub MEMBERS_AfterUpdate()
 
If IsNull(MEMBERS.Column(1)) Then
MsgBox ("CE MEMBRE NE POSSEDE PAS D E-MAIL")
Me.Commande43.Enabled = False
Else
End If
 
End Sub

C'est pareil rien ne se passe...

[SeaWolf601]

C'est Bon j'ai trouvé.

MERCI BEAUCOUP !!!!


j'ai changé mon

Code :

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

If IsNull(MEMBERS.Column(1)) Then

en

Code :

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

If (MEMBERS.Column(1)="") Then

Et ça marche.

Eléve FAW 20/20... Bravo... et encore merci.

[Faw]

je venais juste de tester ceci

Code :

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

If IsNull(Me.Modifiable4.Column(1)) Or Me.Modifiable4.Column(1) = "" Then MsgBox "vide"

La question qui reste: pourquoi Null n'est pas considéré dans une combobox?
et là le 20/20 serait plus objectif

Merci de ton indulgence.

[SeaWolf601]

je venais juste de tester ceci

Code :

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

If IsNull(Me.Modifiable4.Column(1)) Or Me.Modifiable4.Column(1) = "" Then MsgBox "vide"

La question qui reste: pourquoi Null n'est pas considéré dans une combobox?
et là le 20/20 serait plus objectif

Merci de ton indulgence.

ça je pense pouvoir avoir un début de réponse.

Le champ existe, il est vide mais il existe... donc n'est pas Null.
Voila comment je le perçoit. Mais c'est vrai que ça ne le fait que dans une Combo, dans une textBox "is null" marche".