[حل شده] لیست باکس

[sma4727134]

با سلام خدمت اساتید و دوستان گرامی در فایل پیوست دستوری لازم دارم که با زدن یک عدد در تکست باکس ردیف متناظر با آن عدد در لیست باکس انتخاب و نشان داده شود

[sma4727134]

با سلام شرمنده نتونستم فایلم رو آپلود کنم همانطور که گفتم می خوام مثلا با نوشتن عدد 5 د رتکست باکس ردیف پنج را در لیست باکس انتخاب و نشان دهد
ممنون

[Amir Ghasemiyan]

با سلام شرمنده نتونستم فایلم رو آپلود کنم همانطور که گفتم می خوام مثلا با نوشتن عدد 5 د رتکست باکس ردیف پنج را در لیست باکس انتخاب و نشان دهد
ممنون

فايلتون رو زيپ كنيد و ارسال كنيد

[sma4727134]

با سلام شرمنده دیر شد الان تونستم فایل را آپلود کنم

[Amir Ghasemiyan]

سلام دوست عزيز
اگر سوالتون رو درست متوجه شده باشم اين كد ميتونه كمكتون كنه

Private Sub TextBox1_Change()
On Error Resume Next
x = CInt(TextBox1.Value) - 1
If x > 0 Then ListBox1.ListIndex = x
End Sub

[sma4727134]

با تشکر از جناب قاسمیان بابت راهنماییشان