دروس كمبيوتر وصيانة دروس حاسب دروس مجلة  درس نيوك phpnuke الدروس دروس مسنجر MSN - yahoo - Gmail دروس منتديات vBulletin دروس الجوالات والهواتف دروس السي بنل cpanel دروس اكسس access دروس بيونت شوب برو - point shop pro دروس برمجة php - mysql دروس برامج منوعة software دروس ثري دي ماكس 3D max دروس جافا سكريبت JavaScript دروس دريم ويفر DreamWeaver دروس شبكات Networks دروس سويش - swish دروس فلاش - flash دروس فيجوال بيسك Visual Basic دروس فرونت بيج - frontpage دروس فوتوشوب photoshop دروس هكر hacker crack virus
Visual Basic (5) - لفيجوال بيسك - Visual Basic
اعمال السعودية ينتهي في 8\10\1429 هـ روح القصيد ينتهي في 3\11\1429 هـ  ينتهي في20\10\1429 هـ
الحمادين ينتهي في 8\10\1429 هـ جريمة هزت مدينة الرياض ينتهي في 3\11\1429 هـ الجيل الجديد لخدمات الانترنت 8-8-1429
للاعلان بالموقع سعر الاعلان 400 ريال في كافة اقسام موقع مدرسة المشاغبين جويا نتهي في 20\10\1429 هـ للاعلان بالموقع سعر الاعلان 400 ريال في كافة اقسام موقع مدرسة المشاغبين
للاعلان بالموقع سعر الاعلان 400 ريال في كافة اقسام موقع مدرسة المشاغبين منتديات دلوعتي ينتهي في 16\11\1429 هـ للاعلان بالموقع سعر الاعلان 400 ريال في كافة اقسام موقع مدرسة المشاغبين
احصائيات سريعة
اقسام على الموقع
دروس في أنظمة التشغيل | ماي سكيول - MySQL | لفيجوال بيسك - Visual Basic | المات لاب Matlab | اللينكس و اليونكس | الاسمبلي - ASSEMBLY | الاوتلوك - Outlook | البرمجة تحت اللنكس -Linux Programming | البرمجة تحت وندوز بواسطة دوال ال win API | البرمجة في بيئة الدوت نت .Net | التصمبم والرسوم | الدلفي - Delphi | الجافا - Java | السي - C | الصوت و الصورة | الوورد - Word | القسم العام للأوفيس | الكوبول - COBOL | control panel-ftp | اوراكل - Oracle | اكسل - Excel | تحميل الملفات | برامج متنوعة | برامج التصفح | برامج الحماية | برامج إنترنت | تعرّف على الويب | بوربوينت - Power Point | images | دروس : كمبيوتر وصيانة | دروس مجلة نيوك phpnuke | دروس مسنجر MSN - yahoo - Gmail | دروس منتديات vBulletin | دروس الجوالات والهواتف | دروس السي بنل cpanel | دروس اكسس access | دروس بيونت شوب برو - point shop pro | دروس برمجة php - mysql | دروس برامج منوعة software | دروس ثري دي ماكس 3D max | دروس تطوير المواقع والمنتديات | دروس جافا سكريبت JavaScript | دروس دريم ويفر DreamWeaver | دروس شبكات Networks | دروس سويش - swish | دروس فلاش - flash | دروس فلاش mx | دروس فى نظام الوندوز WINDOWS | دروس فىالباسكال - Pascal | دروس فيجوال بيسك Visual Basic | دروس فرونت بيج - frontpage | دروس فوتوشوب photoshop | دروس هكر hacker crack virus | سي ++ | سي شارب - #C | فيجوال سي ++ - ++ Visual C | قسم البرمجة العام | دروس فى لغة HTML
البحث في المواد

