Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto!!!

è una settimana che sto conoscendo VB.
Chi mi può aiutare a risolvere questo programmino?
xxx  Grazie xxx
allora
Scrivere un programma in cui ci sono due liste
e tramite 4 command si deve
-con il 1°, trasportare un elemento alla volta della prima lista nella
seconda (e quindi cancellarlo dalla prima)
-con il 2°, trasportare tutti gli elementi della lista 1 nella 2(e poi
cancellarli)
-con il 3° e il quarto si deve fare il procedimento inverso(dalla 2° alla
prima)
Naturalmente gli elementi nelle liste sono caricati già.
Ringrazio infinitamente chi possa aiutarmi
xxx Rita xxx

 Naturalmente gli elementi nelle liste sono caricati già.
mi ricorda il gioco delle piramidi coreane ... o erano 
vietnamite ? Cmq che dovevi spostare il contenuto da un posto 
all'altro rispettando certe regole che neppure quelle mi ricordo.
Spero che sovvengano a qualcun altro e che ti dia una dritta, 
perché la strategia di questo genere di problemi è già ben 
codificata
ciao
cccp++mario


 Naturalmente gli elementi nelle liste sono caricati già.
supponendo che i command si chiamino cmd1, cmd2, cmd3 e cmd4 e le listbox 
lst1, lst2. lst3. lst4
private sub cmd1_click()
    SpostaElemento lst1, lst2
end sub
'Sposta tutti gli elemento di lst1 in lst2
private sub cmd2_click()
    SpostaElemento lst1, lst2, true
end sub
private sub cmd3_click()
    SpostaElemento lst2, lst1
end sub
private sub cmd4_click()
    SpostaElemento lst2, lst1, true
end sub
Private sub SpostaElemento(lstSource as listbox, lstDest as listbox, 
optional SpostaTutti as boolean=false)
    dim i as integer
    if not SpostaTutti then
        if lstSource.listindex<0 then exit sub
        lstDest.additem lstSource.text
        lstSource.removeitem lstSource.listindex
    else
        if lstSource.listcount=0 then exit sub
        for i=0 to lstSource.listcount-1
            lstDest.additem lstSource.list(i)
        next
        lstSource.clear
    end if
end sub
a chi intesto la fattura? ;-))))
CIAO 

 all'altro rispettando certe regole che neppure quelle mi ricordo.
La TORRE DI HANOI!!!!!  dio mio che incubo!
penso che basti digitare torre di hanoi su google che esce fuori la
soluzione in qualsiasi linguaggio dal LOGO al LISP


 soluzione in qualsiasi linguaggio dal LOGO al LISP
In effetti c'č solo l'imbarazzo della scelta, compreso quello per la scelta
dell'applet java migliore :)
http://www.google.it/search?q=hanoi+java&hl=it&lr=lang_it&sa=X&oi=lrtip9
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 a chi intesto la fattura? ;-))))
Mmm... manca il concetto di parzializzazione del problema.
Il tutto puň essere risolto molto piů elegantemente, in modo piů leggibile e
mantenibile cosě:
Sub SpostaElemento(lstSource, lstDest)
' si occupa solo di spostare l'elemento selezionato
' da lstSource a lstDest
Sub SpostaTuttiGliElementi(lstSource, lstDest)
    Do while lstSource.Count > 0
        lstSource.ListIndex = 0
        Call SpostaElemento(lstSource, lstDest)
    Loop
End Sub


 End Sub
uhm.. hai ragione! non ci avevo pensato ;-)
CIAO 

 ha scritto nel messaggio
news:cZBud.39255$B06....@news.edisontel.com...
