Microsoft Basic 2005 ( VB5 ) linguagem Visual permite aos usuários editar um formulário do Windows , arrastando e soltando elementos. Os controles VB5 são os elementos de uma forma responsável para a troca de dados com a aplicação do usuário. VB5 inclui o controle de caixa de listagem para o processamento de arrastar e soltar as ações do usuário , quando eles ocorrem. Ela exibe o ícone do objeto que você arrasta em uma forma e recupera os dados de um formulário , quando você coloca o controle em um formulário . Ao permitir que as operações de arrastar e soltar nos formulários de usuário que você torná-lo mais fácil de adicionar novas funções em suas aplicações VB5 . Instruções
1
Clique em " Iniciar" do Windows e clique em " Microsoft Basic 2005 . Visual "
2
Clique em " Ferramentas " na janela aberta para adicionar um controle ListBox para o padrão de formulário " Form1 " .
3
Altere a propriedade " AllowDrop " do controle ListBox como "True " em " Propriedades" janela para permitir que objetos sejam arrastados para o controle .
4
botão direito do mouse " Form1 " e clique em " View Code" em
5
Adicione o seguinte código abaixo da classe Form1 " Solution Explorer ". :
Private Sub listBox1_DragEnter (sender As Object , _
ByVal e As
System.Windows.Forms.DragEventArgs ) _
alças ListBox1.DragEnter
Se ( e.Data.GetDataPresent ( DataFormats.FileDrop ) ) Então
e.Effect = DragDropEffects.All
Else
e.Effect = DragDropEffects . Nenhum
End If End Sub
6
Adicione o seguinte código à classe Form1:
Sub listBox1_DragDrop privada (sender Object, _
ByVal e As
System.Windows.Forms.DragEventArgs ) _
alças ListBox1.DragDrop
Dim s () As string = e.Data.GetData ( " FileDrop " , False)
Dim i As Integer
For i = 0 To s.length - 1
ListBox1.Items.Add ( s (i))
Next i End Sub
para lidar com o lançamento do evento de arrastar .
7
Clique em " Arquivo" e em seguida, clique em "Salvar " para ativar a função de drag- n -drop no formulário do Windows em seu programa Visual Basic 2005.
