lancio di Microsoft Excel , fare clic sulla scheda "Sviluppatore " e cliccare su " Visual Basic " per aprire l'editor di VBA finestra. Fai clic sul menu "Inserisci" e fare clic su " UserForm " per creare un nuovo modulo . Fare clic su "Strumenti ", fare clic su " altri Control ", e selezionare la casella accanto a " Controllo ListView Microsoft " per aggiungere un nuovo controllo " ListView " al form.
2
destro fare clic sul " " controllo e fare clic su " Proprietà ". ListView Scorrere verso il basso la finestra Proprietà e scegliere "True" accanto a " caselle di controllo . " Fare clic su " CommandButton " dal riquadro " Strumenti " e fare clic sul form per aggiungere un nuovo controllo pulsante . Aggiungere un secondo pulsante con la stessa tecnica .
3
doppio clic su " CommandButton1 " per creare un evento click di questo pulsante. Aggiungere il seguente codice per popolare la " ListBox " con tre elementi :
Me.ListView1.ListItems.Add ( 1 ) = "Controlla articolo 1"
Me.ListView1.ListItems.Add ( 2 ) = "Controlla articolo 2"
Me.ListView1.ListItems.Add ( 3) = "Controlla articolo 3"
4 Interruttore
nuovo al vostro form e fare doppio clic su " CommandButton2 "per creare un nuovo evento click di questo pulsante. Aggiungere il seguente codice per scorrere le voci " ListBox " e stampare tutti gli elementi selezionati nella finestra " Immediata" :
contatore = 1 Per Me.ListView1.ListItems.Count
Me . ListView1.ListItems.Item ( contatore ) . Controllato Poi
Debug.Print Me.ListView1.ListItems.Item ( contatore ) . Text
End If
Avanti
5
Passare indietro al form e clicca su " F5 " per eseguire il programma . Fare clic su " CommandButton1 " per popolare il controllo " ListView " e cliccare su " CommandButton2 " per visualizzare gli elementi selezionati .
Programmazione © www.354353.com