نجوم المشاركات

تعقب مهامك الأسبوعية واليومية بسهولة باستخدام قالب الجدول التفاعلي هذا. أضِف الأحداث إلى علامة التبويب "مجدول الأحداث"، وحدد اليوم المطلوب على علامة تبويب الجدول اليومي واسمح لـ Excel بمساعدتك في إدارة يومك. هذا القالب يمكن الوصول إليه. السنة الجديدة 2018 روعة من الابداعات قريبا. خطط الأعمال شهادات

السلام عليكم ورحمة الله وبركاته معكم المبرمج مناد سفيان من الجزائر أولا لقد اشتقت اليكم و الثانية أعتذر عن الاطالة لأني كنت في ألمانيا أنهي دراستي التكوينية لذا أرجوا من سيادتكم أن اقدم لكم موقعي و ماعليك الا بي التسجيل و ارسال الى بعض الطلبات البرامج الجاهزة و المتوفرة و التي دامت 06 أشهر و أربعة أيام و في الأخير تقبلوا مني فائق الاحترام و التقدير.www.verif.com/societe/MENNAD-SOFIAN-833028491/

السلام عليكم و رحمة الله تعالى و بركاته. إخوتي الكرام حياكم الله و جمعة مباركة إن شاء الله تعالى. لقد جئتكم اليوم بشيء جديد لم نتعود على القيام به بالإكسس. أضع بين أيديكم ساعة رقمية تشتغل على سطح المكتب في الركن العلوي الأيسر و يمكن تحريها كما نشاء. أولا لتشغيل البرنامج يجب تثبيت نوع الخط ديجتال المرفق مع البرنامج. ثانيا أهم نقطة في البرنامج أنه يشتغل مع إقلاع الونداوز بالضغط على زر "تشغيل مع الإقلاع". و يمكن إيقاف التشغيل مع الإقلاع بالضغط على زر "إيقاف تشغيل مع الإقلاع". و الصورة توضح ذلك: digital.rar

بوركت أستاذنا القدير

جزاك الله خير ابداع جميل الله يعطيك العافيه

تحياتي للغالين يمكن تجربة التالي وبمناسبة حضور اسمي بالمشاركة text1.visible=not isnull(text2) بالتوفيق

جرب هذا الملف تكرار بمعادلات SALIM.rar

جزاك الله كل خير

ماشاء الله أستاذ محدى يونس جعله الله في ميزان حسناتك

ملف جمبل جدا أستاذ مجدى يونس بوركت

عمل جميل أستاذ مجدى يونس شكرا

بارك الله فيك أستاذ مجدى يونس

