نشان دادن اطلاعات درلیست باکس [بایگانی]

fanavar

دوشنبه 16 بهمن 1385, 16:35 عصر

لطفا یک راهنمائی درست بکنید؟
چطورمی تونم درفرم براساس فیلد id f اطلاعات داخل لیست باکسم روببینم
خواهشا"جوابم روهمین الان بدین

Payam Moradi

دوشنبه 16 بهمن 1385, 18:16 عصر

من برای TextBox موجود نام txtID قرار دادم و SourceControl اونو هم برداشتم که قابل تایپ بشه. در روال txtIX_BeforeUpdate هم این کدها رو قرار دادم. اکنون با درج مقدار در تکست و فشردن اینتر در صورتی که مقدار داده شده در لیست باشد به آن ردیف میرود در غیر اینصورت به اولین ردیف میرود.

Private Sub txtID_BeforeUpdate(Cancel As Integer)
List6.Recordset.FindFirst "[ID F] = " & txtID
List6.Selected(List6.Recordset.AbsolutePosition) = True
End Sub

امیدوارم مشکلت حل شده باشه.

دوست عزیز توجه داشته اگر کسی در اینجا جواب درست یا غلط و یا دیر جواب داد شما فقط میتونی تشکر نکنی. اینجا کلاس درس رسمی نیست و کسی هم برای یاد دادن و یاد گرفتن تعهدی نداده.

fanavar

پنج شنبه 19 بهمن 1385, 10:23 صبح

سلام دوست عزیر:
می خواستم که اطلاعات درلیست باکس فیلتربشه یعنی فقط شماره روکه درtxtid انتخاب می کنیم درلیست باکس نشون بده یعنی فیلترکنه

Payam Moradi

پنج شنبه 19 بهمن 1385, 12:49 عصر

سلام دوست عزیر:
می خواستم که اطلاعات درلیست باکس فیلتربشه یعنی فقط شماره روکه درtxtid انتخاب می کنیم درلیست باکس نشون بده یعنی فیلترکنه

از طریق کدنویسی میتونی. در رویداد txtID_BeforUpdate قرار بده:

Private Sub txtID_BeforeUpdate(Cancel As Integer)
If isnull(txtid) then
List6.RowSource = "SELECT Query3.[ID F], Query3.تولید, Query3.مصرف, Query3.mande FROM Query3;"
Else
List6.RowSource = "SELECT Query3.[ID F], Query3.تولید, Query3.مصرف, Query3.mande FROM Query3 WHERE (((Query3.[ID F])= " & txtID & "));"
End if
List6.Requery
End Sub

اگر خالی باشه همه رو نشون میده.

(از نامهای فارسی و کارکترهای فاصله و غیره در نام جداول و فیلدها استفاده نکنید. کدنویسی برای خودتون مشکل ساز میشه.)

موفق باشید:چشمک:

fanavar

جمعه 20 بهمن 1385, 02:35 صبح

ممنون ازراهنمائی شما :
اگه لطف کنیدوراه این موردروهم بصورت عملی برام آپلودکنیدسپاسگذارمی شم !
حال اگه بخواهیم زمانیکه هنوزکدی رودرفیلدtxt idواردنکردیم قسمت لیست باکس خالی باشه وهنگام انتخاب کدلیست باکس فقط اونو نشون بده چطور؟

Payam Moradi

جمعه 20 بهمن 1385, 14:35 عصر

ممنون ازراهنمائی شما :
اگه لطف کنیدوراه این موردروهم بصورت عملی برام آپلودکنیدسپاسگذارمی شم !
حال اگه بخواهیم زمانیکه هنوزکدی رودرفیلدtxt idواردنکردیم قسمت لیست باکس خالی باشه وهنگام انتخاب کدلیست باکس فقط اونو نشون بده چطور؟

فناور:

خصوصیت RowSource لیست مربوطه رو از طریق راست کلیک کردن و آوردن Properties پاک کن.
اینم نمونش:چشمک:

Payam Moradi

دوشنبه 23 بهمن 1385, 16:41 عصر

فایل جدید. با نمایش جمع مانده.