[الكاتب]

اعمل ملف بنفس المشروع بصيقة ini وليكن config.ini
ضع عقد لمتطلباتك بداية الملف مثلا اكتب
[0]
ثم ابداء بترتيب متطلبات القيم تبعك مثلا
1= #FFF
2= COLOR.RED
3= COLOR.GREEN

ثم استخدم الدالة التالية

كود :

Public Function GetSettingItem(ByVal File As String, ByVal Identifier As String) As String
        Dim S As New IO.StreamReader(File) : Dim Result As String = ""
        Do While (S.Peek <> -1)
            Dim Line As String = S.ReadLine
            If Line.ToLower.StartsWith(Identifier.ToLower & "=") Then
                Result = Line.Substring(Identifier.Length + 2)
            End If
        Loop
        Return Result
    End Function

ثم بناء عليها استدعي القيم
GetSettingItem("config.ini.ini", "1")

ولنفرض تريد تغيير الفورم للون الاحمر

from.Backcolor = GetSettingItem("config.ini.ini", "2")

تكون الاعدادات على جهاز user اما لو اردتها عامة في الشبكة على جميع الاجهزة لابد من استخدام بتركول tcp أو اي سيرفر خاص بقواعد البيانات