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

شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts

اذهب الى الأسفل

شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts Empty شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts

مُساهمة من طرف م/موسي الأربعاء نوفمبر 14, 2012 9:00 am

بسم الله الرحمن الرحيم


أخوانى أعضاء وزوار منتدى مصر التقنى أهلا بكم فى درس جديد من دروس المنتدى ....اليوم راح نتكلم أن شاء الله تعالى عن كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts ....فهيا بنا :



1_ قم بأنشاء مشروع قياسى جديد



2_ قم بإضافة combo box



3 _ فى حدث التحميل للفورم ...قم بكتابة الكود التالى :



الكود:
Dim I As Integer

 For I = 1 To Screen.FontCount - 1
    Combo1.AddItem Screen.Fonts(I)
Next



4_ قم بتشغيل برنامج ولاحظ النتيجة كما فى الصورة التالية :



شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts 819540356

اية رأيكم
م/موسي
م/موسي
الاشراف
الاشراف

تاريخ التسجيل : 18/02/2011
المساهمات : 178
النقاط : 346
التقيم : 12
الدولة : تونس
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts Empty رد: شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts

مُساهمة من طرف زهراء السبت نوفمبر 17, 2012 7:30 pm

شكرا اخى ...معلومة جديدة
زهراء
زهراء
........
........

تاريخ التسجيل : 18/02/2011
المساهمات : 438
النقاط : 769
التقيم : 67
الدولة : مصر
الجنس : انثى

الرجوع الى أعلى الصفحة اذهب الى الأسفل

شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts Empty رد: شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts

مُساهمة من طرف ahmedismayl الأحد يناير 19, 2014 6:50 pm

ازيدك من الشعر بيتا
------------------
فى تحميل الفوم

الكود:

Dim i As Integer
For i = 0 To Screen.FontCount - 1
Combo1.AddItem Screen.Fonts(i)
Next i
Combo1.Text = Combo1.List(0)


------------------
ثم نكتب فى شاشه كود الكومبو

الكود:

Private Sub Combo1_Click()
On Error Resume Next
Text1.Font = Combo1
End Sub


--------------------------
وذلك للتحكم فى خط التكست من حيث نوع الخط
ahmedismayl
ahmedismayl
..
..

تاريخ التسجيل : 15/01/2014
المساهمات : 24
النقاط : 30
التقيم : 0
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts Empty رد: شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts

مُساهمة من طرف NEXT الإثنين يناير 20, 2014 6:59 am


جزاكم الله خيرا اخى احمد على معلوماتك المفيدة

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
شرح كيفية ملء مربع التحرير وسرد combo box بخطوط النظام system fonts Do.php?imgf=154090993464951
NEXT
NEXT
الادارة
الادارة

تاريخ التسجيل : 18/02/2011
المساهمات : 446
النقاط : 200660
التقيم : 28
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

ََ

مواضيع ذات صلة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى