تور لحظه آخری
امروز : جمعه ، 9 آذر 1403    احادیث و روایات:  امام علی (ع):همیشه جاهل یا افراط گر و تجاوزکار و یا کندرو و تفریط کننده است.
سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون شرکت ها

تبلیغات

تبلیغات متنی

صرافی ارکی چنج

صرافی rkchange

سایبان ماشین

دزدگیر منزل

تشریفات روناک

اجاره سند در شیراز

قیمت فنس

armanekasbokar

armanetejarat

صندوق تضمین

Future Innovate Tech

پی جو مشاغل برتر شیراز

لوله بازکنی تهران

آراد برندینگ

خرید یخچال خارجی

موسسه خیریه

واردات از چین

حمية السكري النوع الثاني

ناب مووی

دانلود فیلم

بانک کتاب

دریافت دیه موتورسیکلت از بیمه

طراحی سایت تهران سایت

irspeedy

درج اگهی ویژه

تعمیرات مک بوک

دانلود فیلم هندی

قیمت فرش

درب فریم لس

زانوبند زاپیامکس

روغن بهران بردبار ۳۲۰

قیمت سرور اچ پی

خرید بلیط هواپیما

بلیط اتوبوس پایانه

قیمت سرور dl380 g10

تعمیرات پکیج کرج

لیست قیمت گوشی شیائومی

خرید فالوور

بهترین وکیل کرج

بهترین وکیل تهران

خرید اکانت تریدینگ ویو

خرید از چین

خرید از چین

تجهیزات کافی شاپ

محصولات فوراور

خرید سرور اچ پی ماهان شبکه

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

همکاری آی نو و گزینه دو

کاشت ابرو طبیعی و‌ سریع

الک آزمایشگاهی

الک آزمایشگاهی

خرید سرور مجازی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

لوله و اتصالات آذین

قرص گلوریا

نمایندگی دوو در کرج

خرید نهال سیب

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

رفع تاری و تشخیص پلاک

پرگابالین

 






آمار وبسایت

 تعداد کل بازدیدها : 1835245391




هواشناسی

نرخ طلا سکه و  ارز

قیمت خودرو

فال حافظ

تعبیر خواب

فال انبیاء

متن قرآن



اضافه به علاقمنديها ارسال اين مطلب به دوستان آرشيو تمام مطالب
archive  refresh

در خواست آموزش سرچ فایل در ویژوال بیسیک -


واضح آرشیو وب فارسی:سایت ریسک: در خواست آموزش سرچ فایل در ویژوال بیسیک DJ_Baba 17 آذر 1386, 00:30سلام من می خواستم با وی بی بتونم فایل سرچ کنم در درایو ها اگه میشه در حد مبتدی باشه the_king 17 آذر 1386, 05:01دستور اصلی که باید استفاده کنید تابع Dir است، اما این دستور دو تا عیب بزرگ داره، اول اینکه فقط یک روتین می تونه در یکزمان ازش استفاده کنه، و اگه دو تا روتین بخواهند هر دو از این تابع استفاده کنند، تداخل پیش میاد. دومین عیب Dir اینه که فقط محتویات یک پوشه را می گرده و کاری به محتویات زیر پوشه های داخلش نداره. مثلا وقتی شما مسیر درایو :C را بهش بدهید، داخل پوشه C:Windows را جستجو نمی کنه. من یک تابع ساختم به اسم SearchFiles که از شما چندین پارامتر را می خواهد : Path مسیری که می خواهید در آن جستجو کنید مثلا : C: C:WINDOWS E:GamesGTA FileName نام فایلی است که دنبالش می گردید، مثلا : *.exe جستجوی فایلهای اجرایی Readme جستجوی فایلهایی که در نام آنها عبارت مورد نظر باشد. a فایلهایی که در نام یا پسوند آنها حرف ای باشد. *.* همه فایلهایی که پسوند دارند. * همه فایلها، چه پسوند داشته باشند و چه نداشته باشند. Files یک آرایه از نوع رشته ای که باید بصورت دینامیک طولش تغییر کنید مثلا : Dim MyFiles() As String فایلهای جستجو شده در این آرایه قرار می گیرند. BaseIndex اندیس اولین فایلی که قرار است در آرایه قرار بگیرد، مقدار متعارف آن صفر است. SubFolders یک مقدار Boolean است، اگر True باشد زیر پوشه ها را هم جستجو می کند. این تابع از یک تابع API ویندوز استفاده می کند به نام PathIsDirectory. PathIsDirectory یک مسیر را از شما می گیرد و مشخص می کند که آیا یک پوشه است یا نه. می توانیم از تابع GetAttr موجود در خود VB هم برای این منظور استفاده کنیم ولی در بعضی از پوشه ها خطای دسترسی به پوشه کار را مشکل می کند. مقدار عددی که تابع برمی گرداند تعداد فایلهایی است که پیدا شده و در آرایه Files هستند. من یک برنامه جستجو را همراه با فایل اجرایی exe بصورت zip شده ضمیمه این پست کردم : DJ_Baba 17 آذر 1386, 23:46فقط میشه بگی من چطوری می تونم وقتی یکی از فایل های پیدا شده را انتخاب کردم با زدن کلید مثلا add اون آدرس رو بفرستم به TextBox؟ the_king 18 آذر 1386, 01:30البته، وقتی شما یکی از سطرهای یک ListBox را انتخاب می کنید، Text مقدار اون سطر را نشون می ده : حالا فرض کنیم که نام ListBox ما LstFiles باشه (در برنامه ای که من نوشتم) و نام TextBox شما Text1 باشه و شما بعد از انتخاب کردن یک فایل، روی دکمه ای کلیک کنید به نام Command 1. Private Sub Command 1_Click() Text1.Text = LstFiles.Text End Sub با این کد محتویات اون سطر انتخاب شده منتقل میشه داخل TextBox. البته من توصیه می کنم که این کد را برای DblClick کردن روی خود ListBox هم تعریف کنید : Private Sub LstFiles_DblClick() Text1.Text = LstFiles.Text End Sub MDP 25 آذر 1386, 00:18vb 6 استاد گفت ولی Net. خیلی راحت تره!:oops:




این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 4122]

bt

اضافه شدن مطلب/حذف مطلب







-


گوناگون

پربازدیدترینها
طراحی وب>


صفحه اول | تمام مطالب | RSS | ارتباط با ما
1390© تمامی حقوق این سایت متعلق به سایت واضح می باشد.
این سایت در ستاد ساماندهی وزارت فرهنگ و ارشاد اسلامی ثبت شده است و پیرو قوانین جمهوری اسلامی ایران می باشد. لطفا در صورت برخورد با مطالب و صفحات خلاف قوانین در سایت آن را به ما اطلاع دهید
پایگاه خبری واضح کاری از شرکت طراحی سایت اینتن