Le "ou" / "ou bien"

**Ramdoulou** · 25/10/2008, 20h51

Bonsoir à tous

Alors voilà, je cherche comment exprimer le "ou" dans vb6.
Par exemple, si text1.text = "toto" OU "toto2" alors msgbox "héhé"

Donc voilà, j'ai pensé à "Or" mais le type est incompatible, ca ne doit fonctionner qu'avec des variables ou valeures numériques...

Merci d'avance

**ProgElecT** · 25/10/2008, 21h06

Montres nous ta ligne de code, car ton algo et juste, moi quand je fait sa avec soit "toto" ou toto2" dans Text1, sa fonctionne.

Code :

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

If Text1.text = "toto" Or Text1.Text = "toto2" Then MsgBox "héhé"

**ucfoutu** · 25/10/2008, 21h08

Bonjour, Ramdoulou,

Je serais vraiment (mais alors vraiment) tenté de te répondre : et ton aide en ligne ? quand la consultes-tu ? jamais ?

Ta question est basique de chez basique ...

Allons bon ...
Une réponse quand même (et sans commentaires à mon sens superflus ...) :

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
16
17
18
19
20
21
22
23
24
Private Sub Form_Activate()
  Text1.Text = "toto2"
End Sub
 
 
 
Private Sub Command1_Click()
 If Text1.Text = "toto2" Or Text1.Text = "toto" Then
   MsgBox "héhé avec if et Or"
 Else
   MsgBox "hola avec if et Or"
 End If
 Select Case Text1.Text
  Case "toto2", "toto"
    MsgBox "héhé avec select case"
  Case Else
    MsgBox "hola avec select casecase"
 End Select
 If Text1.Text Like "toto*" Then
    MsgBox "héhé avec like"
 Else
    MsgBox "hola avec like"
 End If
End Sub