Clique e arrasto de objetos com o mouse em um programa que você criou fornece a seus usuários mais flexibilidade. Em um aplicativo Visual Basic , os usuários muitas vezes precisam de adicionar objetos como caminhos e nomes de arquivos para um controle de caixa de lista. Use uma combinação de " DragDrop " e " DragEnter " para lidar com os objetos durante uma operação drag-and -drop . O evento " DragEnter " é disparado quando o cursor do mouse entra o controle eo evento " DragDrop " é usada para manipular os objetos arrastados. Coisas que você precisa
Microsoft Visual Basic Express

Visualizar Mais instruções
1

Abra o Microsoft Visual Basic Express , clique em " New Project ... " no painel esquerdo da tela do computador e selecione " Windows Forms Application ". Clique em " OK".
2

duplo clique em " ListBox " no painel "Toolbox " para adicionar um novo controle de caixa de listagem ao formulário. Direito do mouse no controle de caixa de lista e clique em " Propriedades". Escolha " verdadeiro" ao lado da propriedade " AllowDrop " .
3

duplo clique na caixa de lista para abrir o módulo " Form1.vb " . Clique na caixa drop-down "Evento" e clique em " DragDrop " para criar um novo evento.
4

Copie e cole o seguinte código VB dentro do evento " DragDrop " para adicionar os caminhos de arquivo e nomes para o controle de caixa de lista :

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

Para Cada fileFound as String no myCompFiles

Me.ListBox1.Items.Add ( fileFound )

Próxima
5

Clique na caixa drop-down "Evento" e clique em " DragEnter " para criar um novo evento . Copie e cole o seguinte código VB dentro do evento " DragEnter " :

Se e.Data.GetDataPresent ( DataFormats.FileDrop ) Então

e.Effect = DragDropEffects.Copy

End If
6

Pess "F5" para executar o programa . Abra o "Windows Explorer" , pressionando a tecla do Windows e "E" Clique em um arquivo e arraste o arquivo até a caixa de lista em seu programa , mantendo o botão do mouse.