اموزش ویژوال بیسیک

تاريخچه ويژال بيسيک.

با شناختي که از تاريخچه ويژوال بيسيک بدست مي آوريد راحت تر مي توانيد از آن استفاده کنيد.

شرکت مايکروسافت ويژوال بيسيک را براساس يک زبان برنامه نويسي به نام بيسيک که براي مبتديان نوشته شده است ساخت.

زبان ويژوال بيسيک بيشتر از 35 سال به اشکال مختلف رايج بوده. در واقع طراحان اين زبان مي خواستند يک زبان برنامه نويسي براي استفاده مبتديان طراحي کنند.برنامه نويسان جديد مي توانند با استفاده ازبيسيک به سرعت به شرع برنامه نويسي هاي حرفه اي با زبان هاي cobol .fortran . assembler

در مقايسه به بيسيک کار بيشتري نياز داشت.

طبيعت بصري ويژوال بيسيک

ديديد که ويژال بيسيک 6 چيزي بيشتر از يک زبان برنامه نويسي است. از ويژوال بيسيک در نام آن visualبه معناي بصري يا محيط نمايشي . است.

کار با ويژال بيسيک 6

در اولين بار که برنامه را باز مي کنيد با پنجره new project روبه رو مي شويد در اين قسمت

نوع فورم خود را انتخاب کرده ماننده activex|standardو....

اين پنجره شامل 3 قسمت بوده

New:در اين پنجره امکان انتخاب فورم مورد نظر شما امکان پذير مي باشد.

Existing:در اين پنجره امکان انتخاب project هاي مختلف که در مکانهاي مختلف ذخيره يا... امکان انتخاب مي باشد.

Recent:در اين قسمت هر projectرا که ذخيره مي کنيد به صورت دسته اي جمع مي شود حالا يک فايلي

در درايو Dباشد حالا چه در درايو c.

DON.T SHOW THIS DIALOG IN THE FUTURE

اين قسمت جلو گيري از باز شدن پينجره NEW PRIJECT مي باشد.

HELP:از اين قسمت وقتي امکان استفاده مي باشد که نرم افزار MSDN را نصب کرده باشيد.

معرفي قسمت هاي بيسيک.

نوار ابزار:TOOLBAR:نوار ابزار VB زير منو قرار دارد. ويژال بيسيک کلا چهار نوار ابزار دارد:

STANDARD:اين نوار ابزار زير منو ظارهر است و پيش فرض است.

DEBUG:وقتي از ابزارهاي رفع اشکال براي رديابي و اصلاح اشکالات استفاده مي کنيد. اين نوار ابزار ظاهر مي شود.

EDIT:اين نوار ابزار براي تنظيم کردن اشياء بر روي فرم مي باشد

FORM EDITOR:اين نوار ابزار براي تنظيم کردن اشياء بر روي فرم مي باشد.

جعبه ابزار:TOOLBOX:

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

پنجرهPROJECT:در اين پنجره فرم هاي انتخبي شما با هر گروه و هر فرم مشخص شده است.

پنجرهPROPERTISE:

اين پنجره امکان تنضيمات لازم براي هر شيئي را مشخص مي کنيد.

نويسنده مجيد رحيمي.

    ساخت اولين برنامه

    براي درک آسان بودن نرم افزار بيسيک

    الان مي خواهم برايتان يک برنامه ساده بنويسم که فقط با چند خط ساده نوشته شده است .

    چون الان تازه اول کار هستيم از توابع و کارهاي ديگرش شروع نمي کنم.

    ابتدا 2 عدد Taxtboxگزاشته از جعبه ابزار

    کد زير را در Text1 قرار داده.

    If Text1.text="majid" Then

    Text2.text="rahimi"

    End If

    کد بسيار راحتي بود.

    خط اول گفتيم که اگر در Text1 نوشتند Majid

    د خط دوم نوشتيم در Text2 بنويسد Rahimi

    و در آخر گفتيم پايان

    درک کد بالا بايد آسان باشد.

    ما از دستور If استفاده کرديم که در درسهاي آينده خواهم گفت.

    دستور بالا يك آموزش بود براي اينكه به شما نشان بدهيم كه ويژوال بيسيك چه قدر آسان مي باشد.

پاسخ با نقل قول