اعرض الملف بدائل دالة textjoin الموجودة في إكسل 2016 لجميع إصدارات اكسل mastextjoin بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته موعدنا اليوم مع معلومة مفيدة جدا وخفيفة جدا ومهمة جدا في نفس الوقت وهي تصميم بدائل دالة TEXTJOIN الموجودة في اكسل 2016 وما بعده لجميع إصدارات إكسل لأنها دالة معرفة UDF . لمن يريد استخدام مزايا إكسل 2016 في جميع إصدارات إكسل بداية من 2003 و 2007 و 2010 و 2016 و 2019 دالة احترافية لدمج النصوص مع وضع فاصل بين قيم الخلايا وتجاهل الخلايا الفارغة mastextjoin بدائل textjoin الموجودة في إكسل 2016 وما بعده اللهم انفعنا بما علمتنا وعلمنا ما ينفعنا #a1mas #ostazmas #textjoin لماذا نستعمل دالة textjoin ؟ نبدأ أولا بمعرفة أن هذه الدالة توجد في أوفيس 2016 وما بعده ( أوفيس 365) وهي دالة لدمج النصوص مع تجاهل الخلايا الفارغة وعدم تكرار الفاصل في حالة إذا كانت الخلية فارغة. ولها 4 وسيطات: والصورة العامة لها هي: TEXTJOIN(delimiter, ignore_empty, text1, [text2], …) delemiter محدِد (مطلوبة) عبارة عن سلسلة نصية، إما أن تكون فارغة أو تكون حرفاً واحداً أو أكثر محاطاً بعلامات الاقتباس المزدوجة أو مرجعاً إلى سلسلة نصية صالحة. إذا تم إدخال رقم، فسيُعامل كنص. ignore_empty (مطلوبة) إذا كانت TRUE، فسيتم تجاهل الخلايا الفارغة. text1 (مطلوبة) هي العنصر النصي المطلوب دمجه. عبارة عن سلسلة نصية أو صفيف من السلاسل مثل نطاق من الخلايا. [text2, ...] (اختيارية) هي العناصر النصية الإضافية المطلوب دمجها. قد يكون هناك حد أقصى يبلغ 252 من الوسيطات النصية للعناصر النصية بما في ذلك text1. يمكن أن يكون كل عنصر منها عبارة عن سلسلة أو صفيف من السلاسل مثل نطاق من الخلايا. وإليكم هذا الفيديو لشرح الدالة وتوضيح كيفية استخدامها في إكسل 2016 وما البدائل لدالة textjoin في إكسل 2013 و 2010 و 2007 و 2003 وهي دالة mastextjoin ولا ينقصني سوى دعاؤكم لي ولأهلي وأحبابي -وأنتم منهم- بخيري الدنيا والآخرة. ومشاركة الموضوع مع من يهمه الأمر لو بخل بها غيرك ما وصلت إليك صاحب الملف أ / محمد صالح تمت الاضافه 26 ينا, 2018 الاقسام قسم الإكسيل  

السلام عليكم ورحمة الله وبركاتة برنامج شئون الطلاب بالمدارس .... هديه متواضعه للعاملين بالتربيه والتعليم فى انتظار ملاحظاتكم .. كلمة السر 1111 http://www.gulfup.com/?o4iEZn شئون الطلاب .rar

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

اخي الكريم هل ظهرت لك بالشكل كما بالصورة ام لا

مشاركة مع الاستاذ جعفر وبعد اذنه نريد ان نعرف طريقتك في اضافة تاريخ حركة البيع ؟ هل مستخدم حقل واحد به التاريخ والوقت ؟ ام مستخدم حقلين واحد به التاريخ والاخر الوقت ؟ وكيفية ادراج القيم ؟ هل تستخدم دالة date() او now() وكقيم افتراضية ؟ ام ماهي طريقة ادخال تاريخ ووقت العملية ؟ بالتوفيق

وعليكم السلام اخوي سلمان الرابط هذا فيه ملف تقدر تستفيد منه ومن الرابط ، اعتقد بأن هذه المعادلة تكفيك: IIf([النهاية]>[البداية],[النهاية]-[البداية],([النهاية]+1)-[البداية]) ولأن فيها كلمات عربية ، تم لخبطة مكان الحقول ، ولكن نسخها من هنا ولصقها في برنامجك سيكون صحيحا ، وهكذا تبدو بالصورة الصحيحة جعفر

تفضل Database6.rar

أهلين أخي أبو زاهر الله يحفظك يا غالي

لست أستاذ انا فقط متعلم لم يجتاز حتى الان الصف الأول الابتدائي ضع كود لفتح نموذج تحرير القائمة في حدث عند عدم الوجود في القائمة

وعليكم السلام ورحمه الله وبركاته حياك وابقاك استاذنا الكريم صالح حمادي جزاك الله خير ابداع جميل الله يعطيك العافيه تحياتي اليك

أهلين أخي sandanet أنا صممت البرنامج على أكسس 2010 و هجرت الأكسس 2007 لأنه سبب لي الكثير من المتاعب رغم تجربتي للعديد من النسخ و إرتحت نهائيا بعد الإنتقال لأكسس 2010 أنت تعرفني جيدا صديقي لا أضع برامجي إلا من أجل أن يستفيد منها الجميع و أريد أن أستفيد أنا أيضا من ملاحظاتهم ثم أضع البرنامج مفتوح.

