脚本之家

电脑版
提示:原网页已由神马搜索转码, 内容由www.jb51.net提供.
您的位置:首页软件编程vb.net→ VB.NET校验字符串函数

VB.NET校验字符串函数

  更新时间:2015年05月19日 15:07:49  投稿:hebedich 
本文给大家分享的是2个vb.net中验字符串类型的函数,十分的简单实用,有需要的小伙伴可以参考下。

VB.NET校验字符串是否是日期

'Validate for a date
Shared Function checkdate(ByVal thisvalue As String) As String
If Not IsDate(thisvalue) Then
checkdate = "NULL"
Else
checkdate = "'" & thisvalue & "'"
End If
Return checkdate
End Function ' END checkdate

VB.NET检查字符串是否是数字

'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'Used to submit values to the database, check for empty value, replace w/ "NULL"
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Shared Function checkNumber(ByVal thisvalue As String) As String
If IsDBNull(thisvalue) Or Len(thisvalue) = 0 Or Not IsNumeric(thisvalue) Then
checkNumber = "NULL"
Else
checkNumber = thisvalue
End If
Return checkNumber
End Function ' END checkNumber

以上所述就是本文的全部内容了,希望大家能够喜欢。

相关文章

  • 最新评论