پيش گزيده

    کار با فايل در ويژوال بيسيک - بخش اول

    مقدمه

    بعلت عدم وجود اشاره گر در ويژوال بيسيک عمليات کار با فايلها در آن نسبتاً ساده مي باشد .

    بطور کلي فايلها بر دو نوع هستند :

    1 - فايلهاي متني Text File : اين فايلها فقط شامل کاراکترهاي اسکي و برخي کاراکترهاي خاص مانند انتهاي خط و انتهاي فايل هستند .

    ? - فايلهاي باينري Binary File : شامل هر نوع کاراکتري مي توانند باشند و کاربردهاي گسترده اي دارند مانند بانک هاي اطلاعاتي ، فايلهاي اجرائي ، فايلهاي گرافيکي و غيره

    ويژوال بيسيک مي تواند با هر دو نوع فايل کار کند .

    چگونگي باز کردن فايلها

    قبل از اينکه بتوان عمليات ورودي/خروجي را روي يک فايل انجام داد ابتدا بايستي آنرا باز کرد . باز کردن فايلها در ويژوال بيسيک توسط دستور Open انجام مي شود . فرمت کلي اين دستور بصورت زير است :

    Open filename [For mode] [Access access][lock] As [#]filenumber [Len=reclen]x

    [ پارامترهاي داخل کروشه اختياري هستند . ]

    filename نام فايلي است که مي خواهيم آنرا باز کنيم .

    mode حالت باز کردن فايل است . اين حالتها عبارتند از :

    - Input : فايل بعنوان ورودي باز مي شود .

    - Output : فايل بعنوان خروجي باز مي شود .

    - Binary : فايل از نوع باينري باز مي شود .

    - Append : فايل طوري باز مي شود که بتوان به انتهاي آن چيزي اضافه کرد .

    - Random

    access نوع دسترسي به فايل را مشخص مي کند . انواع دسترسيها عبارتند از :

    - Read : خواندن فايل

    - Write : نوشتن در فايل

    - ReadWrite : خواندن و نوشتن فايل

    lock نوع دسترسي ساير برنامه ها به اين فايل را مشخص مي کند . انواع دسترسيها عبارتند از :

    - Shared : دسترسي اشتراکي

    - Lock Read

    - Lock Write

    - Lock Read Write

    filenumber عددي است که ويژوال بيسيک از آن براي دسترسي به فايل استفاده مي کند .اين عدد بايستي براي هر فايل منحصر بفرد و بين ? تا ??? باشد . براي بدست آوردن اولين شماره آزاد مي توان از تابع FreeFile استفاده کرد .

    reclen :طول بافر فايل است . اين عدد بايستي از ????? کو چکتر باشد .

    در صورتي که فايلي که توسط filename مشخص شده وجود نداشته و فايل براي Append ، Binary ، Output و يا Random باز شده باشد در اينصورت يک فايل جديد با اين نام ساخته مي شود .

    در صورتي که فايل بصورت باينري باز شده باشد پارامتر Len ناديده گرفته مي شود .

    چگونگي بستن فايل

    پس از پايان کار با فايل براي بستن آن از دستور Close استفاده مي کنيم . فرمت اين دستور بصورت زير است :

    Close #filenumber

    دستور Close بدون هيچ پارامتري تمام فايلهاي باز را مي بندد .

    کار با دايرکتوري

    ? - گرفتن Dir : توسط دستور Dir مي توان نام فايلهاي موجود در يک دايرکتوري را بر اساس پارامترهايي که به آن مي دهيم پيدا کنيم . براي مثال :

    Myfile=Dir$("c:\text\*.txt)"x

    دستور فوق نام اولين فايل موجود در دايرکتوري C:\TEXT را که پسوند آنها txt باشد در متغير Myfile قرار مي دهد . اگر دستور فوق را بدون پارامتر مجدداً اجرا کنيم نام دومين فايل برگرداننده مي شد و الي آخر

    Dir داراي يک پارامتر اختياري است که نوع فايلهاي مورد نظر را نيز مي توان با آن مشخص نمود . مثال :

    Myfile=Dir$("c:\text\*.txt",vbNormal)x

    مقادير ممکن اين پارامتر عبارتند از :

    vbNormal ، vbHidden ، vbSystem ، vbDirectory

    ? - تغيير دايرکتوري : براي تغيير دايرکتوري از دستور ChDir استفاده مي شود مثال :

    ChDir "c:\windows\system32"x

    ? - تغيير درايو : براي تغيير درايو از دستور ChDrive استفاده مي شود مثال :

    ChDrive "E:"x

    ? - ساخت دايرکتوري : براي ايجاد دايرکتوري جديد از دستور MKDir استفاده مي شود مثال :

    MKDir "c:\MyFolder"x

    ? - حذف دايرکتوري : براي حذف دايرکتوري از دستور RmDir استفاده مي شود مثال :

    RmDir "C:\MyFoler"x

پيش گزيده