Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come creare Click & trascinare gli oggetti in Visual Basic

Selezione e trascinamento di oggetti con il mouse in un programma che hai creato fornisce agli utenti una maggiore flessibilità . In un'applicazione Visual Basic , gli utenti hanno spesso bisogno di aggiungere oggetti come i percorsi ei file di nomi a un controllo casella di riepilogo . Utilizzare una combinazione di " DragDrop " e " DragEnter " per gestire gli oggetti nel corso di una operazione di drag-and -drop . L'evento " DragEnter " viene generato quando il puntatore del mouse entra nell'area del controllo , e l'evento " DragDrop " è utilizzato per gestire gli oggetti trascinati . Cose che ti serviranno
Microsoft Visual Basic Express
Mostra più istruzioni
1

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