Aprire il progetto di Visual Basic .
2
Trascinare un pulsante nel progetto dalla casella degli strumenti . Nel menu Proprietà , assegnare al pulsante il nome di " recuperare ".
3 Fare doppio clic sul pulsante per creare un evento click . Questo ti porterà nel posto appropriato nel codice sorgente per incollare il tuo codice di recupero
4
Copia e incolla il seguente codice: .
Dim itemsPerColumn = Math.floor ( ListBox1 . ClientRectangle.Height /ListBox1.ItemHeight ) per
REM colonna per recuperare da . conteggio parte da 0
Dim colonna = 1
REM la riga per recuperare da . conteggio parte da 0
Dim row = 0
REM Questo combo di xey otterrà il primo elemento della seconda colonna .
elemento Dim = ListBox1.Items ( itemsPerColumn * colonna + riga
MsgBox ( item.toString ) economici
Programmazione © www.354353.com