نعم ، فقط الجداول المرتبطة ، لم أقرأ بوجود مشكلة في الصيغ التي ذكرتها انت. ---------------------------------------------------------------------- وفي موضوع آخر ، صادفتني مشكلة حذف قاعدة البيانات بالكامل في النسخة الاولى من 2007 ، عند عمل الضغط والاصلاح عند الخروج ، ولكن تم تعديل هذا في التحديثات اللاحقة ، ولكني وللأسف لازلت ارى النسخ الاولى من البرامج والغير مُحدثه ، ويتم استخدامها ، وحتى من قِبل مبرمجين. جعفر

السلام عليكم انا على علم بهذا الكود ، ولقد طوعته ليتعامل مع برامج خارجية ، ولكني توقفت من العمل وتطويره ، وحتى استعماله حينما قرأت: http://hitechcoach.com/component/content/article/61-access-databases/tables/63-how-to-hide-a-table المعلومة تقول بأن هناك عيب في بعض النسخ القديمة من JET يعني mdb ، والتي اذا استخدمت فيها هذه الطريقة لإخفاء الجداول المرتبطة ، ثم استعملت الضغط والاصلاح ، فرابط الجدول سينحذف من البرنامج. جعفر

السلام عليكم تم جعل قيمة "المدة" في عمود واحد مع قائمة منسدلة للحروف (ق - م - ط) وإضافة حالة أخرى وهي حالة ترك خلية عمود "المدة" فارغة فإن التاريخ يبقى ثابتا (لا يضاف له أي شيء) وهناك مثال على ذلك في الملف... بن علية حاجي ملف.rar

السلام عليكم اخي ابو ياسين اسمح لي اقول لك بأن هذه الطريقة غير صحيحة من ناحية قوانين قواعد البيانات!! قانون قواعد البيانات إدخال ، فرز و تصفية ، تقارير. . في جدول حركات ، انت جعلت الحقل "البيان" يحتوي على انواع مختلفة من البيانات ، فكيف ستفرز وكيف ستصّفي هذا الحقل!! حسب ما اراه من بيانات الحقل ، فانك ادخلت: - اسم_المورد "عالم النسيج" او "المرسام" ، ومرة بندر النهاري ومرة اخرى بند النهاري ، ... - نوع الدفعة: حاليا انت كاتب دفعة ، وبعد شهر بتكتب دفعة ثانية ، ثم دفعة ثالثة ، ... - معلومات اخرى: سداد فاتورة رقم 220 ، بيد العطاس فارق السعر ، دفع المرسام ، ... . يعني كيف بتعمل تصفية للسجلات اعلاه !! ومن ملاحظتي للمدخلات اعلاه ، فلا يمكن عمل تصفية ، لأن حتى اسم المورد مكتوب بأكثر من طريقة !! يعني كيف نتعمل تقرير لمورد معين مع وجود فارق في اسمه بين السجلات ، ولنوعية معينة من الدفعات ، ولطريقة دفع معينة!! مادام القلم بيدك ، فاعمل التغيير واضبط الامور ، اما اذا وصل البرنامج للعميل ، فالله يعينك!! يا ابو ياسين ، انا اعمل برامج من سنة 1984 ، فخذها نصيحة لله ، واستفيد من نصائح خبرتي ، واعد النظر في هذه الجزئية من برنامجك (انا فقط اشتغلت على هذه الجزئية ، فما اعرف عن الباقي) جعفر

السلام عليكم لم أطلع على ما قدمه الإخوة الكرام بالأعلى وهده محاولة أخرى مني حسب فهمي للمسألة... بن علية حاجي يناير2018.rar

السلام عليكم تعودنا فى منتدى اوفيسنا خلال السنوات الخمسة عشر الماضية على تحميل الملفات اما كصور او ملفات مضغوطة فقط بصيغتي rar , zip . و ذلك للحفاظ على المساحة و لسهولة رفع و تنزيل الملفات. الان يمكن تحميل انواع عديدة من الملفات كما هو موضح بالصورة ، و لكن ننصح بضغط الملفات في حالة المفات الكبيرة الحجم ايا كان امتدادها

السلام عليكم ورحمة الله وبركاته تحية طيبة وبعد.. منذ مدة وانا اعمل على برنامج لتشغيل ملفات الفيديو من خلال الاكسس وهذا البرنامج كان مطروح في احدى المنتديات الاجنبية لكنه كان قيد التطوير لاحتوائه على مشاكل كثيرة لكني بحمد لله تمكنت بمساعدتكم من الانتهاء منه .. ارجو ان ينال رضاكم البرنامج بصيغة Accdb وقد عملت منه نسختين .. النسخة الاولى لاتحتاج الى نسخ الفيديوات الى مجلد البرنامج يكفي فقط ان تختار مكان الفيديو من على جهازك اما النسخة الاخرى فيجب عليك وضع الفيديوات في مجلد مع البرنامج اسمه media كما يجب عليك وضع كامل مجلد البرنامج في احدى اقراص الجهاز c او d او غيرها مباشرة وسيقوم البرنامج بضبط المسار تلقائياً باسورد الدخول لاضافة فيديوات الى البرنامج هو 12345 تحياتي AccessMediaPlayer.zip AccessMediaPlayer.zip أخي @sofiane05552 كنت تبحث عن هذا البرنامج ارجو ان يكون هو المطلوب

اتفضل اخي عملت لك كود اخذته من الاخ علي وهو الافضل والاخ جعفر jjafferr اذا شاف الكود بيفهم ماذا كنت تريد بالضبط واتمنى من الاخ جعفر يعمل موضوع كيف نستنتج مثل هذة الاكواد احتساب الكميه 333 (1).rar

تم الوصول للحل وهو جعل تاريخ الحركة والبيان مفتاح اساسي فكان لم يتكرر

وعليكم السلام في اعتقادي : 1. بأنك نسيت احد الحقول وما عملت لها تنسيق بتاريخ قصير ، 2. بالإضافة الى التنسيق في الاستعلام ، جرب اعمل التنسيق في الحقل التقرير نفسه ، 3. في اعدادات الوندوز ، جرب تغيير التاريخ الطويل الى تاريخ قصير ، فقد تكون نسيت شيء من الحقول في #1 ، فهذه الطريقة ستقوم بتعديلها : . في طريقة اخرى اقوم بها في برامجي ، وهي استخدام صيغة جاهزة من جدول ، فعليه ، لا يعتمد على اعدادات الوندوز في عمله (المهم ان تستخدم تاريخ ميلادي او هجري في برامجك/كمبيوترك) ، الرابط ادناه فيه الجدول وطريقة الاستخدام ، ولكن يجب تضيف حقل بالاشهر القصيرة جعفر

شو قصدك من هذه الجملة؟

السلام عليكم استعمل هذا الكود في مربع نص الرقم: =Format([num_card];"0000 0000 0000 0000") cards.rar

كنت عارف ومتأكد ان حضرتك اللى هتبدع فى الملف ده حل فى منتهى الروعة والابداع شكراً جزيلاً

تفضل الدالة الخاصة بالتحويل الى تاريخ ام القرى ، و هي موجودة ضمن الوحدة النمطية Me.StartDateH = UmR2L(Me.StartDate) في النموذج اكتب التاريخ الميلادي وسيتحول آليا الى تاريخ ام القرى كما صنعت لك استعلام تحديث لتحديث الحقول الخالية السابقة الوحدة النمطية اعدها وصححها الاستاذ ابو هادي فلا تنسونا من دعوة صالحة في ظهر الغيب تحويل التاريخ.rar

هل تقصد اعداد ترقيم الصفحات في اكسس

السلام عليكم ممكن توضح المطلوب أكثر أخي نبيل:

MERCIER MES AMES ARAB

جزاك الله كل خير

سمعت عن قصص في القديم يدعون بي الأباطر و انت مثلهم أستاذ مجدى يونس رجل خفي و له امكانيات لا حدود لها فأنا أول من أحترمك و أؤيدك فشكرا.

ما شاء الله غليك أستاذ مجدى يونس واصل ونحن دما معك

جرب هذا الملف اظهار النجمة للفراغ salim.rar

