Prendi 2 Form

Form1 e Form2

nel Form1 inserisci un Command1 e una ListBox(List1)

nel Form2 inserisci una TextBox(Text1)

codice del form1

Private Sub Command1_Click()
Form2.Show vbModelles
End Sub
Private Sub Form_Load()
List1.OLEDragMode = 1 'automatic
End Sub

codice del form2

Private Sub Form_Load()
Text1.OLEDropMode = 2 'Automatic
End Sub

a questo punto puoi selezionare dalla list1 con il sinistro del mouse e trascinare con il destro del mouse, sia nella text1, che in qualsiasi applicazione che accetta l'OLEDrop

Ciao alla Proxima !!