[nooralcown]

عموما وجدت الحل ووضعته  للاستفادة  ضمن حدثkeypress

كود :

  Try
           'هذا الكود للكتابة على داتاقرايد فيو  ونقل الكتابة الى تكست بوسك
     
       If e.KeyChar = vbBack Then ' MessageBox.Show("")

           TextBox1.Text = TextBox1.Text.Remove(TextBox1.Text.Length - 1)
           'If e.KeyChar = "" Then
           '    MessageBox.Show(e.KeyChar)
           'Dim s As String = TextBox1.Text
           's.Remove(TextBox1.Text, 1)
       Else
           TextBox1.Text = TextBox1.Text & e.KeyChar
           End If
       Catch ex As Exception

       End Try