Microsoft Visual Basic 2005 ( VB5 ) språket tillater brukere å redigere et Windows-skjema ved å dra og slippe elementer . De VB5 kontrollene er elementene på en form som er ansvarlig for utveksling av data med brukerprogram . VB5 inkluderer Liste- kontroll for behandling dra og slippe brukerens handlinger , når de oppstår . Det viser ikonet for objektet som du drar på et skjema og henter data fra et skjema , når du plasserer kontroll i et skjema . Ved å aktivere dra og slipp operasjoner på brukerens skjemaer du gjøre det enklere å legge til nye funksjoner i dine VB5 applikasjoner. Instruksjoner
en

Klikk "Start" i Windows og klikk på " Microsoft Visual Basic 2005 . "
2

Klikk " Toolbox" i det åpne vinduet for å legge en ListBox kontroll til standard " Form1 " form .
3

Endre " AllowDrop " eiendom Liste- kontrollen til "true" i " Properties" vinduet for å tillate objekter som skal dras inn på kontroll .
4

Høyreklikk på " Form1 " og deretter " Vis kode" i
5

Legg til følgende kode under Form1 class " Solution Explorer ". :

Private Sub ListBox1_DragEnter ( ByVal avsenderen som objekt , _

ByVal e Som

System.Windows.Forms.DragEventArgs ) _

Handles ListBox1.DragEnter
p Hvis ( e.Data.GetDataPresent ( DataFormats.FileDrop ) ) Så

e.Effect = DragDropEffects.All

Else

e.Effect = DragDropEffects . Ingen

End If

End Sub
6

Legg til følgende kode i Form1 klasse : en

Private Sub ListBox1_DragDrop ( ByVal avsenderen som objekt , _

ByVal e Som

System.Windows.Forms.DragEventArgs ) _

Handles ListBox1.DragDrop

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

Dim i As Integer

For i = 0 For å s.Length - en

ListBox1.Items.Add ( s ( i) )

Neste i

End Sub

å håndtere utgivelsen av drag hendelsen.
7

Klikk på " File" og klikk deretter på " Lagre " for å aktivere dra- n-drop funksjonen på Windows-skjema i Visual Basic 2005 programmet .