انتخاب یک مورد در لیست باکس و نمایش مقدار در تکست باکس

[wolfstander]

سلام به همه دوستان
من میخوام در یک فرم ، وقتی در لیست باکس خودم روی سطری کلیک میکنم و اون رو انتخاب میکنم ، با استفاده از یک دکمه ،مقدار اولین فیلد از ردیف انتخاب شده (ID)رو برداره و در یک تکست باکس قرار بده
فایل ضمیمه در همین مورده
البته یک راه حل این بود که من فقط فیلد ID رو با استفاده از فرم وصل میکردم به جدول و با کلیک روی لیست باکس ، اون مورد رو برمیداشتم.
ولی چون این بخشی از یک برنامه بزرگتره که توش برای راحتی کار میخوام بعد از Event دابل کلیک ، مورد رو بخونه و بریزه تو یه متغیر و برگرده به فرم قبلی ؛ ممنون میشیم که راهنمایی بفرمایید
فایل اکسس هم ضمیمه شده

[dadsara]

سلام
اگر دو تکست باکس با شماره های 3 و 5 برروی فرم داشته باشیم از کد زیر استفاده کنید
Private Sub List0_DblClick(Cancel As Integer)
Me.Text3 = Me.List0.Column(1)
Me.Text5 = Me.List0.Column(2)
End Sub