نبدأ على بركة الله دورة الفجوال بيسك

[محمد سراج]

فهرس بسيط


*تكوين البرنامج فى لغه vb
*تسميه عناصر VB
*البيانات التى يتعامل معها vb وأنواعها وأمثله
*الثوابت
*المتغيرات
*كيفيه ألاعلان عن المتغيرات وأهميته وقواعده
*الفرق بين Explicit Declaration وImpilicit Declaration
*كيفية ألاستغناء عن Dim
*مثال للناس الهكيره على أسخدام المتغيرات فى برنامج Barok[/COLOR]

#البرنامج فى لغه vb
يتكون البرنامج من مجموعه من ألاسطر وتستطيع كتابة عدة أسطر متصله يفصل بينها العلامه ':'
مثال :
x=5 : y=6 : z=8
والسطر الواحد فى البرنامج يسمح حتى 255 فراغ .. كل فراغ space عباره عن ضغطه منفصله واحده على لوحه المفاتيح ولكن إذا زاد طول السطر عن 255 فإنه لا يمكن الأسكمال عليه ويكمل على السطر الذى يليه

#ألاحرف chracters
كل لغه برمجه تحوى أحرف , فى لغه vb يمكن تقسيم الأحرف الى ثلاثه أنواع 1- أحرف هجائيه A-Z,a-z
2- أحرف عدديه 0-9
3- أحرف خاصة مثل + ,-,:,()...

#البيانات
أنواع البيانات التى تتعامل معها لغه الفيجول (Data Type)
تدعم لغة البيسيك ثلاثه أنواع من البيانات
1- بيانات عددية Numeric
2- بيانات حرفية/نصية (string/text)
3- بيانات متغيره النوع (variant)
ونتناول شرحهما فيما يأتى :


أولاََ:- البيانات العدديه(Numeric Data)
سأوضح أنواع البيانات العددية المختلفه وحجم الذاكره المطلوبه لخزين الوحده فيها وكذلك مدى كل من هذه البيانات





ثانياََ : البيانات الحرفية/النصيه (String data/text)وهى نوعان
* بيانات حرفيه ثابته الطول Fixed-length string
* بيانات حرفيه متغيره الطول Variable -length string
ويتم وضع هذه البيانات بين العلامتين ""


ثالثاََ:البيانات متغيره النوع Variant Data
من أسمها نستنتج أن نوع البيانات يتغير حسب محتوياها هذا النتغير قد يحتوى على بيان عددى أو حرفى على سبيل المثال :
"16" =IX
تعنى أن المتغير IX نوعه حرفى "نصى" وقيمته 16 وعند كتابه ألامر
print IX-2
فن المتغير IX يتغير نوعه ويصبح بيانات عدديه بدلا من كونه مجرد نص والسبب يجع إلى دخوله فى عمليه طرح "بيئه حسابيه "
وهذا السؤال سيوضح ألامر بالنسبه لك أكثر
هل هذا السطر صحيح أم لا؟
print "16" * 2
وإلاجابه ان السطر غير صحيح لأنه يعنى عمليه ضرب بيانات عدد' 2 ' فى بيانات نصيه "16"
والفرق بين السطرين أننا استخدمنا المتغير IX والذى حول من النوع النصى الى النوع العددى عند دخوله عمليه حسابيه .

ألاسم :تسميه عناصر Vb
أى عنصر من عناصر Vb له شخصيه مستقله identity وبالتالى يجب إعطاء اسم دال عليه ,وهناك قواعد يجب اتباعها عند تسميه عنصر من عناصر vb
*الأسم مجموعه من ألاحرف الهجائيه والعدديه ,غير مسموح بإستخدام الحروف الخاصه مثل +, -
*يبدأ ألاسم بحرف هجائى .
*لا يكون ألاسم من الكلمات المحجوزه تبع اللغه
*طول ألاسم يصل ألى 200 حرف فى مغظم ألاحوال : مع الثوابت ,المتغيرات ,ألاسماء الروتينيه
أما فى حاله التحكم controlsوالاشكال forms وclass وmodules فإن طول ألاسم لا يزيد عن 40 حرف ف جميع ألاحوال ويفضل ان يكون ألاسم دال على شىء

