View Full Version : انتخاب لیست به دلخواه کاربر و برگشت آن
sinas1386
سه شنبه 21 خرداد 1387, 11:14 صبح
با سلام خدمت دوستان عزیز
دوستان لطف کنند و نمونه فرم را نگاه کنند آیا امکان دارد که مثلا کاربر از لیست سمت راست انتخاب و انتقال آن به لیست سمت چپ (به دلخواه ) و بالعکس و هنگام انتقال هر کدام از لیست یک پیغام طاهر شود مبنی بر راینکه لیست به سمت چپ انتقال داده شد
لطفا کمک کنید
shaghaghi
سه شنبه 21 خرداد 1387, 14:25 عصر
سلام
Private Sub cmdAdd_Click()
If Nz(List0.Value) = vbNullString Then Exit Sub
List2.RowSource = List0.Value & ";" & List2.RowSource
List0.RemoveItem List0.Value
List0.Value = ""
End Sub
Private Sub cmdRemove_Click()
If Nz(List2.Value) = vbNullString Then Exit Sub
List0.RowSource = List2.Value & ";" & List0.RowSource
List2.RemoveItem List2.Value
List2.Value = ""
End Sub
mahdif123
چهارشنبه 22 خرداد 1387, 09:21 صبح
با سلام
به اين لينك هم مراجعه كن خواسته ات را برآورده مي كند . تايپيك اميرزاده برنامه اي جامع را گذاشته اند مي تواني دانلود كني .
نام فرم frmDragDropListBoxes مي باشد .
--------------------------------
http://barnamenevis.org/forum/showthread.php?t=87658
dadsara
چهارشنبه 22 خرداد 1387, 11:06 صبح
باسلام خدمت جنابعالی
دوست عزیز فکر کنم لینک را اشتباه نوشته ای
mahdif123
چهارشنبه 22 خرداد 1387, 11:18 صبح
با سلام
لينك اشتباه نيست . اگر قسمت ((نمونه فرم جامع براي نحوه كار كردن با فرمها)) بروي و لينك مربوطه را دانلود كني و فرمي كه گفتم را باز كني ، مي تواني از آن استفاده كني .
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.