Selección mediante clic y arrastre de objetos con el ratón en un programa que ha creado proporciona a los usuarios una mayor flexibilidad. En una aplicación de Visual Basic, los usuarios a menudo necesitan agregar objetos tales como rutas y nombres de archivos en un control de cuadro de lista. Use una combinación de " DragDrop " y " DragEnter " para manejar objetos durante una operación de arrastrar y soltar. El evento " DragEnter " se produce cuando el cursor del ratón entra en el control, y el evento " DragDrop " se utiliza para manejar los objetos arrastrados . Cosas que necesitará
Microsoft Visual Basic Express
Ver Más instrucciones
1
lanzamiento Microsoft Visual Basic Express , haga clic en "Nuevo proyecto ... " en el panel izquierdo de la pantalla del ordenador y seleccione " Aplicación de Windows Forms ". Haga clic en " Aceptar".
2
doble clic en " ListBox " en el panel "Toolbox" para añadir un nuevo control de cuadro de lista al formulario. Haga clic en el control de cuadro de lista y haga clic en " Propiedades". Elija "True" junto a la propiedad " AllowDrop " .
3
doble clic en el cuadro de lista para abrir el módulo " Form1.vb " . Haga clic en el cuadro desplegable "Evento" y haga clic en " DragDrop " para crear un nuevo evento.
4
Copia y pega el siguiente código VB dentro del evento " DragDrop " para añadir las rutas de archivos y nombres a la lista de control de caja:
myCompFiles Dim As String () = CType ( e.Data.GetData ( DataFormats.FileDrop ) , String ( ))
For Each fileFound As String En myCompFiles
Me.ListBox1.Items.Add ( fileFound )
Siguiente
5
Haga clic en el cuadro desplegable "Evento " y haga clic en " DragEnter " para crear una nueva evento. Copia y pega el siguiente código VB dentro del evento " DragEnter ":
Si e.Data.GetDataPresent ( DataFormats.FileDrop ) Entonces
e.Effect = DragDropEffects.Copy
< p > End If
6
Pess "F5 " para ejecutar el programa. Abrir el "Explorador de Windows" pulsando la tecla Windows y la letra "E " Haga clic en un archivo y arrastre el archivo a la lista de su programa mientras mantiene pulsado el botón del ratón.
