Discussion :

[Xtremmax]

Hello

Bon alors j'ai quelques soucis avec un bout de code , censé faire une recherche avec plusieurs champs de recherche . En faite c'est un chat et donc spécifier les personne avec qui parler . Il y a comme champs : fille ou garçons (case a coché) , age (Séléction dans une liste) et département (Encore une séléction) . Voila le code que j'ai fais , mais....ça marche pas (c'est pour ça que je viens :p) , ça recherche pas correctement .


Code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
If Me.Fille.Checked Then
               If MembreALister.Genre.Contains(Me.Fille.Text) 
               And 
               If Me.Age.Text = "Tous" Then
               else
               MembreALister.Age.Contains(Me.Age.Text) 
               End If
               If Me.Age.Text = "Tous" Then
               else
               And
               MembreALister.Departement.Contains(Me.Departement.Text)Then
               End If
               End If
               Me.list_cc.Items.Add(ccALister)

Désoler si mon code est confus :s Merci

[Er3van]

"Bien" indenté :

Code vb :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
If Me.Fille.Checked Then
	If MembreALister.Genre.Contains(Me.Fille.Text) And If Me.Age.Text = "Tous" Then
	else
	  MembreALister.Age.Contains(Me.Age.Text) 
	End If
	If Me.Age.Text = "Tous" Then
	else
	And MembreALister.Departement.Contains(Me.Departement.Text)Then
	End If
End If
Me.list_cc.Items.Add(ccALister)

En gros il ne se passe par grand chose...
Ça marcherait mieux comme ça :

Code vb :

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

1
2
3
4
5
IF condition THEN
   'do something
ELSE
   'do something
ENDIF

[Xtremmax]

Merci mais comment faire pour avoir plusieurs champs de recherche dans la même condition , comme je veux quoi ?

[Er3van]

Code vb :

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

1
2
3
4
5
6
7
8
9
10
 
IF condition1 AND (condition2 OR condition3) THEN
    'do something
ELSE
    IF condition3 OR condition4 THEN
        'do something
    ELSE
        'do something else
    ENDIF
ENDIF

[Xtremmax]

Merci j'ai compris . Dernier chose , comment ont fais pour mettre différent de ...

Par exemple

IF condition1 AND (condition2 si différent de .... OR condition3 si différent de ....) THEN

[Shadam]

Code :

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

If Condition1 And (Condition2 <> ... Or Condition3 <> ...) Then

Par contre il faut que tu mettes "<>" dans la condition elle même...