vb.net
st随缘
这个作者很懒,什么都没留下…
展开
-
vb.net 校验两位小数
Dim MyExpression As New _ System.Text.RegularExpressions.Regex("^[0-9]+(.[0-9]{2})?$") Dim MyCharA As String = "1972.06" If (MyExpression.IsMatch(MyCharA)) Then原创 2012-12-13 16:46:04 · 356 阅读 · 0 评论 -
vb.net金额分栏大写、小写
分栏大写 Public Function DXfl(ByVal Num As String, ByVal s As Integer) Dim i As Integer Dim numstr As String numstr = CStr(Num * 100) If s > Len(numstr) Then原创 2012-12-13 16:44:14 · 348 阅读 · 0 评论