? Ziehen und Ablegen von einem " TextBox " in eine " TreeView " -Steuerelement in Visual Basic.NET Anwendung kann leicht mit ein paar Maus-Ereignis Eigenschaften erreicht werden. Sie können die " MouseDown " Ereignis zu verfolgen , wenn der Benutzer auf die " TextBox "-Steuerung . Benutzen Sie den " MouseMove "-Ereignis , um Code auszuführen , wenn der Benutzer bewegt die Maus über dem " TreeView "-Steuerung . Benutzen Sie den " DragEnter " und " DragDrop " Ereignisse in der " TreeView "-Steuerung zu erkennen, wenn die Maus betritt und lässt den Informationen . Things You
Microsoft Visual Studio
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Bereich des Bildschirm Ihres Computers , und erweitern " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Windows Forms Application" aus der Mitte der Dialog um ein neues Projekt zu erstellen.
2
Doppelklicken Sie auf " TreeView " , um eine neue Baumansicht Kontrolle zu Ihre Form . Doppelklicken Sie auf " TextBox ", um ein neues Textfeld zu Ihrem Formular hinzuzufügen.
3
rechten Maustaste auf das Textfeld ein, und klicken Sie auf " Eigenschaften", um das Fenster Eigenschaften anzuzeigen. Klicken Sie auf die "Events" -Symbol, das ein Blitzschlag ähnelt , und neben " MouseDown " , um einen neuen Termin zu erstellen doppelklicken.
4
Fügen Sie den folgenden Code unter " Public Class Form1 ", um eine zu erstellen globale Variable :
Privat mouseDown As Boolean = False
5
Innerhalb der " MouseDown " Ereignis den folgenden Code , um die globale Variable gesetzt hinzufügen "Wahre : "
mouseDown = True
6
Kopieren Sie den folgenden Code, um eine " MouseMove "-Ereignis für das Textfeld -Steuerelement zu erstellen , und initiieren ziehen :
private Sub TextBox1_MouseMove (ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs ) Griffe TextBox1.MouseMove
Wenn mouseDown Dann
TextBox1.DoDragDrop ( TextBox1.Text , DragDropEffects.Copy )
< p> End If
mouseDown = False End Sub
7
Kopieren Sie den folgenden Code, um eine " DragDrop " Ereignis für die " TreeView " -Steuerelement zu erstellen , und fügen Sie einen neuen Knoten mit Hilfe der Informationen in das Textfeld-Steuerelement :
private Sub TreeView1_DragDrop (ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs ) Griffe TreeView1.DragDrop
< p > Me.TreeView1.Nodes.Add ( e.Data.GetData ( DataFormats.Text ) )
End Sub
8
Kopieren Sie den folgenden Code, um eine " DragEnter " erstellen Ereignis für die " TreeView "-Steuerung für " DragDropEffects : "
private Sub TreeView1_DragEnter (ByVal sender As System.Object , ByVal e As System.Windows.Forms.DragEventArgs ) Griffe TreeView1.DragEnter
< p > Wenn ( e.Data.GetDataPresent ( DataFormats.Text )) Then
e.Effect = DragDropEffects.Copy
Else
e.Effect = DragDropEffects.None
End If End Sub
9
Presse "F5" auf Ihrem Programm , und geben Sie Text in das Textfeld laufen . Klicken Sie auf das Textfeld , und ziehen Sie mit der Maus auf die " TreeView "-Steuerung , während die Maustaste gedrückt halten . Lassen Sie die Maustaste drücken, um neue Knoten hinzuzufügen .