גלעד הצלחתי!
גלעד, הוספתי message box כמו שהמלצת,וזה מאוד עזר, אבל לגבי ה back space זה החזיר character מוזר (נראה כמו [] או ם) אז בסוף פתרתי את הבעיה ככה: If IsNumeric(e.KeyChar) Or e.KeyChar = Chr(13) Or e.KeyChar = Chr(8) Then e.Handled = False Else e.Handled = True כש - 8 זה (back space) ו- 13 זה ה new line, תודה.