Microsoft Visual Basic 2005 ( VB5 ) språk tillåter användare att redigera en Windows- form genom att dra och släppa element . De VB5 kontroller är de element på en blankett som ansvarar för utbyte av data med användarprogram . VB5 inkluderar ListBox kontroll för bearbetning dra och släppa användarens åtgärder , när de inträffar . Det visar ikonen för objektet som du drar på en blankett och hämtar data från ett formulär , när du placerar kontroll i ett formulär . Genom att aktivera dra och släpp operationer på användaren bildar du gör det enklare att lägga till nya funktioner i dina VB5 applikationer . Instruktioner
1
Klicka på "Start " i Windows och klicka på " Microsoft Visual Basic 2005 . "
2
Klicka på " Verktyg" i det öppna fönstret för att lägga till en listruta kontroll till standard " Form1 " formen .
3
Ändra " AllowDrop " egendom ListBox kontrollen till "true " i " Egenskaper " fönstret för att låta objekt som ska dras på kontroll .
4
Högerklicka på " Form1 " och klicka sedan på " Visa kod " i
5
Lägg till följande kod under Form1 klassen " Solution Explorer . " :
Private Sub ListBox1_DragEnter ( ByVal avsändare As Object , _
ByVal e Som
System.Windows.Forms.DragEventArgs ) _
Handtag ListBox1.DragEnter
Om ( e.Data.GetDataPresent ( DataFormats.FileDrop ) ) Sen
e.Effect = DragDropEffects.All
Else
e.Effect = DragDropEffects . Inga
End If
End Sub
6
Lägg till följande kod till Form1 klassen :
Private Sub ListBox1_DragDrop ( ByVal avsändaren som Object , _
ByVal e Som
System.Windows.Forms.DragEventArgs ) _
Handtag ListBox1.DragDrop
Dim s ( ) As String = e.Data.GetData ( " FileDrop " , False ) katalog
Dim I As Integer
För i = 0 Till s.Length - 1
ListBox1.Items.Add ( s ( i) ) katalog
Nästa jag
End Sub
att hantera utsläpp av dra händelsen .
7
Klicka på " File " och klicka sedan på " Spara " för att göra det möjligt för drag-n - drop -funktion på Windows-formulär i Visual Basic 2005 -programmet .
