Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - strutture if annidate, come si fanno?
Forum - Visual Basic 6 - strutture if annidate, come si fanno?

Pagine: [ 1 2 ] Precedente | Prossimo
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 1:00
Giovedì, 01/01/1970
ecco un'esempio :
Codice sorgente - presumibilmente VB.NET

  1. Private Sub command1_click()
  2. dim ciao as integer
  3. ciao = inputbox ("Inserisci il valore: ")
  4. if ciao < 5 then
  5. msgbox "ciao"
  6. else
  7. if bla bla bla


Non posso usare ElseIf, mi servono le strutture annidate :rotfl:;):D8-|:-|:k:

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 18:41
Sabato, 06/09/2008
1) Perchè non puoi usare ElseIf?

2) Se non lo puoi usare e devi proprio usare IF allora devi fare per forza così:
if blabla then
blabla
end if
if blabla then
blabla
end if
ecc...

Altrimenti potresti usare un Select Case

3) Spiegati meglio su cosa intendi per "annidare le if"...

Ultima modifica effettuata da GrG il 06/09/2008 alle 18:42
PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 0:21
Domenica, 07/09/2008
strutture annidate tecnicamente significa
Codice sorgente - presumibilmente VB.NET

  1. if blabla then
  2. _if blablabla then
  3. __if blablablabla then
  4. ____BLABLABLABLA
  5. __endif
  6. _endif
  7. endif


PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 11:39
Domenica, 07/09/2008
Testo quotato

Postato originariamente da P4p3r0g4:

strutture annidate tecnicamente significa
Codice sorgente - presumibilmente VB.NET

  1. if blabla then
  2. _if blablabla then
  3. __if blablablabla then
  4. ____BLABLABLABLA
  5. __endif
  6. _endif
  7. endif



grazie mille! :k:

PM Quote
Avatar
D3m0n (Normal User)
Newbie


Messaggi: 6
Iscritto: 19/10/2008

Segnala al moderatore
Postato alle 12:50
Domenica, 19/10/2008
Salve a tutti...sono uno nuovo e ho proprio un problema con le if annidate...in pratica ho superato il limite di 64 kb di porzione di codice di una sub e quando lo avvio mi riporta l'errore "Procedure too large"... il problema è che avevo strutturato il programma proprio con tantissime if (essendo alle prime armi nn conosco ancora molto bene gli altri comandi) e avevo pensato di creare una specie di traduttore e con la condizione if mi analizzavo tutte le parole, e successivamente tramite una variabile restituivo a una label la seguente traduzione (funzionava tutto) solo ora ho proprio questo problema della procedura troppo lunga...come posso rimediare??? Grazie mille a tutti anticipatamente... :k:

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 14:45
Domenica, 19/10/2008
1) Apri un nuovo Topic. Questo è un topic vecchio e differente dal tuo discorso.

2) se il tuo problema è che hai troppo
if a = "abaco" then
..
end if
..
..
If a = "zuzzurellone" then
..
end if



basta che fai


dim k(1 to n) as String
dim j as integer

k(1) = "abaco"
'..qua riempi i valori di k(1) k(2) k(3) ecc
k(n) = "zuzzurellone"

for j = 1 to n
if a = K(j) then
'..qua ci metti cosa vuoi fare
endif
next j


dove n lo sostituisci con il numero degli elementi da comparare.
si può fare anche con un numero variabile  di elementi ma visto che sei alle prime armi non ho voluto complicare il codice.

3)se vuoi rispondere apri comunque un altro topic.

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 18:14
Lunedì, 20/10/2008
comunque io per non ingigantire il programma metterei il tuo dizionario di parole in un documento di testo o un file, esterno al programma, così può anche essere aggiornato. :D

PM Quote
Avatar
D3m0n (Normal User)
Newbie


Messaggi: 6
Iscritto: 19/10/2008

Segnala al moderatore
Postato alle 18:22
Lunedì, 20/10/2008
Si ci avevo pensato...ma nn ho la più pallida idea di come fare ... (sono un principiante XD) te ne sarei molto grado se mi potresti fare un esempio (magari spiegandomi il codice). Cmq grazie lo stesso per i suggerimenti :D

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 18:10
Martedì, 21/10/2008
Scusa se ti risp un pò in ritardo... ecco un esempio commentato:

Codice sorgente - presumibilmente VB.NET

  1. Dim parole(1 To 99999) As String ' Array che dovrà contenere le parole, in questo caso max potrà contenere 99999
  2. Dim i As Integer
  3. Open "tuapath\Tuofile.txt" For Input As #1 'Apre il txt con le parole
  4. Do 'ciclo
  5. i = i + 1
  6. Line Input #1, parole(i) 'mette riga per riga del txt nell'array parole
  7. Loop Until EOF(1) = True 'fino alla fine del txt
  8. Close #1 'chiude la lettura txt



adesso nell'array parole hai tutte le tue parole e io ti consiglierei di crearti una funzione per la ricerca della parola nella textbox (quella da tradurre) nell'array parole.

Magari nel txt metti così tipo:
hello = ciao
ecc...

RICORDA: prima di fare la ricerca nell'array devi usare split per separare "hello = ciao"

ora devo skappare...ciao

p.s. se vuoi kiarimenti(100% asd) dimmelo...xD

PM Quote
Pagine: [ 1 2 ] Precedente | Prossimo