Microsoft Visual Basic 2005 ( VB5 ) linguaggio permette agli utenti di modificare un modulo di Windows trascinando gli elementi . I controlli VB5 sono gli elementi di una forma responsabile per lo scambio di dati con l' applicazione utente . VB5 include il controllo ListBox per l'elaborazione trascinando le azioni dell'utente , quando si verificano. Si visualizza l'icona dell'oggetto che si trascina su un modulo e recupera i dati da un modulo , quando si inserisce il controllo in una maschera . Abilitando le operazioni di drag and drop per l'utente le forme si fanno più facile aggiungere nuove funzioni nelle applicazioni VB5 . Istruzioni
1

Fare clic su " Start" di Windows e fare clic su " Microsoft Visual Basic 2005 . "
2

Clicca su " Strumenti " nella finestra aperta per aggiungere un controllo ListBox al form predefinito " Form1 " .
3

Modificare la proprietà " AllowDrop " del controllo ListBox a "True" nella finestra " proprietà" per consentire agli oggetti di essere trascinati sul controllo .
4

destro del mouse su " Form1 " e quindi fare clic su " Visualizza codice " in
5

Aggiungere il seguente codice al di sotto della classe Form1 " Solution Explorer ". :

private Sub ListBox1_DragEnter ( ByVal sender As Object , _

ByVal e As

System.Windows.Forms.DragEventArgs ) _

Maniglie ListBox1.DragEnter

( e.Data.GetDataPresent ( DataFormats.FileDrop )) Then

e.Effect = DragDropEffects.All

Else

e.Effect = DragDropEffects . Nessuno

End If End Sub

6

Aggiungere il codice seguente alla classe Form1 :

privato ListBox1_DragDrop Sub ( ByVal sender As Object, _

ByVal e As

System.Windows.Forms.DragEventArgs ) _

Maniglie ListBox1.DragDrop

Dim s ( ) As String = e.Data.GetData ( " FileDrop " , False ) per

Dim i As Integer

For i = 0 To s.length - 1

ListBox1.Items.Add ( s ( i) ) per

Next i

End Sub

per gestire il rilascio di evento di trascinamento .
7

Fare clic su " File" e quindi cliccate su " Salva ' per abilitare la funzione drag-n -drop sul modulo di Windows nel vostro programma di Visual Basic 2005 .

• Come utilizzare la barra di avanzamento in VB 
• Come invertire i numeri su Visual Basic