Déclarer plusieurs ordres

Fermé
bolobo46 - 27 sept. 2013 à 19:08
f894009 Messages postés 17187 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 1 mai 2024 - 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)

1 réponse

f894009 Messages postés 17187 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 1 mai 2024 1 704
28 sept. 2013 à 07:41
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
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
f894009 Messages postés 17187 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 1 mai 2024 1 704
Modifié par f894009 le 28/09/2013 à 11:24
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