以文本方式查看主题

-  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=7883)

--  作者:古奇
--  发布时间:2010/8/15 17:17:00
--  [求助] 字符串替换代码 (已解决)

Dim s As String = "(1234566)"
s = s.Substring(s.indexof("(") + 1)
s= s.Substring(0,s.indexof(")"))
output.show(s)

 

想保留括号 “()”。。不要了括号内的字符串。。。

[此贴子已经被作者于2010-8-15 18:03:22编辑过]

--  作者:e-png
--  发布时间:2010/8/15 17:41:00
--  

Dim s As String = "(1234566)"
s = left(s,1) & right(s,1)

output.show(s)


--  作者:古奇
--  发布时间:2010/8/15 18:00:00
--  
以下是引用e-png在2010-8-15 17:41:00的发言:

Dim s As String = "(1234566)"
s = left(s,1) & right(s,1)

output.show(s)

谢谢。。当时没说清楚。。我本来要的是这效果。。。解决了。。

 

Dim s As String = "1111(1234566)"
Dim s1 As String
s1=s.Substring(0,s.indexof("("))
s = s.Substring(s.indexof("(") + 1)
s= s.Substring(0,s.indexof(")"))
s =s1 & s.Replace(s,"()")
output.show(s)


--  作者:e-png
--  发布时间:2010/8/15 18:06:00
--  
Dim s As String = "1111(1234566)"
s = left(s,5) & right(s,1)
output.show(s)

--  作者:古奇
--  发布时间:2010/8/15 18:11:00
--  
谢谢。。。只是前面的1111是不固定长度的字符。。。
--  作者:e-png
--  发布时间:2010/8/15 18:21:00
--  
Dim s As String = "1111(1234566)"
s=s.Substring(0,s.indexof("(")+1) & right(s,1)
output.show(s)

--  作者:古奇
--  发布时间:2010/8/15 18:53:00
--  
图片点击可在新窗口打开查看。。非常感谢。。