Microsoft Basic 2005 (VB5) linguaggio Visual consente agli utenti di modificare una forma di Windows trascinando gli elementi. I controlli VB5 sono gli elementi su un modulo responsabile per lo scambio di dati con l'applicazione utente. VB5 comprende il controllo ListBox per l'elaborazione di trascinare e rilasciare le azioni degli utenti, quando si verificano. Si visualizza l'icona dell'oggetto che si trascina su un modulo e recupera i dati da un modulo, quando si posiziona il controllo di una maschera. Consentendo operazioni di trascinamento sui moduli utente si rendono più facile per aggiungere nuove funzioni nelle applicazioni VB5.

istruzione

1 Fai clic su "Start" di Windows e fare clic su "Microsoft Visual Basic 2005."

2 Fai clic su "Strumenti" nella finestra aperta per aggiungere un controllo ListBox al "Form1" modulo predefinito.

3 Modificare il "AllowDrop" proprietà del controllo ListBox su "True" nella finestra "Proprietà" per consentire agli oggetti di essere trascinati sul controllo.

4 Right-click "Form1" e poi cliccare su "Visualizza codice" in "Esplora soluzioni."

5 Aggiungere il seguente codice al di sotto della classe Form1:

Private Sub ListBox1

DragEnter (ByVal sender As Object,

ByVal e As

System.Windows.Forms.DragEventArgs) _

Handles ListBox1.DragEnter

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

e.Effect = DragDropEffects.All

Altro

e.Effect = DragDropEffects.None

Finisci se

End Sub 6 Aggiungere il seguente codice alla classe Form1:

Private Sub ListBox1

DragDrop (ByVal sender As Object,

ByVal e As

System.Windows.Forms.DragEventArgs) _

Handles ListBox1.DragDrop

s Dim () come stringa = e.Data.GetData ( "FileDrop", False)

Dim i As Integer

Per i = 0 Per s.Length - 1

ListBox1.Items.Add (s (i))

Next i

End Sub

per gestire il rilascio di evento di trascinamento.

7 Fai clic su "File" e poi su "Salva 'per abilitare la funzione drag-n-drop sul modulo di Windows nel programma Visual Basic 2005.