[سامي محمد]

كود :

If TextBox1.Text.Contains(".") = True Then Exit Sub

ضع كود اضافة الفاصله هنا