以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]限定字符内容,如何代码实现  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=42048)

--  作者:hiliuyong
--  发布时间:2013/11/2 13:46:00
--  [求助]限定字符内容,如何代码实现

如果我希望一个字符串,只允许包含  0 1 2 3 4 5 6 7 8 9 - 这几个字符,代码如何实现。

(追加的帖子未回复,新开一帖)


--  作者:Bin
--  发布时间:2013/11/2 14:05:00
--  
正则表达式
Dim s As String ="12345"
if RegularExpressions.Regex.IsMatch(s,"^\\d+$") then
   messagebox.show("符合要求是数值")
else
  messagebox.show("不符合要求")
end if

利用IsNumeric

Dim s As String ="12345"
if IsNumeric(s) then
   messagebox.show("符合要求是数值")
else
  messagebox.show("不符合要求")
end if

--  作者:hiliuyong
--  发布时间:2013/11/2 15:46:00
--  

正则表达式,我最后还有一个符号“-”,如何组合进来。查了一些正则表达式的文章,还是没有搞明白。


--  作者:Bin
--  发布时间:2013/11/2 15:48:00
--  
Dim s As String ="12345-"
If RegularExpressions.Regex.IsMatch(s,"^\\d+-$") Then
   messagebox.show("符合要求是数值")
Else
  messagebox.show("不符合要求")
End If

--  作者:hiliuyong
--  发布时间:2013/11/2 15:58:00
--  
谢谢BIN,辉讯出人才啊!
--  作者:hiliuyong
--  发布时间:2013/11/2 16:01:00
--  

刚才试验了下,如果“-”不是在最后,而是在中间位置的话,结果是FALSE


--  作者:Bin
--  发布时间:2013/11/2 16:05:00
--  
你不是说希望在最后吗.如果是可以包含-的话改为   "^[0-9-]+$"   即可
--  作者:hiliuyong
--  发布时间:2013/11/2 17:15:00
--  
OK了
--  作者:程兴刚
--  发布时间:2013/11/2 17:16:00
--  
耐人寻味的正则表达式,看来应该好好学学了!