الثوابت constantsهى عباره عن قيم ثابته لا غير أثناء تشغيل البرنامج فمثلا نحن نعرف أن PI=22/7
فهى قيمه ثابته ويمكن أخبار vb عن الثوابت بأسخدامconst ويكون شكلها
const Name=value
أو
const Name As data Type=value
أمثله:
const PI =3.141
public const Pi As Double =3.141925358979
"const paper As string ="hello world
private const X=30


*المتغيرات
لبمتغير هو ذلك الشىء الذى قد تتغير قيمته أثناء سير البرنامج ,فالمتغير variable هو اسم سخدمه لحمل قيمه مغيره فمثلا "إذا أردت أن تسأل المستخدم عن اسمه ، فاسم المستخدم قيمة متغيرة لأنك لاتعرف ماهو . فممكن أن يكون "علي" أو "أحمد" أو "محمد" أو أي اسم آخر . لذلك نستخدم له متغير ، وليكن UserName$ في هذه الحالة يمكنك كتابة الأمر :

("أدخل اسمك من فضلك")$UserName$ = InputBox

سيعرض "فيجول بيسيك" مربع حوار التالي :



http://www.geocities.com/thensync2002/ex.jpg





ملاحظة : يستخدم امر $Inputbox لطلب معلومة من المستخدم.
شرح السطر السابق هو :

أن "فيجول بيسيك" يتيح للمستخدم أن يدخل اسمه في الخانة الموجودة في أسفل المربع .

وعندما ينتهي المستخدم من إدخال الاسم ، فإن "فيجول بيسيك" يضع هذا الاسم في المتغير $username. ويبقى هذا المتغير يحمل هذه القيمة حتى تقوم بتغييرها.

ويمكنك استخدام القيمة التي يحملها المتغير كأن تضعها في متغير آخر ، مثل :

$clientName$ = UserName

فهنا سينسخ "فيجول بيسيك" القيمة الموجودة في المتغير $username ويضعها في المتغير $cilentname . ويمكن أن تضع هذه القيمة في أداة القائمة مثلاً :

$list1.additem username

ويمكنك تغيير القيمة التي يحملها المتغير بوضع قيمة جديدة داخله ، فيلغي "فيجول بيسيك" القيمة القديمة ويضع محلها القيمة الجديدة . مثلاً :

"رفعت أسماعيل"=$username
وهذا المتغير يُسمى متغير حرفي string variable لأنه يحتوي على مجموعة حروف . وتوجد كذلك متغيرات عددية وهي تستخدم لحمل الأعداد وليس الحروف . فمثلاً يمكنك أن تسأل المستخدم عن عمره وتضع القيمة التي يدخلها في متغير عددي :

("أدخل عمرك ، من فضلك")$userage = inputbox

ويتميز المتغير العددي بإمكانية إجراء العمليات الحسابية مثل الطرح والضرب والقسمة عليه مثل برنامج الوحدات الذي قمتُ ببرمجته وشرحة

اختيار اسم المتغير
هناك شروط لاختيار اسم المتغير منها :

· يجب ألا يزيد اسم عن 40 حرفاً

· يجب أن يكون أول حرف منه حرفاً هجائياً

· يجب ألا تستخدم كلمة من الكلمات المحجوزة reserved words كأسم للمتغير من الكلمات المحجوزة print و end ولكن يمكن أن تكون جزء من اسم اخر مثل PrintText

أنواع المتغيرات :


Integer
Long
Single
Double
Currency
String
Variant

وأنشاء الله حأعمل جدول بصفحه html بشكل وضيحى أكثر لحجم كل منهم فى الذاكره




الإعلان عن المتغيرات
الإعلان عن المتغير أن تخبر "فيجول بيسيك" عن اسم المتغير ونوعه ، مثل :

Dim UserName As String

