[ameerah]

جرب هذا التعديل للكود التصدير والاستيراد
إحذف ملف mysettings القديم ثم استبدل هذا الكود بدل القديم

كود :

' إستيراد الاعدادت من ملف خارجي
Public Sub ImportSettings(ByVal fileName As String)
    Using sReader As New IO.StreamReader(fileName)
        While sReader.Peek() > 0
            Dim input As String = System.Text.Encoding.UTF8.GetString(System.Convert.FromBase64String(sReader.ReadLine()))
            Dim dataSplit = input.Split(vbTab)
            My.Settings(dataSplit(0)) = dataSplit(1)
        End While
    End Using
    My.Settings.Save()
End Sub
' تصدير الاعدادت إلى ملف خارجي
Public Sub ExportSettings(ByVal fileName As String)
    Using sWriter As New IO.StreamWriter(fileName)
        For Each setting As Configuration.SettingsPropertyValue In My.Settings.PropertyValues
            Dim s As String = setting.Name & vbTab & setting.PropertyValue.ToString()
            sWriter.WriteLine(System.Convert.ToBase64String(System.Text.Encoding.UTF8.GetBytes(s)))
        Next
    End Using
    My.Settings.Save()
End Sub