جزاك الله خيرا

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم جميعا بخير أحبابي في الله اليوم موعدنا مع فيديو جديد للمتقدمين في الإكسل إلى عشاق التميز في التعامل مع نماذج إكسل يشرح كيفية تصغير نموذج الإكسل إلى شريط المهام إخفاء برنامج الإكسل Hide excel window إضافة زر تصغير للنموذج add minimize button to userform إضافة أيقونة لشريط عنوان النموذج add icon to title bar for userform إضافة أيقونة للنموذج في شريط المهام add icon to userform to taskbar تصدير موديول export module استيراد موديول import moduleأي استفسار لا تتردد في كتابة تعليق ادعمنا ب لايك كومنت شير ولا تنسوني من صالح دعائكم

بسم الله الرحمن الرحيم أخوتي وأحبائي تغيبت عليكم لمرضى فأرجو فبول عذرى لاحظنا في حوارنا أن الملف الذى قمنا به يعمل على خير وجه ةلكن كل بيانات جديدة نرحلها تقع على البيانات القديمة فتمسحها وتأخذ مكانها وهذا عيب قاتل فكيف نعالج ذلك؟ نجعل الكود يبحث عن أول سطر خالى ويضع فيه البيانات الجديدة أو يبحث الكود عن آخر سطر مشغول ونضع في السطر الذى يليه البيانات الجديدة ولمعرفة أول سطر خالى نكتب السطر التالي في الكود LRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row ويمكنك الاطلاع على الوظائف التي بسطر الكود (مثل Offset، Cells) من كثير مما عرض فى موقعتا الحبيب ونغير ما يلزم فيصبح الكود كالتالي: Private Sub CommandButton1_Click() Dim LRow As Long Dim ws As Worksheet Set ws = Worksheets("Data") Me.CodeBox.SetFocus LRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row ws.Cells(LRow, 1).Value = Me.CodeBox.Value ws.Cells(LRow, 2).Value = Me.NameBox.Value Me.CodeBox.Value = "" Me.NameBox.Value = "" End Sub وإليكم الملف المرفق SimplTransport_2.rar والآن إلى مشروع ملف كامل يجمع كل ما تم شرحه وسيتم شرح مفردات المشروع لاحقا

أحد الشروط التي التزم بها دائما ، هي كتابة اسم متغير مفهوم وله معنى ، مثلا: File_Name او How_Many ، بحيث بعد مدة لما أرجع لتصحيح الكود ، افهم ما هو عمل المتغير. والمحترفين يذهبون إلى ابعد من هذا ، فبالاضافة إلى استعمالهم مسمى مفهوم المعنى ، فإنهم يسبقون الاسم بحروف تدل على ان المتغير رقم أو كلمات ، هكذا: للارقام: intRows او nColumns ، وللكلمات: strName. واستغرب من بعض المتغيرات المستعمله في كود معقد مثل: a او b !! جعفر