فهنا الأمر Dim يخبر "فيجول بيسيك" أننا نريد أن نعلن عن متغير ونجز له مكان بالذاكره ، وكلمة UserName كمتغير يحمل سلسلة حروف . في هذه الحالة ، يقوم "فيجول بيسيك" بحجز الذاكرة الضرورية لذلك المتغير وتهيئته .

لاحظ أن الإعلان عن المتغير ليس إجباري

الفائدة من الإعلان عن المتغيرات

عدم الإعلان عن المتغير قد يؤدي أحياناً إلى أخطاء خفية في برنامجك .فمثلاً انظر السطرين التاليين :
("أدخل اسمك")$username$ = inputbox

print usename$

سيقوم السطر الأول بالتنفيذ ويطلب المستخدم بالاسم ولكن لن يطبع اسم المتغير لإن الكلمة خطا (ناقصة حرف r ) ومع ذلك سوف يقوم"فيجول بيسيك" بتنفيذ البرنامج بدون أي مشاكل

ولحل هذه المسألة ، يمكنك أن تخبر "فيجول بيسيك" أن يعرض رسالة خطا عند ورود أي متغيرات لم يسبق الإعلان عنها . وذلك عن طريق استخدام الأمر :

Option Explicit

ويتم الإعلان عن المتغيرات باستخدام أحد الأوامر التالية :

Dim ,Global ,Static

يجب الإلتزام بنوع المتغير

مثلا :

لا يجوز أن تعلن عن متغير عددي وتضع فيه قيمة حرفية

والعكس صحيح كذلك

مدى المتغيرات وعمرها :

المتغيرات العامة

المتغير العام هو المتغير الذي يمكنك أن تستخدمه من أي مكان في البرنامج ، أي أن مداه يشمل جميع البرنامج بجميع ملفاته ونوافذه .

ويبقى في الذاكرة طوال فترة عمل البرنامج ولا يحذف من الذاكرة إلا بعد انتهاء البرنامج .

ولكن يجب أن تضع الإعلان عن المتغير العام في ملف برمجة وليس في نافذة .

طريقة ادخال المتغيرات التي ترغب في جعلها متغيرات عامة هي

Global UserName As String

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

وكما ذكنا أن له vb تدعم أنواع مختلفه من المتغيرات
عددى Numeric, حرفى string و Boolean و Data و object و Variant
وإذا وجد فى برنامج متغير ما من هذه الأنواع يجب إبلاغ vb عن هذا المتغير ونوعه (declaration) والسبب فى إلاعلان عن المتغير هو مساعده مرجم اللغه (compiler) لتحديدالعدد اللازم من البيانات فى الذاكره لهذا المتغير حيث أن كل من هذه المتغيرات قد يحتاج إلى بيانات تختلف بإختلاف نوعه .وللأعلان عن المتغير كما ذكنا سابقا نستخدم مثلا Dim وتكون على الصوره
Dim VariableName As Type
مع مراعاه قواعد التسميه
أمثله:
Dim M As Integer
Dim M1 As Integer
Dim title As String
Dim M1 As Integer,N1 As Integer,X1 As iteger
ومن الواضح أن المغيرات السابقه X,N1,M1,title,M تم ألاعلان عننوعها مقدما .. ويسمى هذا ألاعلان عن المتغيرات بإلاعلان الصريح "Explicit Declaration" لكن هناك طريقه أخرى للإعلان عن نوع المتغير
تسمى إلاعلان الضمنى "Implicit Declaration"وتكون على الصوره
Dim VariableName
فى هذه الحاله يتولى vb حديد نوع المتغير طبقا للقيمه التى سوف يأخذها هذا المتغير لكن لا ينصح بإسخدامها نظرا لأنها تأخذ مساحه من الذاكره على الفاضى .
Dim x
x=49.9
فى هذه الحاله يحدد vb نوع المتغير على أنه عدد حقيقى
اما اذا كان "x="title فيحدد نوع المتغير x على أنه String اى نصى
والشكل العام لهذا إلاعلان الضمنى هو :
Dim VarName1,VarName2
ويمكن الاستغناء عن العباره Dim وألاكتفاء بالاعلان عن نوع المتغير بإلحاق اسم المتغي بعلامه دل على نوعه:

A$ for string

A% for Integer

A& for long

A! for single

A# for Double

وهذا المثال المسخدم فى برنامج Barok لتحريك أسم الفورمه بعد وقت معين هو خير مثال يمكن وضعه هنا كمثال على المتغيرات variables
يتبع

[محمد سراج]

لجعل أسم البرنامج يتغير كل مده معينه كما فى برنامج باروك
سنرسم timer على الفورم ونجعل المده بتاعه interval كما تريد ولتكن 1000
ثم نعرف للفيجول متغير وليكن المغير c
سنستخدم امرين مختلفين للتعريف وسنعرف الفرق بين ألاثنين وهما
Dim , Static
فلنعرف الاول المتغيرب static
فسيكون الكود كالأتى

Option Explicit


Private Sub Timer1_Timer()
select case c
static c as integer
case 0
form1.caption="اكتب ما تريده"
case 1
form1.caption="اكتب ما تريده"
case 2
form1.caption="اكتب ما تريده"
c=-1
End select
c=c+1
End Sub

جمله select case سأشرحها فى درس قادم ان شاء الله ولكن اعتقد أنها مفهومه هنا
المهم أننا عرفنا المتغير c وجعلنا له عده حالات بجمله select case بحيث يغير اسم الفورم بعد المده اللى حددناها مسبقا "1 ثانيه"واذا اردنا أن يعمل loop ويكرر الكلام فلازم بعد ما تكون c وصل للحاله 2 أن نخليها ترجع تانى للحاله case 0 فبعد case 2 لازم نخلى المتغير c يساوى -1
فنكتب الجمله دى c=c+1 وبكده البرنامج يعيد نفسه من عند case 0
شفتم المتغير c أخذ كام قيمه أثناء سير المشروع ؟
طيب تعالوا نستخدم Dim ونشوف حتنفع ولا لاء
اكيد مش حتنفع علشان لازم نعرف المتغير c باستخدام dim بحيث ما يكونش فى حدث التايمر حتى يستطيع المتغير ان يتغير مع قيم c المختلفه بمعنا اخر كألاتى:

Option Explicit

Dim c as integer


Private Sub Timer1_Timer()
select case c
case 0
form1.caption="اكتب ما تريده"
case 1
form1.caption="اكتب ما تريده"
case 2
form1.caption="اكتب ما تريده"
c=-1
End select
c=c+1
End Sub

أنشاء الله حيكون فيه تكمله لدرس المتغيرات حيكون فيها حاجات احترافيه وجديده

[محمد سراج]

هذه الواجهه سوف تظهر عند بدء تشغيل الفيجوال بيسك وفي الأسفل شرح لها.


يمكنك إزالتها من بدء التشغيل عن طريق تفعيل علامة الإختيار Dont't Show this dialog in the future




علامات التبيويب في أعلى الواجهة:

New : وتعني إختيار مشروع جديد

Existing : فتح ملفات مخزنة لديك .

Recent : قائمة بآخر الملفات التي قمت بفتحها حسب التاريخ


New يضم مايلي

Standard EXE : وهو يقوم بإنشاء برنامج تنفيذي بعد طلبك لذلك من ( Make EXE) في قائمة ( File ) .

Activex EXE : وهو أيضاً يقوم بإنشاء ملفاً له الامتداد ( DLL ) وهو ملف ذو برامج فرعيه مساعدة و هو لا يعمل بنفسه بل مع exe .

Activex DLL : وهو ينشئ ملفات لها امتداد EXE تعمل مع برامج إخرى لكي يعمل في شكل ( OLE ) .

Activex control : وهو يساعد على إنشاء ملف من نوع ( ocx ) و هي مهمة وتساعد على إحتواء واجهة مستخدم أو برامج فرعية .

Activex Document DLL : وهو يساعد على إنشاء ملف ذو امتداد ( DLL ) يقوم بتشغيل برامج على موقع في الانترنت .

Activex Document exe : يقوم بإنشاء ملفات تظهر على الانترنت .

