Microsoft Visual Basic 2005 ( VB5 ) Sprache ermöglicht es Benutzern, ein Windows-Formular per Drag & Drop Elemente bearbeiten. Die VB5 Kontrollen sind die Elemente auf einer Form , die für den Austausch von Daten mit dem Anwenderprogramm . VB5 umfasst das ListBox-Steuerelement für die Verarbeitung von Drag & Drop Aktionen des Benutzers , wenn sie auftreten . Es zeigt das Symbol des Objekts, das Sie auf einem Formular ziehen und ruft die Daten aus einem Formular , wenn Sie das Steuerelement auf einem Formular platzieren. Durch die Aktivierung per Drag -and-Drop -Operationen auf den Benutzer bildet Sie machen es leichter, neue Funktionen in Ihrem VB5 Anwendungen hinzuzufügen. Anleitung
1
Klicken Sie auf " Start" in Windows und klicken Sie auf "Microsoft Visual Basic 2005. "
2
Klicken Sie auf " Toolbox " in dem geöffneten Fenster ein ListBox-Steuerelement hinzufügen auf den Standardwert " Form1 " Form .
3
ändern Sie den " AllowDrop " -Eigenschaft des ListBox-Steuerelement auf "True" im Fenster "Eigenschaften" , um Objekte auf das Steuerelement gezogen werden .
4
rechten Maustaste auf " Form1 " und klicken Sie dann auf " Code anzeigen " in
5
Fügen Sie den folgenden Code unter der Klasse Form1 " Explorer ". :
private Sub ListBox1_DragEnter (ByVal sender As Object, _ ByVal e
Wie
System.Windows.Forms.DragEventArgs ) _
Griffe ListBox1.DragEnter
( e.Data.GetDataPresent ( DataFormats.FileDrop )) Then
e.Effect = DragDropEffects.All
Else
e.Effect = DragDropEffects . Keine
End If End Sub
6
Fügen Sie den folgenden Code in die Klasse Form1 : private Sub
ListBox1_DragDrop (ByVal sender As Object, _ ByVal e
Wie
System.Windows.Forms.DragEventArgs ) _
Griffe ListBox1.DragDrop
Dim s () As String = e.Data.GetData ( " FileDrop " , False)
Dim i As Integer
For i = 0 To s.Length - 1 of
ListBox1.Items.Add ( s ( i))
Next i End Sub
um die Freisetzung von Drag -Ereignis behandelt .
7
Klicken Sie auf " Datei" und klicken Sie dann auf " Speichern", um die Drag -n- Drop-Funktion auf dem Windows- Formular in Ihrem Visual Basic 2005 -Programm zu ermöglichen.