رابعاً:- التعامل مع خصائص الـ TextBox فى لغة البرمجه فى الدرس قبل السابق عرفنا ازاى نتحكم فى خصائص الفورم من شاشة الخصائص اثناء عملية التصميم فماذا لو حبينا نتحكم فى خصائص الفورم ولكن من خلال الاكواد وليس من شاشة الخصائص فى مرحله التصميم هنبدأ على طول بمثال عملى ونشرح عليه اضغط دبل كليك على اى مكان فاضى فى الفورم وهندخل محرر اكواد الفورم ونعمل كود فى حدث فتح الفورم اتبع الصوره فى المكان المظلل باللون الاحمر هنا موضوع كتابه الاكواد 1-خاصيه BackColor :- الرقم 15849925 لجعل خلفية التكست بوكس لونها سماوى فاتح ( راجع ارقام الالوان فى الدروس الخاصه بالـ Label ) TextBox1.BackColor = 15849925 **************************************************************************************************************************************** 2-خاصيه Enabled :- TextBox1.Enabled = True أو TextBox1.Enabled = False هذه الخاصيه تحمل خيارين true و False عند اختيار False سوف يكون بأمكان المستخدم ادخال او تعديل محتوى TextBox1 وعند اختيار True لا يكون بأمكان المستخدم ادخال او تعديل محتوى TextBox1 يعنى هيكون فى حمايه على TextBox1 *************************************************************************************************************************** 3-خاصيه Height :- للتحكم بارتفاع التكست بوكس وليكن جعل الارتفاع 35 TextBox1.Height = 35 ************************************************************************************************************************************ 4-خاصيه Left :- للتحكم فى بعد التكست بوكس عن الضلع الايسر للفورم وليكن جعل البعد 80 TextBox1.Left = 80 ********************************************************************************************************************************************* 5-خاصيه Locked :- هذه الخاصيه تحمل خيارين true و False TextBox1.Locked = False أو TextBox1.Locked = True عند اختيار False سوف يكون بأمكان المستخدم ادخال او تعديل محتوى TextBox1 وعند اختيار True لا يكون بأمكان المستخدم ادخال او تعديل محتوى TextBox1 يعنى هيكون فى حمايه على TextBox1 *********************************************************************************************************************** 6-خاصيه MaXLength :- هذه الخاصيه يمكن من خلالها التحكم فى عدد الاحرف او الارقام المدخله بالـ TextBox1 لو حضرتك عايز تجبر المستخدم على ادخال وليكن عدد 8 أحرف فقط اكتب فى خاصيه Maxlenght رقم 8 فلو حب المستخدم يكتب ( محمد خالد ) فأنه لا يستطيع الا كتابة (محمد خال) لماذا لانه تم تحديد عدد الادخال 8 فقط واحد هيقولى محمد خالد عددها 8 حروف هقوله ان الفيجول هيقوم بعد الفاصله اللى بين محمد وبين خالد وبالتالى (محمد 4 حروف + 1 فاصله + خال 3 حروف كدا =8) TextBox1.MaxLength = 8 **************************************************************************************************************************** 7-خاصيه Multline :- هذه الخاصيه تحمل خيارين true و False عند اختيار False سوف يكون عرض المحتوى اللى بيتم ادخاله او تعديل فى محتوى TextBox1 على سطر واحد فقط وعند اختيار True سوف يكون عرض المحتوى اللى بيتم ادخاله او تعديل فى محتوى TextBox1 على عدة اسطر ويجب مراعاة تعديل ارتفاع TextBox1 ليظهر اكثر من سطر TextBox1.MultiLine = False أو TextBox1.MultiLine = True ******************************************************************************************************** 8-خاصيه Passwordchar :- هذه الخاصيه يمكن من خلالها التحكم فى طريقة أظهار القيم المدخله بالـ TextBox1 لو حضرتك عايز تجعل القيم المدخله فى TextBox1 على شكل ( * ) مثلا شاهد الصوره التالية نلاحظ بالكود تم كتابة العلامه * بين اقواس تنصيص " * " ( وهى تكتب من خلال shift+حرف ط ) TextBox1.PasswordChar = "*" **************************************************************************************************************************** 9-خاصيه ScorollBars :- هذه الخاصيه تحمل اربع خيارات ويبدأ العدد من 0 الى 3 0- FMScrollBarsNone ( هذا يعنى الغاء خاصيه ScrollBars ) شاهد الكود التالى -- بمجرد كتابة = ستجد قائمة تظهر لك بالاربع خيارات TextBox1.ScrollBars = fmScrollBarsNone 1-FMScrollBarsHorizontal ( هذا يعنى عمل ScrollBars للـ TextBox1 بشكل أوفقى ) TextBox1.ScrollBars = fmScrollBarsHorizontal 2-FMScrollBarsVertical ( هذا يعنى عمل ScrollBars للـ TextBox1 بشكل رأسى ) TextBox1.ScrollBars = fmScrollBarsVertical 3-FMScrollBarsBoth ( هذا يعنى عمل ScrollBars للـ TextBox1 بشكل أفقى و رأسى مع بعض ) TextBox1.ScrollBars = fmScrollBarsBoth *********************************************************************************************************************** 10-خاصيه Visible :- وهذه الخاصيه تتيح للمستخدم التحكم فى ظهور او عدم ظهور TextBox1 عند عرض الفورم عندد اختيار True سوف يظهر الـ TextBox1 على الفورم عند فتحه ( وهذا هو الخيار الافتراضى من الفيجوال بيسك ) TextBox1.Visible = True وعند اختيار False ٍسوف يختفى الـ TextBox1 على الفورم عند فتحه يعنى هيكون غير ظاهر ومخفى لا يراه المستخدم TextBox1.Visible = False *********************************************************************************************************************** 11-خاصيه Top :- وهذه الخاصيه تتيح للمستخدم التحكم فى بعد الـ TextBox1 عن الضلع الاعلى للفورم TextBox1.Top = 90 ************************************************************************************************************************************ 12-خاصيه Width :- هذه الخاصيه تتيح للمستخدم التحكم فى عرض الـ TextBox1 لو فرضنا نريد جعل العرض 100 TextBox1.Width = 100 ******************************************************************************************************************************** 13-خاصيه Text Align :- وهذه الخاصيه تتيح للمستخدم التحكم فى اتجاه بداية النص داخل الـ TextBox1 هل يكون يميناً أو يساراً أو وسط TextBox1 بمجرد كتابة = ستجد الفيجوال بيسك يعرض لك قائمة بها 3 خيارات fm Text Align Left -1 عند الاختيار ستجد ان اتجاه النص داخل TextBox1 يبداء من اليسار TextBox1.TextAlign = fmTextAlignLeft fm Text Align Center -2 عند الاختيار ستجد ان اتجاه النص داخل TextBox1 فى المنتصف TextBox1.TextAlign = fmTextAlignCenter fm Text Align Right -3 عند الاختيار ستجد ان اتجاه النص داخل TextBox1 يبداء من اليمين TextBox1.TextAlign = fmTextAlignRight **************************************************************************************************************************** 14-خاصيه Special Effect :- هذه الخاصيه من الخصائص الهامه للـ TextBox1 وهى تعطى اشكال مبهره ومميزه للـ TextBox1 ولها خمس اشكال بمجرد كتابة = ستجد الفيجوال بيسك يعرض لك قائمه بها 5 خيارات على سبيل المثال منها TextBox1.SpecialEffect = fmSpecialEffectBump جرب كل الخيارات واختار منها ما يناسب زوقك ************************************************************************************************************************************** الكود بشكله النهائى هيكون كدا Private Sub UserForm_Initialize() TextBox1.BackColor = 15849925 TextBox1.Enabled = True TextBox1.Height = 35 TextBox1.Left = 80 TextBox1.Locked = False TextBox1.MaxLength = 8 TextBox1.MultiLine = True TextBox1.PasswordChar = "*" TextBox1.ScrollBars = fmScrollBarsBoth TextBox1.Visible = True TextBox1.Top = 90 TextBox1.Width = 100 TextBox1.TextAlign = fmTextAlignRight TextBox1.SpecialEffect = fmSpecialEffectBump End Sub *************************************************************************************************************** كدا الحمد لله انتهينا من المحور الرابع وهو التعامل مه خصائص ال TextBox فى لغة البرمجه ان شاء الله المره القادمه نتكلم عن المحور الخامس والاخير وهو كيفية عمل تنسيقات للقيم المدخله بـ TextBox ارجوا من الله ان اكون وفقت بالشرح واى استفسار انا تحت امر الجميع تقبلوا تحياتى

الاخوه الافاضل السلام عليكم ورحمة الله وبركاته بناء على طلب الاخ طاهر محمد فى تنفيذ برنامج يصلح لجمعيه خيريه وقد تم بحمد الله عمل البرنامج بنجاح ................................................ ولكنى اردت فقط ان اطرح العمل فى موضوع جديد لتعم الاستفاده على من يريد ................................... اريد ان اعتزر على عرض الموضوع مرتين ولكن حدث خطأ فى رفع الملف فى المره الاولى التى تم عرض الموضوع فيها على الرابط الاتى http://www.officena.net/ib/index.php?showtopic=56548&hl= تقبلو تحياتى جمعية خيرية2.rar