کاربری
کاربر گرامی به خوش آمدید . اگر این نخستین بازدید شما از سایت است , لطفا ثبت نام کنید:
صفحه 1 از 4 123 ... آخرینآخرین
نمایش نتایج: از شماره 1 تا 30 , از مجموع 120
  1. #1
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض برنامه نویسی ویژوال بیسیک

    سوالات برنامه نویسی ویژوال بیسیک خود را در اینجا مطرح کنید تا کسانی که قادر به پاسخگویی هستند به سوالتان پاسخ دهند
    یا زهرا
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  2. 5 کاربر از پست مفید سائل الزهرا تشکر کرده اند .


  3. #2
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض بسته نشدن نرم افزار از تب prossesor در task mgr

    سلام
    میخوام کاری کنم که نرم افزاری که میسازم از طریق وِیژوال بیسیک بسته نشه
    مثل نرم افزارای خود ویندوز که وقتی از طریق تب


    چطوری میتونم نرم افزارمو اینطوری کنم
    با تشکر از همه دوستان
    prossesor در task manager میخوایم ببندیمشون میگه access is denied
    ویرایش توسط سائل الزهرا : سه شنبه ۲۰ اردیبهشت ۹۰ در ساعت ۱۴:۴۴
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  4. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  5. #3
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۳-آبان-۰۸
    محل سکونت
    شیراز
    جنسيت
    خواهر
    سن
    -1989
    نوشته ها
    3,760
    امتیاز : 67,140
    سطح : 100
    Points: 67,140, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialRecommendation Second ClassVeteranTagger Second Class50000 Experience Points
    تشکر کردن : 8,821
    تشکر شده 14,241 در 3,398 پست
    مخالفت
    16
    مخالفت شده 3 در 2 پست

    پیش فرض

    احیانا قصد دارین ویروس بنویسین؟
    ویرایش توسط مهاجر : سه شنبه ۲۰ اردیبهشت ۹۰ در ساعت ۱۵:۵۷
    .

  6. 2 کاربر از پست مفید مهاجر تشکر کرده اند .


  7. #4
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    Lightbulb app.taskvisible=false

    نوشته اصلی توسط سائل الزهرا نمایش پست اصلی
    سلام
    میخوام کاری کنم که نرم افزاری که میسازم از طریق وِیژوال بیسیک بسته نشه
    مثل نرم افزارای خود ویندوز که وقتی از طریق تب


    چطوری میتونم نرم افزارمو اینطوری کنم
    با تشکر از همه دوستان
    prossesor در task manager میخوایم ببندیمشون میگه access is denied

    سلام - میشه سوالت رو بهتر مطرح کنی ؟
    ------------------------------------------------------
    اگر منظورت اینه که برنامه در task manager نشون داده نشه کافیه که در فرم لود برنامه بنویسی :
    app.taskvisible=false

    موفق باشی - ایوب سیستم !!!
    ویرایش توسط Ayoub_system : پنجشنبه ۱۹ خرداد ۹۰ در ساعت ۱۲:۲۹

  8. 3 کاربر از پست مفید Arad تشکر کرده اند .


  9. #5
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    نوشته اصلی توسط auuob_2007 نمایش پست اصلی



    سلام - میشه سوالت رو بهتر مطرح کنی ؟
    ------------------------------------------------------
    اگر منظورت اینه که برنامه در task manager نشون داده نشه کافیه که در فرم لود برنامه بنویسی :
    app.taskvisible=false

    موفق باشی - ایوب سیستم !!!
    سلام
    نه
    بعضی از پروسه های ویندوز مثل
    lsass
    یا
    csrss
    یا حتی انواع ویروس
    به هیچ طریقی بسته(end prosses) نمیشن
    در واقع به یک نقطه قفل میشن و اوّل باید اون نقطه رو از کار انداخت
    چطوری میتونم ویروسم رو اینطوری کنم
    ویرایش توسط سائل الزهرا : چهارشنبه ۰۱ تیر ۹۰ در ساعت ۱۶:۰۵
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  10. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  11. #6
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    نوشته اصلی توسط سائل الزهرا نمایش پست اصلی
    سلام
    نه
    بعضی از پروسه های ویندوز مثل
    lsass
    یا
    csrss
    یا حتی انواع ویروس
    به هیچ طریقی بسته(end prosses) نمیشن
    در واقع به یک نقطه قفل میشن و اوّل باید اون نقطه رو از کار انداخت
    چطوری میتونم ویروسم رو اینطوری کنم
    نمی دونم ولی واست یه جستجو میکنم


    متاسفانه چیز بدرد بخوری پیدا نکردم ....
    ویرایش توسط Ayoub_system : چهارشنبه ۰۱ تیر ۹۰ در ساعت ۱۷:۰۲


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  12. کاربر روبرو از پست مفید Arad تشکر کرده است .


  13. #7
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۸-شهریور-۱۷
    محل سکونت
    barefoot in paradise
    جنسيت
    برادر
    نوشته ها
    9,111
    امتیاز : 78,558
    سطح : 100
    Points: 78,558, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    SocialYour first GroupVeteranCreated Album picturesTagger First Class
    تشکر کردن : 22,545
    تشکر شده 35,372 در 8,299 پست
    مخالفت
    93
    مخالفت شده 99 در 65 پست

    پیش فرض

    دادا سائل الزهرا
    اینجا بعید می دونم همچنان منتظر بمانی جوابی بشنوی! !!! از بس این تالار فعال هست (شرمنده خودم بلد نیستم)
    تالار پی سی ورد رو که خدمتتون عرض کرده بودم
    این بخش ویژوال بیسیکش هست :
    http://forum.p30world.com/forumdisplay.php?f=49
    ان شا الله مشکلتون حل بشه

    حسبنا الله و نعم الوکیل نعم المولی و نعم النصیر




  14. کاربر روبرو از پست مفید مستاجر خدا تشکر کرده است .


  15. #8
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    اونجا هم قبلا مطرحش کردم ولی پاسخی نشنیدم
    اینطوری همه ویروسام ابطر میمونن
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  16. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  17. #9
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۹-آذر-۲۳
    محل سکونت
    شیرازو - تهرانو
    نوشته ها
    3,738
    امتیاز : 94,025
    سطح : 100
    Points: 94,025, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    SocialRecommendation First ClassVeteranCreated Album pictures50000 Experience Points
    تشکر کردن : 13,141
    تشکر شده 13,870 در 3,320 پست
    مخالفت
    0
    مخالفت شده 1 بار در 1 پست

    پیش فرض

    سلام
    پسر من برنامه نویسیم افتضاحححححححححح هست ولی تو دانشگاه شدم 17 دلیلشم این بود که دانشگاه آزاده و اگه الان بهم بگن یه برنامه بنویس دو تا عدد رو با هم جمع کنه بلد نیستم.
    یکی آموزشش رو بذاره.

  18. کاربر روبرو از پست مفید رهپوی وصال تشکر کرده است .


  19. #10
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    اینو هستم ولی مشتریش نیست
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  20. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  21. #11
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    به نظر من هر کسی بیاد پروژه های خودشو برا بقیه بزاره
    اینطوری هم یاد میگیریم هم استفاده میکنیم
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  22. 3 کاربر از پست مفید سائل الزهرا تشکر کرده اند .


  23. #12
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۹-دی-۱۷
    محل سکونت
    شیراز
    جنسيت
    برادر
    نوشته ها
    3,130
    امتیاز : 24,425
    سطح : 95
    Points: 24,425, Level: 95
    Level completed: 8%, Points required for next Level: 925
    Overall activity: 0%
    افتخارات:
    SocialVeteranCreated Album picturesTagger Second Class50000 Experience Points
    تشکر کردن : 13,506
    تشکر شده 15,182 در 2,895 پست
    مخالفت
    13
    مخالفت شده 14 در 14 پست

    پیش فرض

    با ویژوال بیسیک native میخوای بنویسی یا با .NET ؟
    گرم یادم کنی یا نه، من از یادت نمیکاهم...

  24. کاربر روبرو از پست مفید heaven_reza تشکر کرده است .


  25. #13
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    vb6
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  26. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  27. #14
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۳-آبان-۰۸
    محل سکونت
    شیراز
    جنسيت
    خواهر
    سن
    -1989
    نوشته ها
    3,760
    امتیاز : 67,140
    سطح : 100
    Points: 67,140, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialRecommendation Second ClassVeteranTagger Second Class50000 Experience Points
    تشکر کردن : 8,821
    تشکر شده 14,241 در 3,398 پست
    مخالفت
    16
    مخالفت شده 3 در 2 پست

    پیش فرض

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

  28. 2 کاربر از پست مفید مهاجر تشکر کرده اند .


  29. #15
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    این همه مهندس کامپیوتر تو کانون هست
    یکیشون نمیتونه این سوال ما رو جواب بده
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  30. 2 کاربر از پست مفید سائل الزهرا تشکر کرده اند .


  31. #16
    عضو قدیمی
    تاریخ عضویت
    ۱۳۹۰-خرداد-۲۰
    محل سکونت
    شیراز
    نوشته ها
    1,011
    امتیاز : 12,092
    سطح : 72
    Points: 12,092, Level: 72
    Level completed: 11%, Points required for next Level: 358
    Overall activity: 0%
    افتخارات:
    SocialCreated Album pictures10000 Experience PointsVeteran
    تشکر کردن : 2,371
    تشکر شده 2,886 در 906 پست
    مخالفت
    0
    مخالفت شده 0 در 0 پست

    Smile

    نوشته اصلی توسط سائل الزهرا نمایش پست اصلی
    سلام
    میخوام کاری کنم که نرم افزاری که میسازم از طریق وِیژوال بیسیک بسته نشه
    مثل نرم افزارای خود ویندوز که وقتی از طریق تب


    چطوری میتونم نرم افزارمو اینطوری کنم
    با تشکر از همه دوستان
    prossesor در task manager میخوایم ببندیمشون میگه access is denied
    همه می دونند که ویروس ها فایل های مخفی هستند.(پس از اجرا)

    برای دادن این خاصیت به ویروس از دستورات زیر در ویژوال بیسیک استفاده می کنیم :

    کد قالب بندی شده:

    me.hide
    App.TaskVisible = False

    توضیح :
    me.hide یا form name.hide :

    برای دیده نشدن فرم پس از اجرای فایل

    App.TaskVisible = False :
    دیده نشدن فایل ویروسی در قسمت Aplications نرم افزار Task Manager ویندوز.
    اگر برابر False باشد دیده نمی شود ولی اگر برار True باشد دیده می شود.
    ------------
    نحوه ی استفاده :

    این دو دستور را معمولا در قسمت Form_Load برنامه (در ویژوال بیسیک) می نویسند.
    به صورت زیر :


    Private Sub Form_Load()
    Me.Hide
    App.TaskVisible = False
    End Sub


  32. 2 کاربر از پست مفید شهید تشکر کرده اند .


  33. #17
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۴۸-دی-۱۱
    محل سکونت
    شیرازووو ، فلکه گازوو ، کوچه درازووو ، در بازووو
    جنسيت
    برادر
    سن
    -1993
    نوشته ها
    11,580
    امتیاز : 123,049
    سطح : 100
    Points: 123,049, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 99.0%
    افتخارات:
    SocialYour first GroupRecommendation First ClassVeteranCreated Album pictures
    تشکر کردن : 35,154
    تشکر شده 42,004 در 9,343 پست
    نوشته های وبلاگ
    1
    مخالفت
    206
    مخالفت شده 166 در 132 پست

    پیش فرض

    این فقط برای مخفی شدنشه
    تازه راههای بهتری هم هست
    مصلا سوپر هیدن کردن ویروسها
    مامیخایم نرم افزارمون از طریق تسک منیجر بسته نشه کاکووو
    مختار: خدایا بهشتت را نمیخواهم ، فقط آنقدر به من فرصت بده تا دستم دوباره به قبضه شمشیرم برسد ؛
    آنوقت اگر خواستی به دوزخم بفرستی ... بفرست .





  34. کاربر روبرو از پست مفید سائل الزهرا تشکر کرده است .


  35. #18
    عضو قدیمی
    تاریخ عضویت
    ۱۳۹۰-خرداد-۲۰
    محل سکونت
    شیراز
    نوشته ها
    1,011
    امتیاز : 12,092
    سطح : 72
    Points: 12,092, Level: 72
    Level completed: 11%, Points required for next Level: 358
    Overall activity: 0%
    افتخارات:
    SocialCreated Album pictures10000 Experience PointsVeteran
    تشکر کردن : 2,371
    تشکر شده 2,886 در 906 پست
    مخالفت
    0
    مخالفت شده 0 در 0 پست

    پیش فرض

    نوشته اصلی توسط سائل الزهرا نمایش پست اصلی
    این فقط برای مخفی شدنشه
    تازه راههای بهتری هم هست
    مصلا سوپر هیدن کردن ویروسها
    مامیخایم نرم افزارمون از طریق تسک منیجر بسته نشه کاکووو
    مخفی کردن پروسس برنامه در Windows Task Manager :

    توضیح :
    با تابع FindWindow هندل پنجره task manager را بدست می آوریم.بعد با FindWindowEx هندل شیء SysListView32 که پروسس ها در اون وجود داره را بدست می آوریم. بعد با تابع WriteProcessMemory عمل inject را انجام می دیم.

    استفاده :
    کد زیر را درون یک تایمیر قرار دهید :


    Private Sub Timer1_Timer()
    Hide_Process CStr(App.EXEName & ".exe")
    End Sub

  36. 2 کاربر از پست مفید شهید تشکر کرده اند .


  37. #19
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    سلام
    خب از امروز تصمیم گرفتم که مقالاتی را درباره ی ویژوال بیسیک 6 دارم بزنم توی تالار.
    دوستان هم اگه مطالبی دارن در تالار درج کنن تا دیگران هم استفاده ببرن.


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  38. کاربر روبرو از پست مفید Arad تشکر کرده است .


  39. #20
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    بنام خدا
    جزوه کمک آموزشی زبان برنامه نویسی Visual Basic 6.00 مطابق با استاندارد آموزشی فنی حر فه ای و
    استاندارد آموزشی وزارت فرهنگ و ارشاد اسلامی
    قابل استفاده برای هنر آموزان و دانش آموزان شاخه کاردانش و فنی حرفه ای
    تهیه کننده :
    حسینعلی رستمی
    تابستان و مهر 1388



    زبان Visual Basic که ازاین به بعد به اختصار Vb می گوییم از زبان Basic که به معنی زبان برنامه نویسی همه منظوره برای افراد مبتدی است گرفته شده . نسخه های مختلف Basic عبارتند از :
    • Gwbasic
    • Qbasic
    • Quick Basic
    • Turbo Basic
    • Basica
    • Ansi Basic
    • Visual Basic 4.00
    • Visual Basic 6.00
    • Visual Basic Express
    • Visual Basic .Net
    نسخه مورد نظر ما Visual Basic 6.00 می باشد که این نسخه خود دارای سه نگارش مختلف است که شبیه هم هستند :
    1. نگارش آموزشی Learning Edition
    2. نگارش ماهر Enterprise Edition
    3. نگارش حرفه ای Professional Edition

    ویژگیهای زبان Vb
    • یک زبان برنامه نویسی سطح بالاست.
    • یک زبان بر نامه نویسی Rad است یعنی قابلیت تولید سریع نرم افزار را دارد.
    • دارای محیط مجتمع بر نامه نویسی (IDE ) است یعنی امکان نوشتن تر جمه و اجرا و خطایابی برنامه را در یک محیط فراهم کرده است .
    • از قابلیت برنامه نویسی شی گرا Object Oriented Programming (Oop) پشتیبانی می کند ولی یک زبان برنامه نویسی شی گرای محض نیست .
    • امکان ترکیب شدن با فا یل های Html را تحت عنوان Vbscript داراست.
    • امکان مدیریت بانک اطلاعاتی را دارد.
    • یک زبان برنامه نویسی رویداد گراست (Evevt Handleing).

    در این قسمت محیط Vb برای دانش آموز بصورت عملی تو ضیح داده شود.

    روش برنامه نویسی در Vb:

    در زبان Vb هر برنامه از تعدادی شی که برای هر شی تعدادی خصوصیت و متد و تعدادی رویداد از قبل تعریف شده است که کاربر با انتخاب شی های مورد نیاز و تنظیم خصوصیات اولیه شی کد های لازم را در رویداد مناسب می نویسد

    بنا براین برنامه نویس باید انواع شی و خصوصیات و متد ها و رویداد های هر شی را بداندو با دستورات Vb آشنایی داشته باشد .
    بطور کلی برنامه نویسی در Vb شامل 2 مرحله است
    1. مرحله طراحی Design:در این مرحله برنامه نویس شی های مورد نیاز بر نامه را انتخاب کرده و خصوصیات اولیه آن ها از طریق پنجره Properties تنظیم می کند.
    2. مرحله کد نویسی Code:در این مرحله برنامه نویس رویداد مناسب از شی مورد نظر خود را انتخاب کرده و پاسخ شی به رویداد را با دستورات VB کد نویسی می کند.


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  40. کاربر روبرو از پست مفید Arad تشکر کرده است .


  41. #21
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    مفاهیم اولیه برنامه نویسی در Vb:


    انواع داده ها در Vb
    Vb داده ها ی جدول زیر را پشتیبانی می کند و برای استفاده در بر نامه ها برنامه نویس اطلاعات ورودی خود را باید با داده های Vb هماهنگ کند (برنامه نویس باید نوع اطلاعات خودش را بر اساس جدول زیر به Vb اعلام کند)

    داده های عددی:

    نام نوع داده فضایی که در حافظه اشغال می کند محدوده علامت اختصاری توضیح
    Byteبایت 1 بایت 0 تا 255 ندارد
    Integer صحیح معمولی 2بایت 32768- تا 32767+ %
    Long صحیح بلند 4 بایت منفی 2 میلیارد تا مثبت 2 میلیارد &
    Single اعشاری معمولی 4بایت تا 40 رقم اعشاری !
    Double اعشاری دوبل 8 بایت تا 300 رقم اعشاری #
    Currency اعشاری ارزی(پولی) 8بایت تا 300 رقم اعشاری @ برای ذخیره اطلاعاتی مثل حقوق افراد و .... استفاده می شود

    داده های غیر عددی
    نوع منطقی Boolean 2 بایت True -False ندارد
    رشته ای String با طول ثابت به تعداد حروف رشته حد اکثر 65556حرف یا 64kb $
    رشته ای String با طول متغیر به تعداد حروف رشته 2 میلیارد حرف یا 2Gb $
    تاریخ و زمان Date 8 بایت یک تاریخ معتبریا ساعت معتبر ندارد
    نوع شی Object 4بایت - ندارد
    نوع عمومی Varient 16 بایت - ندارد هر نوعی را شامل می شود –اگر نوع دادهای تعیین نشود از نوع عمومی در نظر گرفته خواهد شد


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  42. 3 کاربر از پست مفید Arad تشکر کرده اند .


  43. #22
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    مفهوم متغیر در Vb:
    مکانی از حافظه کامپیوترکه برای ذخیره اطلاعات ورودی خروجی و نتایج حاصل از پردازشهای میانی استفاده می شود و به آن یک اسم هم نسبت داده می شود.

    خصوصیات متغیر :
    1-با خروج از برنامه یا خاموش شدن کامپیوتر اطلاعات آن پاک می شود
    2-اگر مقدار جدیدی در آن قرار گیرد مقدار قبلی پاک می شود
    3-اگر مقدار آن خوانده شود تغییری نمی کند.
    برای استفاده از یک متغیر در Vb باید آن را تعریف کنیم یعنی نام و نوع آن را معین کنیم که این کار با یکی از روشهای زیر انجام می شود.
    1. استفاده از دستور Dim
    Dim نام متغیر As نوع
    نوع متغیر با توجه به جدول انواع داده ها و نظر برنامه نویس تعیین می شود.
    نام متغیر باید دارای شرایط زیر باشد:
    • با یک حرف شروع شود
    • حد اکثر 127 حرف می تواند باشد
    • فقط از حروف A-Z یا A_Z و ارقام 0 تا 9 و خط زیر (_) می تواند باشد
    • از کلمات کلیدی Vb نباشد (If –End –For-Else-Do –Loop –While –Sub-Private-……….))

    مثال:
    Dim Number As Long
    Dim C As Integer
    Dim Maliat As Single
    Dim Nam As String
    Dim Shomareh As Long , Famil As String,Address As String


    2. استفاده از علامت اختصاری نوع

    نام متغیربا علامت اختصار ی نوع مورد نظر=مقدار
    N%=1000
    یعنی N از نوع صحیح معمولی و مقدار آن 1000 است
    Nam$="Alireza"
    Hoghogh@=100000

    نکته:برای تعریف متغیر رشته ای با طول ثابت بصورت زیر عمل می کنیم :
    Dim نام متغیر رشته ای As String *N
    N:تعداد کاراکترهای رشته است
    مثال:
    Dim Famil As String*20
    یعنی Famil متغیری رشته ای که حد اکثر 20 حرف می تواند باشد.
    Dim famil as string


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  44. 2 کاربر از پست مفید Arad تشکر کرده اند .


  45. #23
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    مقدار دادن به یک متغیر :
    برای این کار از علامت = استفاده می کنیم .
    نام متغیر=مقدار
    نکته:مقدار متغیر می تواند یک مقدار ثابت یا یک متغیر یا یک عبارت یا یک خصوصیت باشد.
    نکته:مقدار باید از نظر نوع و محدوده با متغیر سازگار باشد.

    مثال:
    Dim X As Integer
    Dim Na As String,Mark As Single
    Dim Jensiat As Boolean
    Dim Aaadshnds As Long,Y As Long
    X=12
    Na="Ali"
    Mark=15.75
    X=Label1.Fontsize
    Nam=Form1.Caption
    Mark=(12.25+17.5)/2
    Jensiat=True
    Aaadshnds=10000000
    Y=X

    عبارت ها در VB
    هر عبارت در Vb از دو قسمت تشکیل می شود :
    1-عملوند
    2-عملگر
    مثال:
    در عبارت Z=X+Y/2-11 عملوند ها Z,X,Y,2,11 می باشند و عملگر ها =,+,/,- هستند.


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  46. 2 کاربر از پست مفید Arad تشکر کرده اند .


  47. #24
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    انواع عملگر ها در Vb
    1-عملگر های ریاضی:
    نام عملگر علامت
    علامت عدد +یا -
    توان ^
    ضرب *
    تقسیم معمولی /
    تقسیم صحیح یا خارج قسمت \
    باقیمانده Mod
    جمع و تفریق +و-

    نتیجه Vb ریاضی
    9 4+5 4+5
    20 4*5 4×5
    8 3^2 23
    4.5 2/9 2÷9
    4 9\2 2]÷9 [
    1 9 Mod 2 باقیمانده تقسیم 9 بر 2
    2-عملگرهای رابطه ای (شرطی):
    نام عملگر علامت
    بزرگتر <
    کوچکتر >
    بزرگتر مساوی >=
    کوچکتر مساوی <=
    مخالف <>
    مساوی =
    از این عملگرها برای نوشتن عبارتهای شرطی ساده استفاده می شود و حاصل آنها یا True و یا False است.
    مثال:
    12>10True
    14<=3*6True
    3+2>=5+6False
    "Ali"="Reza"False
    "A"="a"False
    "a">"A"True
    "Alimirzareza">"Mahdi"False
    "a"<"B"False
    "A"<"B"True
    3-عملگر های منطقی:
    نام عملگر علامت
    و منطقی And
    یا منطقی Or
    نقیض Not
    یا انحصاری Xor

    از این عملگر ها برای ترکیب کردن عبارتهای شرطی ساده و بدست آوردن یک عبارت شرطی مرکب استفاده می کنند که در نهایت حاصل آن نیز یا درست است یا غلط.(True/False)
    مثال:
    12>=10 And 2+6<=7False

    12>=10 Or 2+6<=7True
    12>=10 Xor 2+6>=7False
    Not(6=6)False
    Not(6=7)True
    نکته1:اگر بین دو شرط And قرار گیرد در صورتیکه جواب هر دو شرط True باشد حاصل کل True است .
    نکته2:اگر بین دو شرط Or قرار گیرد در صورتیکه جواب هر دو شرط False باشد حاصل کل False است و در بقیه حالت ها True است.

    نکته3:اگر بین دو شرط Xor قرار گیرد در صورتیکه جواب هر دو شرط مانند هم نباشد حاصل کل True است و در بقیه حالت ها False است.
    نکته4:اگر قبل از شرط Not قرار گیرد در صورتیکه جواب شرط True باشدنتیجه False است و بر عکس.





    4-عملگر های رشته ای:

    نام عملگر علامت
    جمع دو رشته +
    پیوند رشته با هر نوع دیگر &

    "A"+"B""Ab"
    "Iran" +"Ian""Iranian"
    Form1.Caption+"Ali"
    "A" &"B""Ab"
    "A" & 10A10
    "A"+10خطا


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  48. 2 کاربر از پست مفید Arad تشکر کرده اند .


  49. #25
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    اولویت عملگرها:
    Vb در محاسبه عبارتها بر طبق جدول زیر عملگرها را اولویت بندی کرده و آنها را محاسبه می کند بنا بر این در نوشتن عبارتها به زبان vb باید اولویتها را در نظر گرفت .
    نوع عملگر عملگر اولویت
    - ( عبارت داخل پرانتز) 1
    ریاضی






    1-علامت عدد
    2-توان
    3-ضرب و تقسیم (*و/)
    4-تقسیم صحیح \
    5-باقیمانده Mod
    6-جمع و منها +و- 2
    3
    4
    5
    6
    7

    رابطه ای یا شرطی





    1-<
    2->
    3-=<
    4-=>
    5-<>
    6-= 8:اولویت همه یکسان است.
    منطقی


    1-Not
    2-َand
    3-Or
    4-Xor 9
    10
    11
    12

    نکته:اگر چند عملگر دارای اولویت یکسان باشند عملگری سمت چپ قرار دارد دارای اولویت بالاتری است.

    آشنایی با دستورات :
    • دستورات ورودی

    1. استفاده از Textbox:به تعداد متغیر های ورودی از شی TEXTBOX استفاده می کنیم .
    2. تابع Inputbox

    تابع Inputbox
    برای دریافت اطلاعات از صفحه کلید به کار می رود.
    • متغیر=Inputbox(پیغام,عنوان,مقدا ر اولیه)
    مثال
    • Dim X As Variant
    • X=Inputbox ("یک عدد وارد کن","ورود", 100)


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  50. 2 کاربر از پست مفید Arad تشکر کرده اند .


  51. #26
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    • دستورات خروجی

    1. متد Print :برای چاپ اطلاعات روی شی

    Objectname.Print Exp1,Exp2,….
    Form1.Print "Ali","Reza",100
    Form1.Print "A";10


    PRINT TAB(20);1;TAB(40);2
    Print Spc(20); 1; Spc(40); 2
    2. تابع Msgbox
    3. استفاده از اشیا Vb (Label,Listbox,Textbox,….)

    تابع Msgbox
    یک کاد ر پیغام ظاهر می کند
    متغیر از نوع صحیح=Msgbox("پیغام",تعداد دکمه+آیکن پیغام,عنوان کادر)
    مثال
    Dim P As Integer
    P=Msgbox ("خارج می شوید؟", Vbyesno+Vbexclamation,"Exit")

    ثابت آیکن
    Vbexclamation مثلث خطر
    Vbquestion ?
    Vbinformation !
    Vbcritical 


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  52. 2 کاربر از پست مفید Arad تشکر کرده اند .


  53. #27
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۸۹-آذر-۲۳
    محل سکونت
    شیرازو - تهرانو
    نوشته ها
    3,738
    امتیاز : 94,025
    سطح : 100
    Points: 94,025, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    SocialRecommendation First ClassVeteranCreated Album pictures50000 Experience Points
    تشکر کردن : 13,141
    تشکر شده 13,870 در 3,320 پست
    مخالفت
    0
    مخالفت شده 1 بار در 1 پست

    پیش فرض

    سلام
    یه کاراکتر های جدیدی میبینم چین؟
    آموزش تصویری هم بذارین ممنون.
    یار من یوسف نیا اینجا کسی یعقوب نیست
    لحظه ای چشمانشان از دوریت مرطوب نیست
    ای گل زیبای من از غربتت اشکی نریز
    نازنین اینجا خدا هم پیششان محبوب نیست
    گرچه در هر جمعه ای زیبا دعایت می کنند
    بهترینم این دعا ها جنسشان مرغوب نیست





    وبلاگ هردمبیل، شخصی: http://prince-playful.blogfa.com/
    وبلاگ زخم دل، شخصی: http://prince-lonely.blogfa.com/
    وبلاگ خاطرات، شخصی: http://prince-rahpou.blogfa.com/

  54. کاربر روبرو از پست مفید رهپوی وصال تشکر کرده است .


  55. #28
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    • دستورات شرطی
    1. دستور If:به معنی اگر و برای نوشتن دستورات شرطی و مقایسه ای استفاده می شود.
    • If شرط Then دستور 1 Else دستور 2
    • If شرط Then
    1دستور ات
    Else
    دستور ات2
    End If

    If شرط Then
    دستور ات1
    Else If 2 شرط Then
    2 دستور ات
    Else If 3شرط Then
    3 دستور ات
    ….
    ..
    .
    Else
    نهایی دستور ات
    End If

    If 12 Mod 3>=1 Then Print "Q" Else Print "R"
    X=12
    Y=0
    If X /2=X\2 Then
    X=X+2
    Y=2*X
    Else
    X=X-1
    End If
    Print X,Y
    1. دستور Select Case:برای بررسی بیش از 2 حالت

    Select Case Statement
    Case Value1
    1 دستور ات
    Case Value2
    2 دستور ات
    .
    .
    .
    .
    Case Else
    دستورات نهایی
    End Select
    Select Case Text1.Text
    Case 1 To 99
    Print "Less Than 100"
    Case 2
    Print "Two"
    Case Else
    Print "Error"
    End Select


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  56. 2 کاربر از پست مفید Arad تشکر کرده اند .


  57. #29
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    دستورات حلقه سازی:
    1. دستور مربوط به ایجاد حلقه های معینFor…….Next:
    2. دستورات مربوط به ایجاد حلقه های نامعین
    a. While….Wend
    b. Do…..Loop:انواع Do..Loop عبارتند از:
    i. Do While ……Loop
    ii. Do …....Loop While
    iii. Do Until…….Loop
    iv. Do …….Loop Until
    شکل کلی دستور For…Next:
    For متغیر شمارنده= مقدار اولیه To مقدار نهایی Step میزان افزایش یا کاهش شمارنده در هر بار تکرار
    دستوراتی که باید تکرار شوند
    .
    .
    Next متغیر شمارنده
    مثال 1

    برنامه ای بنویسید که نام خودتان را 10 بار چاپ کند؟
    Dim C As Integer
    For C=1 To 10 Step 1
    Print "Ali"
    Next C







    مثال
    برنامه ای بنویسید که عددی را گرفته و مقسوم علیه های آن را چاپ کند.
    Dim N As Integer
    Dim R As Integer
    N = Inputbox("یک عدد وارد کنید")
    For C = 1 To N Step 1
    R = N Mod C
    If R = 0 Then Print C
    Next C
    نکته :در دستور For اگر قسمت Step نوشته نشود 1+ در نظر گرفته می شود.بنا بر این
    For I=1 To 10 Step 1  For I=1 To 10
    نکته:اگر For کاهشی باشد عدد Step باید منفی باشد
    For I=10 To 1 Step -1
    شکل کلی دستور While…Wend
    While شرط
    دستورات تکرار شونده
    .
    .
    .
    Wend
    برنامه ای بنویسید که تا زمانیکه عدد -1 وارد نشده عدد بگیرد و مجموع آنها را چاپ کند.
    1. شروع
    2. S=0
    3. اگر N=-1 بود برو به 7
    4. عدد N را دریافت کن
    5. S=S+N
    6. برو به 3
    7. چاپ کن S
    8. پایان
    Dim S As Single
    Dim N As Single
    While Not(N=-1)
    N=Inputbox("عدد ی را وارد کن")
    S=S+N
    Wend
    Print S


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  58. 2 کاربر از پست مفید Arad تشکر کرده اند .


  59. #30
    دیگه صاحب خونه هستن
    تاریخ عضویت
    ۱۳۹۰-خرداد-۱۹
    جنسيت
    برادر
    نوشته ها
    10,067
    امتیاز : 42,327
    سطح : 100
    Points: 42,327, Level: 100
    Level completed: 0%, Points required for next Level: 0
    Overall activity: 0%
    افتخارات:
    Social50000 Experience PointsOverdriveVeteranTagger First Class
    تشکر کردن : 54,998
    تشکر شده 22,295 در 4,610 پست
    مخالفت
    72
    مخالفت شده 63 در 55 پست

    پیش فرض

    شکل کلی دستور Do While…Loop

    Do While شرط
    دستورات تکرار شونده
    .
    .
    .
    Loop
    مثال
    Dim S As Single
    Dim N As Single
    Do While Not(N=-1)
    N=Inputbox("عدد ی را وارد کن")
    S=S+N
    Loop
    Print S

    شکل کلی دستور Do …Loop While

    Do
    دستورات تکرار شونده
    .
    .
    .
    Loop While شرط
    مثال
    Dim S As Single
    Dim N As Single
    Do
    N=Inputbox("عدد ی را وارد کن")
    S=S+N
    Loop While Not(N=-1)
    Print S


    ما زنـ-ـ-ـده به آنیـــم که آرام نگیریم
    موجیم که آسودگی ما عدم ماست


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

    الهی هیچ مسافری از رفیقهاش جا نمونه .... آمین

  60. 2 کاربر از پست مفید Arad تشکر کرده اند .


صفحه 1 از 4 123 ... آخرینآخرین

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. برنامه های کودکِ دیروز و امروز
    توسط جابر در انجمن صدا و سیما
    پاسخ ها: 64
    آخرين نوشته: جمعه ۰۷ شهریور ۹۳, ۰۶:۰۰
  2. *سینمای ایران*
    توسط عروسك پارچه اي در انجمن سینما
    پاسخ ها: 126
    آخرين نوشته: سه شنبه ۱۷ دی ۹۲, ۱۹:۴۶
  3. پاسخ ها: 69
    آخرين نوشته: چهارشنبه ۰۸ تیر ۹۰, ۱۷:۴۶

علاقه مندی ها (Bookmarks)

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
درباره ما

جامعه مجازی رهپویان به عنوان شبکه اجتماعی اعضاء کانون فرهنگی رهپویان وصال از سال 1381 و به عنوان یکی از قدیمی ترین تالارهای گفتمان فضای وب فارسی مشغول به فعالیت می باشد. تمامی تلاش دست اندرکاران مجموعه، فراهم آوردن محیطی سالم، مفید و آموزنده برای کاربران گرامی می باشد بدیهی است مطالب درج شده نظرات کانون رهپویان وصال نبوده و نظرات رسمی در سایت رهپویان وصال درج می گردد.

ارسال پیام به مدیر سایت
session بارگذاری مجدد کد امنیتی مندرج در تصویر را وارد کنید:
شادی روح 14 شهید کانون فرهنگی رهپویان وصال صلوات

Content Relevant URLs by vBSEO 3.6.1