限制TextBox中的逗号数量

Question

我有一个文本框的问题.我希望它能付出代价,但问题是我们可以输入多个逗号,这些都会使一切都行不通.我想将逗号数量限制为1

这是我尝试过的:

If ("0123456789,\b".IndexOf(e.KeyChar) = -1) Then
  If e.KeyChar <> Convert.ToChar(Keys.Back) Then
    If (",".IndexOf(e.KeyChar) = -1) And txtPrix.Text.Contains(",") Then
      e.Handled = False
    Else
      e.Handled = True
    End If
  End If

Answer 1

最可靠的是使用Double.TryParse或Decimal.TryParse:

Dim d = Double.MinValue
If Double.TryParse(txt.Text, d)
    ' it's a number 
Else
    ' it's not a number 
End If