Faydalı olmasını dilerim...

[Resim: http://www.access-sql.com/attachment.php?aid=10065]

[code=vba]
Private mobjSourceNode As Node
Private mobjTargetNode As Node

Private Sub Form_Load()
Set mobjSourceNode = Nothing
Set mobjTargetNode = Nothing

With Me.TreeView0
'Treeview için gerekli ayarları yap
.ImageList = Me.ImageList1.Object
.LabelEdit = tvwManual
.LineStyle = tvwRootLines
.Style = tvwTreelinesPlusMinusPictureText
.Font.

Arkadaşlar merhaba;
ek olarak hazırladığım örnek çalışmamdaki formda yapmak istediğim olay şu;
öğrenci listesinden ikişer eleman seçerek bunları sürükle-bırak (Drag-Drop) yöntemi ile formdaki listbox şeklinde yer alan dersliklere aktarmak.
bunlar yapılırken seçtiğim öğrenciler öğrenci liste kutusundan da silinsin. derslik liste kutusundan öğrenci1 sütununa ilk gelen eleman, öğrenci2 sütununa da ikinci eleman kaydedilecek.

buradaki olayı şöyle düşünün; 10 derslik var ve aynı anda bu 10 d