ubiquitour.com

Cómo hacer clic y arrastrar objetos en Visual Basic

Cómo hacer clic y arrastrar objetos en Visual Basic

Hacer clic y arrastrar objetos con el ratón en un programa que has creado proporciona los usuarios mayor flexibilidad. En una aplicación de Visual Basic, los usuarios necesitan a menudo agregar objetos tales como nombres de archivos y rutas de acceso a un control de cuadro de lista. Utilice una combinación de "DragDrop" y "DragEnter" para manipular objetos durante una operación de arrastrar y colocar. El evento "DragEnter del" se produce cuando el cursor del ratón entra en el control y el evento "DragDrop" se utiliza para manejar los objetos arrastrados.

Instrucciones

1 Inicie 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 Haga doble clic en el "ListBox", desde el panel "Toolbox" para agregar un nuevo control de cuadro de lista al formulario. Haga clic en el control de cuadro de lista y haga clic en "Propiedades". Seleccione "True" junto a la propiedad "AllowDrop del".

3 Haga doble clic en el cuadro de lista para abrir el módulo "Form1.vb". Haga clic en el desplegable de "Evento" cuadro y haga clic en "DragDrop" para crear un nuevo evento.

4 Copie y pegue el siguiente código VB dentro del evento "DragDrop" para agregar los nombres y rutas de archivo para el control de cuadro de lista:

Dim myCompFiles como String() = CType(e.Data.GetData(DataFormats.FileDrop), String())

For Each fileFound As String In myCompFiles

Me.ListBox1.Items.Add(fileFound)

Next5

Haga clic en el desplegable de "Evento" cuadro y haga clic en "DragEnter" para crear un nuevo evento. Copie y pegue el siguiente código VB dentro del evento "DragEnter":

Si e.Data.GetDataPresent(DataFormats.FileDrop) entonces

e.Effect = DragDropEffects.Copy

End If6

PESS "F5" para ejecutar el programa. Abra "explorador de Windows" pulsando la tecla Windows y "e". Haga clic en un archivo y el archivo al cuadro de lista en tu programa mientras mantiene el botón del ratón.