Add In : وهو خاص بالفيجوال بيسك حيث يمكنك إضافة واجهة مع ما ذكر سابقاً خاصة بك .

VB Application Wizard : وهو معالج تلقائي في هذه اللغة يساعدك على إنشاء نوافذ عدة دون كتابة سطر واحد من النوع ( exe ) .

ISS Aplication : نقصد بـ ( ISS ) إختصار لكلمة ( Internet Information Server ) و يقوم بالتحضير لتصميم ( web class ) وهو ما يسميه المستخدم صفحات ( HTML ) .

Data project : تضع مشروعاً لقواعد بيانات وتهيئة في بيئة متكاملة من أدوات الربط وصنع التقارير دون الحاجة لفتح برامج أخرى .

Vb wizard manager : و تبدو مشابهة لمعالجات ( Microsoft ) يمكنك إستخدامه .

DHTML Application : تسهل عليك صنع صفحات ( HTML ) ديناميكية للإنترنت دون تعلم لغة Java .

Vb Enterprise Edition controls : وهي تساعد على وضع جميع الأدوات المستخدمة بكثرة لقواعد البيانات و الاتصال ومن ثم تطبيقها وهي للمحترفين .




1. شجرة المشروع : ويقوم بعرض جميع المشاريع و النماذج للمشروع الحالي .



2. شريط القوائم : وبه قائمة الملف و التحرير و المشروع و التنسيق و متابع الاخطاء و التشغيل و كذلك الأدوات و الاضافة و النافذة وقائمة المساعدة .
3. نافذة البرنامج : و هي النافذة النشطة و التي تكون عاملاً عليها مثل ( Form1 ) .
4. نافذة الخصائص : وتظهر بها خصائص النموذج المفتوح حالياً وبها تنسيق لون الخلف والامام و الحجم و الموقع و الرؤية و التمكين وغيرها حسب كل أداة .
5. نافذة الأدوات : وهي تكون على يسار الواجهة وهي قد تكون نص أو عنوان أو صورة أو مؤقت وغيرها كثير جداً ما عليك إلا الضغط على الأداة و من ثم رسمها على نافذة البرنامج .

6. شريط الأدوات ( Toolbar ) :- وتعرض بها الأوامر التي تستخدم في الفيجوال بيسك بكثرة مثل القص و اللصق و التشغيل و غير ذلك .



مكونات لغة البرمجة فيجوال بيسك :


1- الوظائف ( Functions ) .
2- الطرق أو الوسائل ( Methods )
3- الأحداث ( Events )
4- مفاتيح المهام (Keywords by Task )
5- الخصائص ( Properties )
6- التعبيرات ( Statements )
7- الكائنات ( Objects )

وتحياتي

[محمد سراج]

تتكون لغة الفيجوال بيسك من مجموعة من التعليمات مكتوبة في أسطر وتعليمة الفيجوال بيسك تتكون من :

1- الكلمات المحجوزة للفيجوال للبيسك والخاصة بتعليمة معينة : مثلاً End و If وFor

2- المحارف والمتحولات والثوابت:


أولا_ المحارف

تستخدم لغة البيسك ثلاثة أنواع من المحارف هي:

أ - الأحرف الأنكليزية الصغيرة والكبيرة

ب - الأرقام من 0 الى 9

ج - محارف خاصة متعددة الأنواع :

- إشارات العمليات الحسابية : مثل: ^ / - + * . حيث أن الإشارة * ترمز إلى الضرب و الإشارة / ترمز إلى القسمة

و^ ترمز إلى رفع القيمة إلى س

- معملات الموازنة وهي : <> => > <= < = أصغر أو يساوي والإشارة <> تدل على عدم المساواة

- علامات الترقيم وهي الفاصلة والفاصلة المنقوطة والنقطة والنقطتان فوق بعضهما وإشارة الإسفهام وإشارة التعجب والفراغ والأقواس وعلامات التنصيص

- رموز أخرى مثل $ وإشارة النسبة % وإشارة العطف & ورمز الإعداد # والشحطة _ و(@) والخط المائل \



