2

我有一个文本框的小问题。我希望它付出代价,但问题是我们可以输入多个逗号,这会使一切都不起作用。我想将逗号的数量限制为 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
4

1 回答 1

5

最可靠的是使用Double.TryParseor Decimal.TryParse

Dim d = Double.MinValue
If Double.TryParse(txt.Text, d)
    ' it's a number 
Else
    ' it's not a number 
End If
于 2012-12-12T15:28:27.660 回答