Trascinamento della selezione da un "TextBox" in un controllo "TreeView" nell'applicazione Visual Basic.NET può essere facilmente realizzati utilizzando alcune proprietà di evento del mouse. È possibile utilizzare l'evento "MouseDown" per tenere traccia di quando l'utente fa clic sul controllo "TextBox". Utilizzare l'evento "MouseMove" per eseguire il codice quando l'utente sta spostando il mouse al controllo "TreeView". Utilizzare gli eventi "DragEnter" e "DragDrop" nel controllo "TreeView" per rilevare quando il mouse entra e scende le informazioni.

Istruzioni

1

Avviare Microsoft Visual Studio, fare clic su "Nuovo progetto" dal riquadro sinistro dello schermo del computer ed espandere "Visual Basic" sotto "Modelli installati." Fare clic su "Windows" e fare doppio clic su "Windows Forms Application" dal centro della finestra di dialogo per creare un nuovo progetto.

2

Fare doppio clic su "TreeView" per aggiungere un nuovo controllo TreeView al form. Fare doppio clic su "TextBox" per aggiungere una nuova casella di testo al form.

3

Pulsante destro del mouse la casella di testo e fare clic su "Proprietà" per visualizzare la finestra Proprietà. Fare clic sull'icona di "Eventi" che assomiglia a uno sciopero di illuminazione e fare doppio clic su accanto a "MouseDown" per creare un nuovo evento.

4

Aggiungere il codice seguente sotto "Public Class Form1" per creare una variabile globale:

Private mouseDown As Boolean = False

5

All'interno della manifestazione "MouseDown" aggiungere la seguente riga di codice per impostare la variabile globale "vero:"

mouseDown = True

6

Copiare e incollare il codice seguente per creare un evento "MouseMove" per il controllo casella di testo e avviare il trascinamento:

Private Sub TextBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Maniglie TextBox1.MouseMove

If mouseDown Then

TextBox1.DoDragDrop(TextBox1.Text, DragDropEffects.Copy)

End If

mouseDown = False

End Sub7

Copiare e incollare il codice seguente per creare un evento "DragDrop" per il controllo "TreeView" e aggiungere un nuovo nodo utilizzando le informazioni nel controllo casella di testo:

Private Sub TreeView1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) maniglie TreeView1.DragDrop

Me.TreeView1.Nodes.Add(e.Data.GetData(DataFormats.Text))

End Sub8

Copiare e incollare il codice seguente per creare un evento "DragEnter" per il controllo di "TreeView" mostrare "DragDropEffects:"

Private Sub TreeView1_DragEnter(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) maniglie TreeView1.DragEnter

If (e.Data.GetDataPresent(DataFormats.Text)) Then

e.Effect = DragDropEffects.Copy

Else

e.Effect = DragDropEffects.None

End If

End Sub9

Premere "F5" per eseguire il programma e digitare il testo nella casella di testo. Fare clic sulla casella di testo e trascinare il mouse sopra al controllo "TreeView" tenendo premuto il pulsante del mouse. Rilasciare il pulsante del mouse per aggiungere il nuovo nodo.