Déclarer plusieurs ordres

bolobo46 -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention - 28 sept. 2013 à 11:14

Bonjour,
Mon Problème est assez difficile a expliquer, alors voilà
mon code est :

if textbox1.text = "internet" then shell(iexplore.exe)

j'aimerais savoir comment on dis : if textbox1.text = "" ou "" ou encorre "" then shell(iexplore.exe)

Afficher la suite

1 réponse

Réponse 1 / 1
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
Bonjour,
```
    'si internet
    If textbox1.Text = "internet" Then
        s = Shell("C:\Program Files\Internet Explorer\iexplore.EXE", 1)
    End If
    'ou
    'si vide
    If textbox1.Text = "" Then
        s = Shell("C:\Program Files\Internet Explorer\iexplore.EXE", 1)
    End If
```
Bonne suite
0
1. bolobo46
  
  Enfait, je voudrais déclarer les différentes ortographes de internet explorer (avec maj, sans ...)
  
  donc, ce que je veux dire c'est : if textbox1.text = "internet" ou "ie" ou "etc ..." then shell("iexplore.exe")
  
  et donc ce sont ces "ou" que je ne sais pas déclarer. :D
  
  0
2. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
  
  Bonjour,
  
  A vous d'ajouter autant de Or qu'il vous plaira,
  
  Sub test()
  'test en majuscule/minuscule (Ucase converti en majuscule)
  If UCase(textbox1.Text) = "INTERNET" Or UCase(textbox1.Text) = "IE" Then
  s = Shell("C:\Program Files\Internet Explorer\iexplore.EXE", 1)
  End If
  End Sub
  
  0

Déclarer plusieurs ordres

1 réponse

Discussions similaires

Newsletters