Rickets Posted March 7, 2015 Report Posted March 7, 2015 Problema sta in felul urmator :Am 2 textbox-uri si 2 listbox-uri.Am facut in asa fel incat atunci cand fac click pe un item din listbox1, acesta sa apara in textbox1... Acum vine intrebarea:Sa zicem asaListbox1:portocalebananemere pereListbox2:florihastigarialcoolBun, am facut click pe al doilea item din listbox1 (banane) si a aparut in textbox1. Vreau ca atunci cand fac chestia asta sa apara si in textbox2 al doilea item din listbox2, adica cand fac click pe un item din primul listbox si apare in primul textbox, sa apara si in al doilea textbox itemul din listbox2 conform indexului itemului pe care l-am selectat din listbox1. Quote
nedo Posted March 7, 2015 Report Posted March 7, 2015 dupa codul in care adaugi textul in textbox1 adaugi codul pentru a seta ca item selectat elementul cu nr xfolosesti un loop sa treci prin toate elementele listbox2 si le setezi la false cu SetSelected. Dupa care iei elementul selectat din listbox2 ca si la listbox1 si il adaugi la textbox2 Quote
AdIntended Posted March 7, 2015 Report Posted March 7, 2015 (edited) nu stiu in vb, dar incearca, la event sa iei indexul de la itemul selectat din list1 si sa selectezi itemul din list2 cu acelasi index.Pseudo cod, int selectat = list1.getSelectedIndex (); list2.setSelectedIndex (selectat);//Pare rau, am citit din nou si vad ca vrei altcevaPseudo cod, ideea e cam aceeasi, iei indexul la elementul selectat si il manipulezi cum vrei:int selectat : list2.getSelectedIndex ();textbox1.put( (String sau ce ai tu) list1.get(selectat));textbox2.put( String sau ce ai tu) list2.get(selectat));daca nici asa nu e ma scuzi ca nu inteleg ce vrei sa faci e si tarziu pt mine Edited March 7, 2015 by AdIntended Quote
Rickets_temp Posted March 7, 2015 Report Posted March 7, 2015 @nedoEu m-am gandit la asta : Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged TextBox1.Text = ListBox1.SelectedItem Dim k As Integer = ListBox1.SelectedIndex TextBox2.Text = ListBox2.Items(k) End SubSi merge! Quote