Klicken und Ziehen von Objekten mit der Maus in einem Programm, das Sie erstellt haben, bietet Ihren Benutzern mehr Flexibilität. In einer Visual Basic-Anwendung , Anwender müssen oft Objekte wie Pfade und Dateinamen zu einem Listenfeld-Steuerelement hinzuzufügen. Verwenden Sie eine Kombination von " DragDrop " und " DragEnter " , um Objekte während eines Drag -and- Drop-Operation zu behandeln. Die " DragEnter " -Ereignis wird ausgelöst , wenn der Mauszeiger die Kontrolle eintritt, und die " DragDrop " Ereignis wird verwendet, um die Objekte zu behandeln gezogen . Things You
Microsoft Visual Basic Express
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Basic Express, klicken Sie auf " Neues Projekt ... " aus dem linken Bereich Ihres Bildschirms und wählen Sie "Windows Forms-Anwendung. " Klicken Sie auf " OK".
2
Doppelklicken Sie auf " ListBox " aus der " Toolbox " Fenster, um eine neue Liste -Steuerelement zum Formular hinzufügen . Rechten Maustaste auf das Listenfeld und klicken Sie auf "Eigenschaften". Wählen Sie "Wahr" neben dem " AllowDrop " Eigenschaft .
3
Doppelklicken Sie auf das Listenfeld, um die " Form1.vb "-Modul zu öffnen. Klicken Sie auf das "Event " Drop-Down -Box und klicken Sie auf " DragDrop ", um einen neuen Termin zu erstellen.
4
Kopieren Sie den folgenden Code innerhalb der VB " DragDrop " Ereignis, um die Datei-Pfade und Namen hinzufügen dem Listenfeld :
Dim myCompFiles As String () = CType ( e.Data.GetData ( DataFormats.FileDrop ) , String ())
For Each fileFound As String In myCompFiles
Me.ListBox1.Items.Add ( fileFound )
Weiter
5
Klicken Sie auf das "Event " Drop-Down -Box und klicken Sie auf " DragEnter ", um eine neue zu erstellen Veranstaltung. Kopieren Sie den folgenden Code innerhalb der VB " DragEnter " event:
Wenn e.Data.GetDataPresent ( DataFormats.FileDrop ) Dann
e.Effect = DragDropEffects.Copy
< p > End If
6
Pess "F5" , um das Programm zu starten . Öffnen Sie "Windows Explorer " durch Drücken der Windows-Taste und " E. " Klicken Sie auf eine Datei, und ziehen Sie die Datei über das Listenfeld in Ihr Programm mit gedrückter Maustaste.