HTML clipboardsintassi per alcune proprietà dell'oggettoVisual Basic: ListBox per esempi e codificazione applicata a semplici programmi, vedi:http://digilander.libero.it/francescovise/visualpre/visapre.htm http://digilander.libero.it/francescovise/visualpre/lista1.htm http://digilander.libero.it/francescovise/visualpre/listbox1.htm http://digilander.libero.it/francescovise/visualpre/listbox5.htm http://digilander.libero.it/francescovise/visualpre/sintassi.htm listbox1 (modificato con proprietà in lista1)listbox2 (modificato con proprietà in lista2)codificazione item da 0(primo) a 1(secondo),2,3,4,5...numerazione 15 pulsanti(CommandButton) e codificazionesintassi di alcune proprietà dell'oggetto di Visual BasicListBox :AddItem, ListCount,ListIndex, RemoveItem,List(n) , .Text, Clearper vedere codice attivabile e oggetti necessaricfr.codice e listbox5.ppt per esempi di applicazione vedilistbox1.htm listbox2.htm listbox3.htm listbox4.htmlistbox1.ppt listbox2.ppt listbox3.ppt listbox4.ppt------------------------------------1-----------------Rem assegnazione contenuto a item della lista1Rem da dati memorizzati in codice programmaDim testo As Stringtesto = "verona"lista1.AddItem ("rossi")lista1.AddItem ("verdi")lista1.AddItem ("roma")lista1.AddItem (testo)lista1.AddItem (testo)lista1.AddItem (testo)lista1.AddItem (testo)--------------------------------------2Rem assegnazione contenuto a item della lista1 da tastieraDim testo As Stringtesto = TextBox1lista1.AddItem (testo)lista1.AddItem (TextBox1)---------------------------------------3Rem conta numeri elementi presenti in lista1conta = lista1.ListCountMsgBox (conta)MsgBox (lista1.ListCount)MsgBox ("numero elementi=" & conta)----------------------------------------------4Rem visualizza codice numerico elemento selezionato in lista1rem se nessun elemento selezionato mostra -1Dim codice As Integercodice = lista1.ListIndexMsgBox (codice)MsgBox (lista1.ListIndex)-------------------------------------------5Rem cancella da lista1 elemento indicato da codice numericocodice = 2lista1.RemoveItem (codice)-----------------------------------------6Rem visualizza testo presente in item codificato da codiceDim parola, parola1 As StringDim codice As Integercodice = 2parola = (lista1.List(codice))MsgBox ("con codice " & parola)parola1 = (lista1.List(2))MsgBox ("con numero " & parola1)-----------------------------------------------7Rem evidenzia in lista1 l'item codificato da codiceDim codice As Integercodice = 3lista1.ListIndex = codice 'evidenzia quarto elememto ,codice3-----------------------------------------------------------8Rem cancella da lista1 visibile elemento selezionatolista1.RemoveItem lista1.ListIndex----------------------------------------------------9Rem cancella da lista1 visibile elemento selezionatoDim codice As Integercodice = lista1.ListIndexlista1.RemoveItem codice----------------------------------------------------10Rem sostituire testo in item selezionato con altro testoRem da assegnare con codice o con tastieraDim nuovo As Stringnuovo = "testo da sostituire"lista1.List(lista1.ListIndex) = nuovo-------------------------------------------------11Rem sostituire testo in item codificato con altro testoDim nuovo As StringDim codice As Integernuovo = "testo da sostituire in posizione 2"codice = lista1.ListIndexcodice = 2lista1.List(codice) = nuovo--------------------------------------------------------12Rem sostituire testo in item codificato con altro testo da tastieraDim nuovo As StringDim codice As Integernuovo = TextBox1codice = lista1.ListIndexcodice = 2lista1.List(codice) = nuovo-------------------------------------------------------13Rem visualizza testo elemento selezionatoDim frase As Stringfrase = lista1.TextMsgBox (frase)-----------------------------14rem cancella tutta la listalista1.clear--------------------------------15
sintassi per ListBox in visual Basic
HTML clipboardsintassi per alcune proprietà dell'oggettoVisual Basic: ListBox per esempi e codificazione applicata a semplici programmi, vedi:http://digilander.libero.it/francescovise/visualpre/visapre.htm http://digilander.libero.it/francescovise/visualpre/lista1.htm http://digilander.libero.it/francescovise/visualpre/listbox1.htm http://digilander.libero.it/francescovise/visualpre/listbox5.htm http://digilander.libero.it/francescovise/visualpre/sintassi.htm listbox1 (modificato con proprietà in lista1)listbox2 (modificato con proprietà in lista2)codificazione item da 0(primo) a 1(secondo),2,3,4,5...numerazione 15 pulsanti(CommandButton) e codificazionesintassi di alcune proprietà dell'oggetto di Visual BasicListBox :AddItem, ListCount,ListIndex, RemoveItem,List(n) , .Text, Clearper vedere codice attivabile e oggetti necessaricfr.codice e listbox5.ppt per esempi di applicazione vedilistbox1.htm listbox2.htm listbox3.htm listbox4.htmlistbox1.ppt listbox2.ppt listbox3.ppt listbox4.ppt------------------------------------1-----------------Rem assegnazione contenuto a item della lista1Rem da dati memorizzati in codice programmaDim testo As Stringtesto = "verona"lista1.AddItem ("rossi")lista1.AddItem ("verdi")lista1.AddItem ("roma")lista1.AddItem (testo)lista1.AddItem (testo)lista1.AddItem (testo)lista1.AddItem (testo)--------------------------------------2Rem assegnazione contenuto a item della lista1 da tastieraDim testo As Stringtesto = TextBox1lista1.AddItem (testo)lista1.AddItem (TextBox1)---------------------------------------3Rem conta numeri elementi presenti in lista1conta = lista1.ListCountMsgBox (conta)MsgBox (lista1.ListCount)MsgBox ("numero elementi=" & conta)----------------------------------------------4Rem visualizza codice numerico elemento selezionato in lista1rem se nessun elemento selezionato mostra -1Dim codice As Integercodice = lista1.ListIndexMsgBox (codice)MsgBox (lista1.ListIndex)-------------------------------------------5Rem cancella da lista1 elemento indicato da codice numericocodice = 2lista1.RemoveItem (codice)-----------------------------------------6Rem visualizza testo presente in item codificato da codiceDim parola, parola1 As StringDim codice As Integercodice = 2parola = (lista1.List(codice))MsgBox ("con codice " & parola)parola1 = (lista1.List(2))MsgBox ("con numero " & parola1)-----------------------------------------------7Rem evidenzia in lista1 l'item codificato da codiceDim codice As Integercodice = 3lista1.ListIndex = codice 'evidenzia quarto elememto ,codice3-----------------------------------------------------------8Rem cancella da lista1 visibile elemento selezionatolista1.RemoveItem lista1.ListIndex----------------------------------------------------9Rem cancella da lista1 visibile elemento selezionatoDim codice As Integercodice = lista1.ListIndexlista1.RemoveItem codice----------------------------------------------------10Rem sostituire testo in item selezionato con altro testoRem da assegnare con codice o con tastieraDim nuovo As Stringnuovo = "testo da sostituire"lista1.List(lista1.ListIndex) = nuovo-------------------------------------------------11Rem sostituire testo in item codificato con altro testoDim nuovo As StringDim codice As Integernuovo = "testo da sostituire in posizione 2"codice = lista1.ListIndexcodice = 2lista1.List(codice) = nuovo--------------------------------------------------------12Rem sostituire testo in item codificato con altro testo da tastieraDim nuovo As StringDim codice As Integernuovo = TextBox1codice = lista1.ListIndexcodice = 2lista1.List(codice) = nuovo-------------------------------------------------------13Rem visualizza testo elemento selezionatoDim frase As Stringfrase = lista1.TextMsgBox (frase)-----------------------------14rem cancella tutta la listalista1.clear--------------------------------15