If.....

[bonaprogram]

come posso dire in visualbasic questa formula
___________________________________________
|se text1.text non e uguale a "prova" them |
|msgbox ("Hai sbagliato" |
-------------------------------------------|

senza usare l'else

Grazie

[sebamix]

Dim strOut As String
strOut = IIf(text1.text<>"prova", "si", "no")
MsgBox strOut

Non so quanto sia meglio di un bel if..then..else..end if

:master:

[bonaprogram]

praticamente quello che voglio fare io e questo:

if text1.text="***" then
unload me
***.show
end if
if text1.text="" then
msgbox ("Inserisci il codice")
end if
e poi viene quella formula, perche se uno sbaglia a mettere dovrebbe uscire un msgbox con la scritta Hai sbagliaot il codice.

Hai capitos ebamix?????

[optime]

e perche' mai non vorresti usare ELSE? qualche oscura policy aziendale te lo impedisce?

[sebamix]

Originariamente inviato da optime
e perche' mai non vorresti usare ELSE? qualche oscura policy aziendale te lo impedisce?

Appunto, poi la IIf ha il difetto che valuta comunque tutte e due le soluzioni
IIf(1=1, 1/1, 1/0)
Ti va in errore perchè valuta anche 1/0 (divisione per zero) oltre che 1/1 che dovrebbe (a rigor di logica) essere l'unica istruzione eseguite. Poi è limitata.
Meglio un bel if...then...else...end if o un select case.

[bonaprogram]

perchè se uso l'else facciamo un'esmpio

if text1.text= "1" then
text2.text= "2"
else
text2.text="3"

dopo il comando si ferma li per il semplice motivo che se nel text non sta scritto 2 l'opzione else ha sempro il sopravvento su tutto.

[xegallo]

Originariamente inviato da bonaprogram
perchè se uso l'else facciamo un'esmpio

if text1.text= "1" then
text2.text= "2"
else
text2.text="3"

dopo il comando si ferma li per il semplice motivo che se nel text non sta scritto 2 l'opzione else ha sempro il sopravvento su tutto.

eventualmente

puoi usare

if condizione then
elseif condizione then
else
end if

[sebamix]

Originariamente inviato da xegallo
eventualmente

puoi usare

if condizione then
elseif condizione then
else
end if

Che si potrebbe sostituire benissimo con una select case (che sarebbe più leggibile)