以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  什么函数能获取字符串里()内的内容?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=55696)
--  作者：zhchling
--  发布时间：2014/8/21 14:58:00
--  什么函数能获取字符串里()内的内容?

什么函数能获取字符串里()内的内容?

 

比如   " 张三(12345) "  这样的一组字符串, 前面是姓名,括号里是编号,  用什么函数能获取扩号内的数字?

 

 
--  作者：有点甜
--  发布时间：2014/8/21 15:00:00
--  
Dim str As String = "张三(12345)"
Dim sidx As Integer = str.IndexOf("(")
Dim eidx As Integer = str.IndexOf(")")
If sidx > -1 AndAlso eidx > -1 Then
    msgbox(str.SubString(sidx+1, eidx-sidx-1))
End If
--  作者：Bin
--  发布时间：2014/8/21 15:02:00
--  
用狐表的知识

Dim s As String = "张三(12345)"
s=s.SubString(s.IndexOf("(")+1,s.length-s.IndexOf("(")-1)
s=s.SubString(0,s.IndexOf(")"))
MessageBox.show(s)
--  作者：zhchling
--  发布时间：2014/8/21 15:06:00
--  
谢谢两位, 能看出两位有着不同的编写习惯,相同的热心.
--  作者：lsy
--  发布时间：2014/8/21 15:18:00
--  
Output.Show("张三(12345)".Split("(")(1).Split(")")(0))
--  作者：jerzhh
--  发布时间：2014/8/21 16:49:00
--  
以下是引用lsy在2014-8-21 15:18:00的发言：
Output.Show("张三(12345)".Split("(")(1).Split(")")(0))

 

我喜欢这种方式，代码最简捷。