اكثر المحتويات زيارة
الدوال في الاكسل (6,958 مشاهده)
ربط قاعدة بيانات أكسس (MS Access) مع برنامج الفيجوال بيسك بطريقة(ODBC) (4,597 مشاهده)
الدرس الثالث : بعض تطبيقات الدوال في اكسل (3,349 مشاهده)
شرح طريقة استعمال الأوتلوك مع بريد الهوتميل (2,728 مشاهده)
تغيير لغة واجهة التطبيق من عربي الى انجليزي وبالعكس لـ Windows-based applications (2,669 مشاهده)
تعريف الاستعلام وطريقة عرضه في آكسس، أنواع الاستعلامات، نافذة تحديد الاستعلام! (2,638 مشاهده)
الدرس الثاني: بعض الحيل لتسهيل برنامج اكسل (2,563 مشاهده)
أنواع العلاقات وطريقة الربط بين الجداول. (2,325 مشاهده)
دروس في الأوفيس الأكسس - Access0- (2,019 مشاهده)
أنشئ قاعدة بياناتك التي ستستند إليها في تعلم طريقة ربط الجداول والاستعلامات. (1,972 مشاهده)
مقدمة عامة حول الاكسل وحيل خاصة بالاكسل (1,953 مشاهده)
تعريف الفن التشكيلي: (1,947 مشاهده)
كيفية حل مشاكل الانترنت اكسبلور Internet Explorer (1,869 مشاهده)
الدرس الأول : عمل شريحة في البوربوينت (1,771 مشاهده)
اضافه صوت ونص لخلفيه في باور بوينت (1,690 مشاهده)
شرح طريقة التجميع Grouping في برنامج الاكسل (1,595 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس . (1,576 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,566 مشاهده)
التعرف على مكونات الكمبيوتر (1,516 مشاهده)
برنامج Windows Movie Maker لتكوين أفلام (1,489 مشاهده)
ما هو المات لاب MATLAB؟ (1,410 مشاهده)
كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Active Skin (1,390 مشاهده)
درس تعريب المجلة (1,349 مشاهده)
مقدمة عن لغة البيسك (1,322 مشاهده)
مقدمة في ربط قواعد البيانات داخل بيئة الـ .NET باستخدام الـ VB.NET (1,318 مشاهده)
جديد مواد مع عشوائي
التحويل التلقائي للحروف ل- ل- ه إلى اسم الجلالة0---- (964 مشاهده)
النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0---النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0--- (596 مشاهده)
ضبط خيارات اللغة فى الـ Microsoft Word0--- (735 مشاهده)
استخدام لوحة المفاتيح في الـ Word0---- (858 مشاهده)
إضافة كلمة سر إلي ملفات الورد دون استخدام برامج0--- (925 مشاهده)
دمج المراسلات0-- (530 مشاهده)
وضع صورة كخلفية للنص0-- (674 مشاهده)
السماح للمستخدمين بتعديل أجزاء من ملف وورد محمي (Word2003)0--- (469 مشاهده)
كتابة الأرقام الكسرية ورموز المعادلات0-- (771 مشاهده)
درس كامل عن الدمج السهل من لوحة المفاتيح ف0-ي برنامج الـ Word (506 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,566 مشاهده)
دورة الأكسيس : الدرس الرابع : العلاقات0---- (799 مشاهده)
أساسيات في Access0--0 (612 مشاهده)
تصميم تقرير لطباعة البيانات0---- (606 مشاهده)
تصميم نموذج استعراض البيانات‏0--تصميم نموذج استعراض البيانات‏0-- (598 مشاهده)
تصميم نموذج إدخال‎ ‎البيانات0--- (684 مشاهده)
إنشاء قوائم خاصة باستخدام الماكرو(1)0-- (554 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (2)0-- (460 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (1)0- (419 مشاهده)
استعلامات SQL في Access - تعديل الجداول وإضافة الحقول0- (570 مشاهده)
استعلامات SQL في Access - تحديث البيانات الجدولية0-- (497 مشاهده)
الاستعلامات الإجرائية -4 (استعلام الحذف)0--- (289 مشاهده)
الاستعلامات الإجرائية -2 (استعلام الإلحاق)0--- (378 مشاهده)
تصميم تقرير لطباعة الإجمالي0--- (394 مشاهده)
استعلامات التحديد Select Query مع أمثله (1)0--- (518 مشاهده)
اعلانات في الموقع على جميع الصفحات

Visual Basic (5)

أولاً : المعاملات


سوف نلخصها في هذا الجدول















































خاطئ إذا


صحيح إذا


مثال


معناه


المعامل


A  أصغر أو أكبر من B


A تساوي B


A  = B


يساوي


=


A تساوي B


A تختلف عن B


A  <> B


لايساوي


<>


A أكبر من أو يساوي B


A أصغر من B


A  <  B


أصغر من


>


A أكبر من  B


A أصغر من أو يساوي B


A <= B


أصغر من أو يساوي


=>


A أصغر من أو تساوي B


A  أكبر من B


A >  B


أكبر من


<


A أصغر من B


A أكبر من أو يساوي B


A >= B


أكبر من أو يساوي


=<


 


ملاحظة :


الرجاء من المبرمجين حفظ هذا الجدول



 


تركيب If…Then

























If


شرط


Then


أمر واحد


 


 


 


 


 


 


 


مثال

if


"علي"Pw$ <>


Then


end


فإذا كانت الكلمة التي أدخلها المستخدم تختلف عن <> عبارة  "علي" فإن الشرط يعد صحيحاً ويقوم "فيجول بيسيك" بتنفيذ الأمر الذي يلي كلمة Then وهو امر end وهو يقوم بإنهاء البرنامج .


يمكن تنفيذ عدة أوامر بالطريقة التالية




















If

شرط


Then


 


الاوامر

مجموعة


 


 


End if


 


 


 


 


مثال : (برنامج إدخال كلمة سر )


)"أدخل كلمة السر من فضلك"pw$ = inputbox$ (


then "علي"if  pw$ <>


beep


beep


"كلمة السر غير صحيحة"msgbox


end


end if


 


 



 



 


تركيب if…then ….else


وتكون صياغته بالشكل التالي :


then             شرطif         


              مجموعة أوامر


else


مجموعة أوامر


end if


في هذا التركيب يقوم "فيجول بيسيك" بتقييم الشرط ، فإن كان صحيحاً فإنه ينفذ مجموعة الأوامر التي تلي كلمة then حتى كلمة else وإن كان خاطئاً فإنه ينفذ مجموعة الأوامر


التي تلي كلمة else حتى كلمة end if . أي أنه لابد من تنفيذ إحدى المجموعتين من الأوامر . مثال :


)"أدخل كلمة السر من فضلك"pw$ = inputbox (


then "علي" if pw$ =


   "أهلا وسهلاً بك في البرنامج" msgbox


else


"هذا البرنامج مخصص لمجموعة محددة من المستخدمين"msgbox


end


end if




 


يقوم البرنامج بسؤال المستخدم عن كلمة سر فإذا كانت صحيحة فإنه يرحب به وأما إذا كانت غير ذلك يعرض عليه رسالة توضيحية وبعدها يخرج من البرنامج


 


تركيب Select Case


إذا كان لديك احتمال واحد أو احتمالين للشرط ، فإنه يمكنك إستخدام تركيبات if التي ذكرناها سابقاً . أما إذا كان لديك عدة احتمالات فإنه من الأفضل أن تستخدم تركيب Select Case وتكون صياغته كالتالي


الشرط select case    


الاحتمال الأول       Case


مجموعة أوامر


الاحتمال الثاني    Case   


مجموعة أوامر


الاحتمال الثالث     Case


مجموعة أوامر


………


إذا لم يكن أي من الاحتمالات السابقة Case  Else              


End Select

في هذا التركيب يقوم "فيجول بيسيك" بتقييم الشرط في بداية التركيب . ثم يبدأ في مقارنته مع الاحتمالات المختلفة التي تذكرها عند كلمة Case ، فإذا وافق أحدها الشرط ، فإنه يقوم بتنفيذ مجموعة الأوامر التي تليها حتى كلمة Case  التالية . وإذا لم يوافق أي من الاحتمالات المذكورة فإنه ينفذ مجموعة الأوامر التي تلي كلمة Case Elese ( وهي اختيارية ) فإذا لم تكن موجودة ، فإنه لانفذ أي من تلك الأوامر


وكمثال على تركيب Select Case  ، لنفرض أن لديك أربعة مستخدمين للبرنامج وتريد أن تحدد درجة المستخدم حسب كلمة السر التي يدخلها ، فإنك تكتب شيئاً مشابها لمجموعة الأوامر التالية :


 


 


"أدخل كلمة السر من فضلك"pw$ = inputbox (


المعيار الذي سنتفرع بناءاً على قيمته     select case pw$


هل هي الخفجي؟   "الخفجي" case


مجموعة الأوامر


هل هي الوفرة؟   "الوفرة" case


مجموعة الأوامر


ليست واحدة من الكلمات        Case Else


"كلمة السر غير صحيحة "msgbox


end


end selcet


 




 


التكرار :


التكرار loop يعني تكرار مجموعة معينة من الأوامر عدد معين من المرات . وهناك ثلاثة تركيبات لعمل ذلك وهي :


تركيب for …next


يستخدم إذا كنت تعرف عدد المرات التي ترغب في تكرارها ، وتكون صياغته كالتالي:


 













for


متغير يستخدم للعد


=


البداية


to


النهاية


step


الزيادة في كل مرة(اختياري


ضع مجموعة الأوامر التي تريد تكرارها هنا

 اسم المتغير    next


مثال :


إذا أردت أن تكرر مجموعة أوامر عشرة مرات مثلا قم بما يلي :


 


 


for counter = 1 to 10


مجموعة الأوامر


next counter


ويجب أن لا تعدل قيمة المتغير الذي يحمل عدد مرات التكرار


مثال


for counter = 1 to 10


درس Visual Basic (5)

أضف هذه المادة في موقعك:
مواد مشابهة:
كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Visual Creations Form Shape Control- كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Visual Creations Form Shape Control-
كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Visual Creations Form Shape ...
(مرات المشاهدة: 811 مرات)
Visual Basic (2) Visual Basic (2)
Visual Basic (2)
(مرات المشاهدة: 126 مرات)
التعامل مع زر الأمر Command Button التعامل مع زر الأمر Command Button
التعامل مع زر الأمر Command Button
(مرات المشاهدة: 239 مرات)
ربط قاعدة البيانات بإستخدام المعالج السحري 1 ربط قاعدة البيانات بإستخدام المعالج السحري 1
ربط قاعدة البيانات بإستخدام المعالج السحري 1
(مرات المشاهدة: 228 مرات)
كيف تعمل مجلد الـSETUP لبرنامج فيجوال بيسك كيف تعمل مجلد الـSETUP لبرنامج فيجوال بيسك
كيف تعمل مجلد الـSETUP لبرنامج فيجوال بيسك
(مرات المشاهدة: 405 مرات)
ربط قاعدة البيانات بالكود ربط قاعدة البيانات بالكود
ربط قاعدة البيانات بالكود
(مرات المشاهدة: 198 مرات)
الألوان من خلال فيجوال بيسك الألوان من خلال فيجوال بيسك
الألوان من خلال فيجوال بيسك
(مرات المشاهدة: 193 مرات)
نبذه عن الفيجوال بيسك نبذه عن الفيجوال بيسك
نبذه عن الفيجوال بيسك
(مرات المشاهدة: 894 مرات)
شرح النوافذ الرئيسيه للفيجوال بيسك شرح النوافذ الرئيسيه للفيجوال بيسك
شرح النوافذ الرئيسيه للفيجوال بيسك
(مرات المشاهدة: 304 مرات)
شرح نافذة الخصائص شرح نافذة الخصائص
شرح نافذة الخصائص
(مرات المشاهدة: 168 مرات)
جميع الحقوق في هذا الموقع محفوظة وكل المواد على الاقسام ملك لاصحابها :Copyright © All rights reserved