ثانياً - الثوابت Constants

الثابت قيمة تستخدم في البرنامج دون أن يطرأ عليه أي تغيير خلال تنفيذه وهي على نوعين :

1 - ثابت عددي وهذه القيمة تقسم إلى نوعين :

أ - ثابت عددي صحيح INTEGER

ب - ثابت عددي حقيقي REAL : وله شكلان

- شكل عشري : مثل 15.25

- شكل أسي : مثل E3 2.5

2 - ثابت محرفي STRING :

وهو تابع لمحارف مكتوبة بين علامتي التنصيص " " لا يستخدم الثابت المحرفي في العمليات الحسابية وإنما يعامله الكمبيوتر كنص

مثلاً لو أدخلنا التعليمة Print 2*3 فإنه سوف يظهر ناتج ضرب العددين أي 5

فإنه سوف يظهر الرقمان كما هما 3*2 Print "2*3" أما لوأدخلنا التعليمة



ثالثاً - المتحولات VARIABLES

المتحول هو رمز لمكان في الذاكرة الرئيسية تخزن فيه قيمة معينة ويجب أن يبدأ بحرف أبجدي ويمكن أن يتكون من عدد من المحارف يمكن أن يصل إلى 40 محرفاً

يحوي أحرف وأرقام ونقطة عشرية ولايجوز أن يحوي على فراغ ويمكن أن تتغير قيمته خلال عمل البرنامج وهو على نوعين هما:

1 - متحول عددي : تخزن فيه قيم عددية فقط

2 - متحول محرفي : وهو إسم محرفي يتبعه بالمحرف $



وتحياتي

[محمد سراج]

لو كان لديك عدة فورمات في برنامجك كيف ستظهر وتغلق النماذج .

أولاً بعد فتح الفيجوال بيسك وتجهيز الفورم الأول سوف يكون إسمه بالأساس Form1 غير خاصية Caption أي العنوان إلى "النموذج الأول"




أضف إلى الفورم زرين أمر وغير خاصية Caption لكل منهما







ثم أضف فورم ثاني Form2 وغير Caption إلى "النموذج الثاني"

أضف إلى الفورم الثاني زر أمر "عودة للنموذج الأول"




الأن سوف نبدأ بالعمل:

في الفورم الأول "النموذج الأول" أنقر فوق الزر "إظهار النموذج الثاني " نقرتان لفتح المكان المخصص لكتابة الشيفرة

أكتب الشيفرة التالية :

Unload Me

Form2.Show

السطر الأول يعني إغلاق الفورم الحالي أي "النموذج الأول"

السطر الثاني يعني إظهار الفورم الثاني الذي إسمه Form2



وفي الفورم الثاني أنقر فوق الزر "عودة للنموذج الأول " نقرتان وأكتب نفس الكود السابق ولاكن عليك تبديل Form2 إلى Form1

إذاً نستنتج أن شفرة إغلاق فورم لوحده هي Unload Me أو Form1.Hide إستبدل Form1 بإسم الفورم الذي تريد إخفائه



الأن عد إلى الفورم الأول وأنقر نقرتان فوق الزر " إغلاق البرنامج " وأكتب التعليمة التالية:

End

وهي تقوم بإغلاق كافة البرنامج أي كافة النماذج الموجودة

إذا تعليمة إغلاق نموذج واحد هي Unload Me

وتعليمة إغلاق كافة البرنامج هي End



هذا بالنسبة للإظهار والإغلاق . هناك تصغير الفورم عن طريق النقر فوق زر

أضف إلى أحد الفورمات السابقة زر أمر قم بستميته "تصغير"

أكتب التعليم التالية:

Form1.WindowState = 1

لاحظ أن WindowsState هي خاصية من خصائص الفورم ولها ثلاث خيارات

0 - Normal الوضع العادي

1 - Minimized أصغر حجم

2- Maximized أكبر حجم

في التعليمة السابقة لو وضعت رقم 2 فإن النموذج سوف يكبر إلى ملىء الشاشة



وتحياتي