تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب كود
#1
السلام عليكم
عندي فورم به 3 كومبوبوكس ،الاول Font ، الثاني style Font ، الثالث size Font
اريد كود لحفظه في seting و اكود لللود
الرد
تم الشكر بواسطة: ابراهيم ايبو
#2

اخي الكريم كل اداة لها خصائص بنافذة الخصائص مرتبطة بـsettings  حدد المطلوب وستجد كل شيء يتم حفظه تلقائيا


الرد
تم الشكر بواسطة: ابراهيم ايبو
#3
آسف ربما لم أطرح السؤال بشكل جيد
اريد تغيير هذا 

عن طريف الفورم هذا المتكون من 3 combobox
الرد
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو
#4
شوف هذا مثال يشرح الطريقة


الملفات المرفقة
.zip   For_paveldida.zip (الحجم : 24.36 ك ب / التحميلات : 2)
الرد
تم الشكر بواسطة: ابراهيم ايبو
#5
بارك الله فيك ، لاكن ينقص كود اقلاع الكومبوكس على مات تخزينه في setting
الرد
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو
#6
(26-11-21, 12:39 PM)paveldida كتب : بارك الله فيك ، لاكن ينقص كود اقلاع الكومبوكس على مات تخزينه في setting

PHP كود :
Public Class Form1
    Dim mc 
As String ""
 
   Dim mf As String ""
 
   Dim ms As String ""
 
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        My
.Settings.Lcolor Color.FromName(ccolor.Text)
 
       My.Settings.Lfont = New Font(cname.Textcs.Text)
 
   End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        mc 
Label2.ForeColor.ToString.Replace(" """).Replace("[""").Replace("]""").Replace("Color""").Trim.ToLower
        mf 
Label2.Font.Name
        ms 
Label2.Font.Size
        Dim i 
As Integer ccolor.FindString(mc)
 
       ccolor.SelectedIndex i
        Dim i2 
As Integer cname.FindString(mf)
 
       cname.SelectedIndex i2
        Dim i3 
As Integer cs.FindString(ms)
 
       cs.SelectedIndex i3
    End Sub
End 
Class 

عدل بالمثال ليكون كما ترى بالكود


هذا تم تحميله في حدث تحميل الفورم

كلمة المرور:vb4arb
المثال مرفق


الملفات المرفقة
.zip   For_paveldida.zip (الحجم : 20.51 ك ب / التحميلات : 3)
الرد
تم الشكر بواسطة: ابراهيم ايبو
#7
شكراااااااااااا
الرد
تم الشكر بواسطة: ابراهيم ايبو
#8
(26-11-21, 05:03 PM)paveldida كتب : شكراااااااااااا

عفواااااااااااا
الرد
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم