Migration de vb net en vb6

Signaler
Messages postés
52
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
7 mars 2010
-
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
-
Bonsoir a tous,
J'ai trouvé sur vbfrance un bout de code en vb net mais je voudrais le mettre en vb6, seulement je ne connais pas les fonctions qui correspondent. Pouvez vous m'aider?

 Private Sub TreeView1_ItemDrag(ByVal sender As Object, _
             ByVal e As System.Windows.Forms.ItemDragEventArgs) Handles TreeView1.ItemDrag
  Dim S1 As String
  Dim nd As TreeNode
  nd = e.Item
  S1 = nd.Text
  'Defini le noeud a deplacer et initialize le Drag an Drop
  'e.item est le noeud
  'e.item.text ne fonctionne pas , nd.text fonctionne ,...pourquoi ??
  DoDragDrop(S1, DragDropEffects.Move Or DragDropEffects.Copy)
 End Sub



 Private Sub ListBox1_DragEnter(ByVal sender As Object, _
                 ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox1.DragEnter
  'Controle de type de donnée a entrer dans le Listbox
  If e.Data.GetDataPresent(DataFormats.Text) Then
   e.Effect = DragDropEffects.Copy
  Else
   e.Effect = DragDropEffects.None
  End If
 End Sub



 Private Sub ListBox1_DragDrop(ByVal sender As Object, _
                  ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox1.DragDrop
  Dim S1 As String
  Dim i1 As Integer
  '
  S1 = e.Data.GetData(DataFormats.Text)
  ListBox1.Items.Add(S1)
  'ici on a parlé de copy
  'pour move(=deplacer) on peu ecrire
  i1 = ListBox1.FindStringExact(S1)
  'Listbox1.items.RemoveAt(i1)
 End Sub


End Class

3 réponses

Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
41
salut,

regarde dans les sources VB6...

autant tout ce qui est faisable en VB6 est faisable en VB.NET, autant pas forcément l'inverse

tutoriel VB6 avec 3 exemples drag & drop (je crois) :
http://www.vbfrance.com/code.aspx?ID=34236

++
[hr]
Messages postés
52
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
7 mars 2010

Merci du lien, mais cela ne m'aide que très peu.
Je veut faire un drag and drop a partir d'un element selectionné dans le treeview pour le mettre dans une listview mais je n'y arrive pas.
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
74
C'est si compliqué que ça de taper "drag drop treeview listview" dans la recherche des codes pas en .net ?
Un Drag and Drop, que ce soit sur un TreeView ou une ListView, cela ne change pas grand chose.
C'est le principe qu'il faut comprendre, pas forcemment trouver ici le code exact.