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

ملىء مربع السرد و التحرير comboBox بخطوط النظام

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

ملىء مربع السرد و التحرير comboBox بخطوط النظام  Empty ملىء مربع السرد و التحرير comboBox بخطوط النظام

مُساهمة من طرف نجلاء فتحي الثلاثاء نوفمبر 05, 2013 9:01 pm

معايا كود جميع لملىء مربع السردو التحرير بخطوط النظام

الكود:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim colFonts As InstalledFontCollection = New InstalledFontCollection
        Dim fontFamilies() As FontFamily = colFonts.Families
        Dim i As Integer

        For i = 0 To fontFamilies.Length - 1 Step 1
            Me.cboFonts.Items.Add(fontFamilies(i).Name)
        Next

        Me.cboFonts.Text = "Times New Roman"
End Sub
اتمنى ان يعجبكم
نجلاء فتحي
نجلاء فتحي
....
....

تاريخ التسجيل : 20/02/2011
المساهمات : 53
النقاط : 103
التقيم : 0
الجنس : انثى

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

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

ََ

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


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