正確的文本框，只允許數字和小數在視覺基本

Question

我真的需要幫助的Visual Basic。

我有3個文本框，允許數字和小數點與下面的代碼：

If Not Char.IsDigit(e.KeyChar) AndAlso Not Char.IsControl(e.KeyChar) 
           AndAlso Not e.KeyChar = "." Then 
    e.Handled = True 
End If 

但我也遇到了一些問題：

1. 我可以把「」任何地方
2. 當我嘗試添加每個文本框時，結果是一團糟。例1.2 + 3 = 15

你能修復我的代碼，以便它可以做出正確的小數計算嗎？

Answer 1

這可以幫助

Private Sub txtrate_TextChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtmarks.KeyPress 
      If InStr(txtmarks.Text, ".") Then 
       e.Handled = Not (Char.IsDigit(e.KeyChar) Or Char.IsControl(e.KeyChar)) 
      Else 
       e.Handled = Not ((Char.IsDigit(e.KeyChar) Or e.KeyChar = ".") Or Char.IsControl(e.KeyChar)) 
      End If 
    End Sub