lancio di Microsoft Visual Basic Express Edition , fare clic su " Nuovo progetto ... " dal riquadro sinistro della schermata del computer e selezionare "Applicazione Windows Form ". Fare clic su " OK ".
2
doppio clic su " ListBox " dal riquadro " Casella degli strumenti " per aggiungere un nuovo controllo casella di riepilogo al form. Fare clic con il controllo casella di riepilogo e fare clic su "Proprietà ". Scegliere "True" accanto alla proprietà " AllowDrop " .
3
doppio clic sulla casella di riepilogo per aprire il modulo " Form1.vb " . Fare clic sulla casella a discesa "Evento" e fare clic su " DragDrop " per creare un nuovo evento .
4
Copia e incolla il seguente codice VB all'interno della manifestazione " DragDrop " per aggiungere i percorsi dei file e delle al controllo casella di riepilogo :
Dim myCompFiles As String ( ) = CType ( e.Data.GetData ( DataFormats.FileDrop ) , String ( ) ) per
Ogni fileFound As String In myCompFiles
Me.ListBox1.Items.Add ( fileFound ) per
Successivo
5 Fare clic sulla casella a discesa "Evento" e fare clic su " DragEnter " per creare un nuovo evento . Copiare e incollare il seguente codice VB all'interno della manifestazione " DragEnter " :
e.Data.GetDataPresent ( DataFormats.FileDrop ) Poi
e.Effect = DragDropEffects.Copy
End If
6
Pess "F5" per eseguire il programma . Aprire " Esplora risorse " premendo il tasto Windows e " E. " Fare clic su un file e trascinare il file sopra alla casella di riepilogo nel programma tenendo premuto il pulsante del mouse .
Programmazione © www.354353.com