التعامل مع Flex Grid 1 - لفيجوال بيسك

$اعمال السعودية ينتهي في 8\10\1429 هـ$	$روح القصيد ينتهي في 3\11\1429 هـ$	$ينتهي في20\10\1429 هـ$
$الحمادين ينتهي في 8\10\1429 هـ$	$جريمة هزت مدينة الرياض ينتهي في 3\11\1429 هـ$
	$جويا نتهي في 20\10\1429 هـ$
	$منتديات دلوعتي ينتهي في 16\11\1429 هـ$

احصائيات سريعة

الرئيسية
اضافة
اتصل بنا
mnu1

اقسام على الموقع

البحث في المواد

اكثر المحتويات زيارة

الدوال في الاكسل (6,929 مشاهده)
ربط قاعدة بيانات أكسس (MS Access) مع برنامج الفيجوال بيسك بطريقة(ODBC) (4,570 مشاهده)
الدرس الثالث : بعض تطبيقات الدوال في اكسل (3,334 مشاهده)
شرح طريقة استعمال الأوتلوك مع بريد الهوتميل (2,686 مشاهده)
تغيير لغة واجهة التطبيق من عربي الى انجليزي وبالعكس لـ Windows-based applications (2,644 مشاهده)
تعريف الاستعلام وطريقة عرضه في آكسس، أنواع الاستعلامات، نافذة تحديد الاستعلام! (2,620 مشاهده)
الدرس الثاني: بعض الحيل لتسهيل برنامج اكسل (2,534 مشاهده)
أنواع العلاقات وطريقة الربط بين الجداول. (2,286 مشاهده)
دروس في الأوفيس الأكسس - Access0- (1,981 مشاهده)
أنشئ قاعدة بياناتك التي ستستند إليها في تعلم طريقة ربط الجداول والاستعلامات. (1,948 مشاهده)
مقدمة عامة حول الاكسل وحيل خاصة بالاكسل (1,938 مشاهده)
كيفية حل مشاكل الانترنت اكسبلور Internet Explorer (1,833 مشاهده)
تعريف الفن التشكيلي: (1,778 مشاهده)
الدرس الأول : عمل شريحة في البوربوينت (1,758 مشاهده)
اضافه صوت ونص لخلفيه في باور بوينت (1,658 مشاهده)
شرح طريقة التجميع Grouping في برنامج الاكسل (1,567 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس . (1,555 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,549 مشاهده)
التعرف على مكونات الكمبيوتر (1,490 مشاهده)
برنامج Windows Movie Maker لتكوين أفلام (1,475 مشاهده)
ما هو المات لاب MATLAB؟ (1,381 مشاهده)
كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Active Skin (1,375 مشاهده)
درس تعريب المجلة (1,342 مشاهده)
مقدمة في ربط قواعد البيانات داخل بيئة الـ .NET باستخدام الـ VB.NET (1,309 مشاهده)
مقدمة عن لغة البيسك (1,304 مشاهده)

جديد مواد مع عشوائي

التحويل التلقائي للحروف ل- ل- ه إلى اسم الجلالة0---- (953 مشاهده)
النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0---النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0--- (583 مشاهده)
ضبط خيارات اللغة فى الـ Microsoft Word0--- (711 مشاهده)
استخدام لوحة المفاتيح في الـ Word0---- (840 مشاهده)
إضافة كلمة سر إلي ملفات الورد دون استخدام برامج0--- (906 مشاهده)
دمج المراسلات0-- (521 مشاهده)
وضع صورة كخلفية للنص0-- (662 مشاهده)
السماح للمستخدمين بتعديل أجزاء من ملف وورد محمي (Word2003)0--- (463 مشاهده)
كتابة الأرقام الكسرية ورموز المعادلات0-- (759 مشاهده)
درس كامل عن الدمج السهل من لوحة المفاتيح ف0-ي برنامج الـ Word (494 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,549 مشاهده)
دورة الأكسيس : الدرس الرابع : العلاقات0---- (790 مشاهده)
أساسيات في Access0--0 (597 مشاهده)
تصميم تقرير لطباعة البيانات0---- (590 مشاهده)
تصميم نموذج استعراض البيانات‏0--تصميم نموذج استعراض البيانات‏0-- (581 مشاهده)
تصميم نموذج إدخال‎ ‎البيانات0--- (678 مشاهده)
إنشاء قوائم خاصة باستخدام الماكرو(1)0-- (544 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (2)0-- (451 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (1)0- (409 مشاهده)
استعلامات SQL في Access - تعديل الجداول وإضافة الحقول0- (560 مشاهده)
استعلامات SQL في Access - تحديث البيانات الجدولية0-- (489 مشاهده)
الاستعلامات الإجرائية -4 (استعلام الحذف)0--- (281 مشاهده)
الاستعلامات الإجرائية -2 (استعلام الإلحاق)0--- (369 مشاهده)
تصميم تقرير لطباعة الإجمالي0--- (389 مشاهده)
استعلامات التحديد Select Query مع أمثله (1)0--- (508 مشاهده)

دروس كمبيوتر وصيانة دروس حاسب دروس مجلة درس نيوك 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 > التعامل مع Flex Grid 1

الاسم: التعامل مع Flex Grid 1 التعامل مع Flex Grid 1

مرات القرائه: 157 مرة/مرات

التقييم:

قم بدعوة صديق

اعلانات في الموقع على جميع الصفحات

التعامل مع Flex Grid 1

التعامل مع Flex Grid

التعامل مع Flex Grid

ان أداة FlexGrid احدى ادوات اظهار البيانات في شكل شبكي او جدولي ان صح التعبير سنتطرق في هذا الدرس الى كيفية وضع نتائج استفسار فيها واظهاره للمستخدم وكذلك بعض الافكار في التعامل مع هذه الاداة

قبل كل شيء دعنا نقوم بإعطائك الصورة التي نريد ان نصل اليها في النهاية لكي تكون على علم بما سنعمل عليه ا

انظر الصورة التالية :

لكي نبدأ بالدرس اضف مشروع جديد و انشأ او استخدم اي قاعدة بيانات و اربطها في البرنامج كما تعلمنا سابقا ، وسنفترض ان قاعدة البيانات التي سنتعامل معها اسمها db وفيها جدول باسم tb ويحتوي على الحقول التالية namd و job و age سنكتفي بثلاثة حقول بعد ذلك يجب ان تضيف اداة هذه الشبكة ولفعل ذلك ، اذهب الى قائمة project >> combonent او اضغط على ctrl+T ستفتح لك قائمة المكونات اختر منها المكون التالي وضع بجانبه علامة صح Microsoft FlexGrid Control 6.0

كما هو موضح في الصورة

بعد ان تحدد المكون الذي في الصورة السابقة اضغط Ok لتضيف المكون للمشروع وتعود للمشروع

بعد ذلك اختر الاداة الخاصة برسم FliexGrid كما هو مبين في الصورة التالية وارسم على الفورم مساحة معقولة تأخذ تقريبا ثلث الفورم

اضغط بالزر الايمن على الشبكة التي قمت برسمها واختر Properties ستفتح لك نافذة الخصائص وفي علامة التبويب General يمكنم اختيار عدد الصفوف من الخاصية Rows وعدد الاعمدة من الخاصية Cols كما يمكنك تحديد عدد الاعمد التي تكون بلون داكن كمفتاح للشبكة من الخاصيةFixed Cols او الصفوف التي بلون داكن من الخاصية Fixed Rows

الان سنتعلم التحكم بخصائص FlexGrid بواسطة الكود ، يجب ان تعلم ان جميع الاوامر التي تكتب لهذه الاداة غالبا ما تكتب في حدث التحميل للفورم Load ، ومن الخصائص التي يجب ان تتعلمها هي التحكم في عرض الصفوف مع العلم بأن الصفوف مرقمة من اليسار الى اليمين ابتداء من الصفر واذا اردنا مثلا ان نغير عرض العمودين رقم 0 و 3 مثلا ونريد ان يكون عرضهما 2000 و 1000 على التوالي

فإننا سنحتاج الى كتابة الكود التالي :

MSFlexGrid1.Colwidth(0) = 2000

MSFlexGrid1.Colwidth(3) = 1000

مع العلم بأن اسم الاداة في المكود السابق هو MSFlexGrid1، لاحظ أننا نقوم بحصر رقم الصف بين قوسين

والان كيف سنقوم بوضع عناوين الحقول على الاعمدة في هذه الشبكة لكي نفرق بين الحقول ، الفكرة بأن تقوم بتحديد الخلية بالصف و العمود بعد ذلك تكتب النص المراد ، مثلا نريد أن نكتب عنوان الحقل الاول وهو "الاسم " في العمود الاول وعنوان الحقل الثاني وهو " العمل " في العمود الثاني

فماذا سنعمل انظر للكود التالي وستعرف

MSFlexGrid1.Row = 0

MSFlexGrid1.Col = 0

MSFlexGrid1.Text = "الاسم "

MSFlexGrid1.Col = 1

MSFlexGrid1.Text = "العمل"

لاحظ أننا في اول سطرين من الكود السابق قد قمنا بتحديد اول خلية على اليسار في الزاوية العليا وذلك بتحديد احداثياتها وهي الصف الاول والعمود الاول ، ثم قمنا بكتابة العنوان بالخاصية Text ، مع العلم بأن البرنامج يقوم بتخزين احداثيات اخر خلية تقوم بكتابتها ، لذلك وعندما نكتب احداثيات النقطة الثانية ستتفيد من هذه الميزة فسنكتب احداثي العمود وهو 1 لأن الاحداثي السابق للصف هو 0 وهو مخزن فماذا نكتبه مرة اخرى مادمنا لانحتاج لتغييره ، بعد ذلك نكتب العنوان باستخدام الخاصية Text كما فعلنا مع الاولى ونستمر بهذه العملية اذا احتجنا الى عناوين اخرى ، وستظهر العناوين التي عملناها بالكود السابق كما الشكل التالي :

والان كيف نقوم بتعبئة البيانات من جدول او استعلام ؟

كما تعلمنا في الدروس السابقة فإننا نقوم بإنشاء جدول وهمي لكي نخزن فيه البيانات مؤقتا كما هو حال الرام RAM في الجهاز لتخزين البيانات لنتعامل معها وبعد اغلاق الجهاز تذهب المعلومات ، ان ديناميكية تعبئة البيانات بسيطة وسلسة ونحتاج اولا وضع عناوين الاعمدة كما تعلمنا في الفقرة السابقة ويكتب ذلك غالبا في حدث التحميل Load بعد ذلك يأتي دور تعبئة السجلات ، وقبل كل شيء اضف سطر يتأكد من وجود بيانات في الجدول لكي لاتواجه مشاكل ، بعد ذلك احسب عدد السجلات في الجدول ولفعل ذلك كما تعلمنا سابقا يجب اولا ان نمر على الجدول الى النهاية ثم نعود الى البداية لكي نستطيع ايجاد عدد السجلات بواسطة الخاصية Count نقوم بعد ذلك بعمل تكرار على عدد السجلات ونضع داخله كود يقوم بتعبئة البيانات بنفس الطريقة التي قمنا فيها بوضع عناوين الاعمدة ولكن يكون المصدر هو الجدول ،لن تفهم ما ذكرته الا عندما تشاهد الكود المطلوب والذي سأورده الان مع ملاحظة ان اسم الجدول الوهمي TB ويوجد به الحقول Name و Job ، مع ملاحظة ان اسم FlexGrid في الكود التالي هو flx1

If tb.RecordCount < 1 Then Exit Sub لكي نتأكد من وجود سجلات في الجدول او نخرج في عدمها

tb.MoveLast نتحرك الى الحقل الاخير

tb.MoveFirst نتحرك الى الحقل الاول

n = tb.RecordCount n نخزن عدد السجلات في المتغير

For i = 1 To n

flx1.Row = i رقم الصف حسب رقم التكرار

flx1.Col = 0 رقم العمود ثابت لأننا سوف نضع جميع القيم في للحقل في عمود واحد

flx1.Text = tb!Name نضع قيمة الحقل في الخلية المحددة

flx1.Col = 1

flx1.Text = tb!job

tb1.MoveNext نتحرك للسجل التالي

Next i

End Sub

ربما لا استطيع الشرح بوضوح بالكتابة لكن أسأل الله ان اكون قد استطعت ان اقطع شوطا كبيرا في الشرح ، على العموم يجب ان تحاول قراءة الكود وتطبيقة وكذلك وهو الاهم فهمه

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

ويوضح الكود التالي موقع الجملة من الكود السابق :

If tb.RecordCount < 1 Then Exit Sub

tb.MoveLast

tb.MoveFirst

n = tb.RecordCount

flx1.Rows = n + 1

For i = 1 To n

flx1.Row = i

flx1.Col = 0

flx1.Text = tb!Name

flx1.Col = 1

flx1.Text = tb!job

tb.MoveNext

Next i

End Sub

درس التعامل مع Flex Grid 1

أضف هذه المادة في موقعك:

مواد مشابهة:

	مقدمة عن ربط قاعدة البيانات بالكود 2 مقدمة عن ربط قاعدة البيانات بالكود 2 (مرات المشاهدة: 242 مرات)
	الفيجوال بيسك - مقدمة الفيجوال بيسك - مقدمة (مرات المشاهدة: 1,208 مرات)
	المصفوفات (الدرس الثاني) المصفوفات (الدرس الثاني) (مرات المشاهدة: 301 مرات)
	المصفوفات والمتغيرات(2) المصفوفات والمتغيرات(2) (مرات المشاهدة: 354 مرات)
	الطباعه الطباعه (مرات المشاهدة: 262 مرات)
	مقدمة عن ربط قاعدة البيانات بالكود 1 مقدمة عن ربط قاعدة البيانات بالكود 1 (مرات المشاهدة: 335 مرات)
	الدرس الثاني: إضافة البيانات إلى قاعدة البيانات الدرس الثاني: إضافة البيانات إلى قاعدة البيانات (مرات المشاهدة: 213 مرات)
	برمجة Dao من خلال فيجوال بيسك (1/4) برمجة Dao من خلال فيجوال بيسك (1/4) (مرات المشاهدة: 378 مرات)
	التعامل مع أشرطة التمرير التعامل مع أشرطة التمرير (مرات المشاهدة: 229 مرات)
	التعامل مع الحافظة التعامل مع الحافظة (مرات المشاهدة: 115 مرات)

التعامل مع Flex Grid 1 - لفيجوال بيسك - Visual Basic

درس التعامل مع Flex Grid 1