alwazer is an Arabic minister forum with topics منتديات الوزير العامة  
التعليمية الأدبية العامة الدليل أدلة فيديو صوتيات جوال بطاقات العاب برامج مقالات استضافة قصص القرآن هاكات بروكسيات مسجات تفسير الأحلام الأسرة المسلمة
فلاشات قبائل جافا الدروس الترجمة ابتسامات ستالايت الصحة تحميل دراسات النكت المطبخ شعر أزياء صور بحث ماسنجريات سكربتات عالم حواء إحداثيات المناطق
أخبار اسلام تصميم مطويات شات استايلات مكتبة أسهم مدونات برمجة دردشة قضايا رياضه هكر حماية تصوير سير فرات بلوتوث رفع الملفات الثقافة الجنسية

يالله حيه عسى ما شر يقولون انك غير مشترك معنا. حلفت عليك اشترك بالضغط هنــا
قديم 13 Oct 2007, 01:36 PM رقم المشاركة : 1
معلومات العضو
بن عبدالرحيم

نائب الوزير مالك الشبكة


الصورة الرمزية بن عبدالرحيم

الرعيل الاول: وسام الوزير للرعيل الأول المميز - السبب: تجده في كل مكان وأقرب الناس إليكوسام الوزير الخاص: يمنح لنواب الوزير فقط ومن هم في مرتبة الوزير في كل شي في الشبكة ويملكون خصائص الكنترول - السبب: الرجل الثاني الذي تستطيع الرجوع إليه بعد الوزير في الشبكة

افتراضي معالجة النصوص في فيجوال بيسك ( الأساسيات )

الدالة chr
chr(code)

تقوم الدالة chr بأخذ قيمة بين 0 و 255 وتعيد الحرف الممثل لهذه القيمة في جدول رموز ASCII، على سبيل المثال العبارة التالية :

Hi,
I'm "mubarmej"

ستجد أنك لا تستطيع كتابتها بهذا الشكل : myText = "Hi," & vbCrLf & "I'm "mubarmej""

لأن البرنامج سيعتقد بأن نهاية السلسة النصية السابقة هي عند علامات الاقتباس التي تقع مباشرة قبل كلمة mubarmej وستظهر لك رسالة خطأ، لذلك فإننا نلجأ لاستخدام الدالة chr حيث أن رمز علامة الاقتباس المزدوجة في جدول ASCII هو 34، فتكون الصياغة الصحيحة للعبارة البرمجية السابقة كالتالي : myText = "Hi," & vbCrLf & "I'm " & chr(34) & "mubarmej" & chr(34)

الدالة Len
Len(string)

ستجد فيما بعد حاجة في كثير من الأحيان لمعرفة طول السلسلة النصية ( عدد الأحرف )، ولعمل ذلك استخدم الدالة Len، مرر إليها النص وستعيد لك عدد الحروف. myLength = Len("mubarmej")

الدالة InStr
InStr([start ,]string1, string2[, compare])

يمكنك بواسطة هذه الدالة معرفة أول مكان يظهر فيه نص ما ضمن نص آخر أكبر منه.

الوسيطة الأولى هي وسيطة اختيارية تحدد مكان بدء البحث، أما الوسيطة الثانية string1 فتحدد السلسلة النصية التي سيتم البحث فيها، والوسيطة الثالثة string2 تحدد السلسلة النصية التي سيتم البحث عنها في السلسلة الأولى، أما الوسيطة الأخيرة فهي اختيارية أيضا وتحدد نوع المقارنة التي يجب إجرائها وهي تأخذ أحد الثوابت التالية :

0 - vbBinaryCompare

1 - vbTextCompare

والفرق بينهما هو أن الأولى تراعي حالة الأحرف والثاني لا تراعي حالة الأحرف.

في المثال التالي الدالة i ستحتوي على القيمة 1 : i = InStr("mubarmej","m")

وأما المثال التالي فستحتوي i فيه على القيمة 6 : i = InStr(2,"mubarmej","m")

حيث أن الدالة في المثال السابق ستبحث عن الحرف m بادءة من الحرف الثاني ولذلك فهي لن تجد الحرف الأول.

الدالة str
Str(number)

قد تبدو الدالة str متشابهة مع الدالة chr، إلا أنها تؤدي وظيفة مختلف تماما، فهي تحول الأرقام إلى سلاسل نصية، وهي تفيد مثلا في حال أردت أن تقوم بالتحام بين رقمين فتقوم بتحويل كل منهما إلى سلسلة نصية وتطبق بينهما جمع السلاسل ( & ) الذي يختلف عن جمع الأرقام وبالتالي تحصل على سلسلة جديدة يمكنك أن تحولها إلى رقم من جديد، على سبيل المثال الدالة myNumber تحتوي على القيمة 123456. myNumber = Str(123) & Str(456)

ستواجهك مشكلة في الشفرة السابقة حيث يقوم فيجوال بيسيك بإضافة مسافة قبل كل سلسلة نصية تنتج من الدالة السابقة، ستعرف فيما بعد كيف تعالج هذه المشكلة
__________________

تستطيع أن ترى الصورة بحجمها الطبيعي بعد الضغط عليها
تستطيع أن ترى الصورة بحجمها الطبيعي بعد الضغط عليها

بن عبدالرحيم غير متواجد حالياً   رد مع اقتباس
إعلانـات تــجـــاريـــة
قديم 22 Nov 2007, 12:36 PM رقم المشاركة : 2
معلومات العضو
أنا سالي
اللجنة التنفيذية في شبكة الوزير العالمية

الصورة الرمزية أنا سالي

افتراضي

كل الشكر والتقدير لك على هذه البرامج الرائعة بروعتك اخي الكريم

يعطيك العافية ماقصرت مجهود متميز جدا
__________________

تستطيع أن ترى الصورة بحجمها الطبيعي بعد الضغط عليها

أنا سالي غير متواجد حالياً   رد مع اقتباس
إعلانـات تــجـــاريـــة
رد



الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 
أدوات الموضوع
طرق مشاهدة الموضوع

تعليمات المشاركة
لا تستطيع كتابة مواضيع
لا تستطيع كتابة ردود
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
معالجة النصوص في فيجوال بيسك ( الإقتطاع ) بن عبدالرحيم وزارة لغات البرمجة Programming Languages 1 22 Nov 2007 12:35 PM
معالجة النصوص في فيجوال بيسك ( التحوير ) بن عبدالرحيم وزارة لغات البرمجة Programming Languages 2 22 Nov 2007 12:33 PM
معالجة النصوص في فيجوال بيسك ( المقدمة ) بن عبدالرحيم وزارة لغات البرمجة Programming Languages 2 22 Nov 2007 12:31 PM
كيف تنشيء قاعدة بيانات في فيجوال بيسك بن عبدالرحيم وزارة لغات البرمجة Programming Languages 1 22 Nov 2007 12:11 PM
درس سريع : اللغة العربية في فيجوال بيسك بن عبدالرحيم وزارة لغات البرمجة Programming Languages 3 19 Nov 2007 12:27 AM


الساعة الآن: 04:31 AM

بحث مخصص
sitemap sitemap Powered by MyPagerank.Net

Powered by vBulletin® Version 3.6.7, Copyright ©2000 - 2008, Tranz By Almuhajir
جميع الحقوق محفوظة ل شبكة الوزير العالمية

SEO by vBSEO 3.1.0 ©2007, Crawlability, Inc.