¿ Cómo arrastrar y colocar de un " cuadro de texto " en un control " TreeView " en la aplicación de Visual Basic.NET se puede lograr fácilmente mediante el uso de algunas propiedades de los eventos del ratón. Usted puede utilizar el evento " MouseDown " para realizar un seguimiento cuando el usuario hace clic en el control " TextBox " . Utilice el evento " MouseMove " para ejecutar código cuando el usuario se mueve el ratón sobre el control " TreeView " . Utilizar los eventos " DragDrop " en el control " TreeView " " DragEnter " y para detectar cuando el mouse entra y deja caer la información. Cosas que necesitará
Microsoft Visual Studio
Ver Más instrucciones
1
lanzamiento Microsoft Visual Studio , haga clic en "Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador , y ampliar " Plantillas instaladas . " abajo " Visual Basic" Haga clic en "Windows " y haga doble clic en " Aplicación de Windows Forms " en el centro de la ventana de diálogo para crear un nuevo proyecto.
2
doble clic en " TreeView " para agregar un nuevo control de vista de árbol su formulario. Haga doble clic en " TextBox " para añadir un nuevo cuadro de texto al formulario.
3 Haga clic en el cuadro de texto y haga clic en "Propiedades " para ver la ventana de propiedades . Haz clic en el icono de "Eventos" que se asemeja a una huelga de iluminación, y haga doble clic al lado de " MouseDown " para crear un nuevo evento.
4
Agregue el siguiente código debajo de " Public Class Form1 " para crear un variable global :
mouseDown Private As Boolean = False
5
Dentro del evento " MouseDown " añadir la siguiente línea de código para establecer la variable global en "True : "
mouseDown = True
6
Copia y pega el siguiente código para crear un evento " MouseMove " para el control de cuadro de texto, e iniciar arrastrando :
Private Sub TextBox1_MouseMove ( ByVal remitente como objeto, ByVal e como System.Windows.Forms.MouseEventArgs ) Maneja TextBox1.MouseMove
Si mouseDown Entonces
TextBox1.DoDragDrop ( TextBox1.Text , DragDropEffects.Copy )
< p> End If
mouseDown = False End Sub
7
Copia y pega el siguiente código para crear un evento " DragDrop " para el control " TreeView " , y añadir un nuevo nodo con la información en el cuadro de texto :
TreeView1_DragDrop Sub Private (remitente de ByVal como objeto , ByVal e como System.Windows.Forms.DragEventArgs ) Maneja TreeView1.DragDrop
< p > Me.TreeView1.Nodes.Add ( e.Data.GetData ( DataFormats.Text ))
End Sub
8
Copia y pega el siguiente código para crear un " DragEnter " acontecimientos para el control " TreeView " para mostrar " DragDropEffects : "
Private Sub TreeView1_DragEnter (remitente de ByVal como System.Object , ByVal e como System.Windows.Forms.DragEventArgs ) Maneja TreeView1.DragEnter
< p > Si ( e.Data.GetDataPresent ( DataFormats.Text ) ) Entonces
e.Effect = DragDropEffects.Copy
demás
e.Effect = DragDropEffects.None < br >
End If End Sub
9
Press "F5 " para ejecutar el programa, y escriba el texto en el cuadro de texto. Haga clic en el cuadro de texto y arrastre el ratón sobre el control " TreeView " mientras mantiene presionado el botón del ratón. Suelte el botón del mouse para agregar nuevo nodo.