0

Visual Basic は私の母国語ではありませんが、別の言語に移植できるようになるまでレガシー プログラムを維持しています。

数量を入力するためのテキストボックスがあります。この数量は整数のみである必要があり、これは検証されていませんでした。10 進数がデータベースに忍び込み、入力の検証を追加するように求められました。正規表現を試しました。

Function validate_qty(qty As String)
    Dim objRegExp As New System.Text.RegularExpressions.Regex("^\d+$")
    Dim match As System.Text.RegularExpressions.Match = objRegExp.Match(qty)
    If match.Success Then
        Return True
    End If
    Return False
End Function

これは、小数点に関する限り機能しています。 false.1を返します。ただし、やreturn1.0などの英数字文字列a1212433498eTrue

洞察はありますか?それは大歓迎です。

4

4 に答える 4

1

まだ正規表現が必要だとは思わない..

Function validate_qty(qty As String) As Boolean
    if qty.Contains(".") then Return False
    Return IsNumeric(qty)
End Function
于 2013-07-02T17:38:01.223 に答える