[أسامة]

كود :

   
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Label1.Text = My.Settings.serial
   End Sub

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       My.Settings.serial = MaskedTextBox1.Text
   End Sub

اذا لم يعمل امسح هذه الكود

كود :

My.Settings.serial = MaskedTextBox1.Text

  و جرب هذه الطريقه
ApplicationSettings >> PropertyBinding