[طالب برمجة]

اعتذر على الخطأ مرة أخرى لأني نسخته من كود آخر

PHP كود :

While sReader.Peek() > 0
    Dim input As String = System.Text.Encoding.UTF8.GetString(System.Convert.FromBase64String(sReader.ReadLine()))
    Dim dataSplit = input.Split
    My.Settings(dataSplit(0)) = input.Substring(input.IndexOf(Space(1))).Trim
End While