Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共7 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助] 字符串替换代码 (已解决)

1楼
古奇 发表于: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编辑过]
2楼
e-png 发表于:2010/8/15 17:41:00

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

output.show(s)

3楼
古奇 发表于: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)

4楼
e-png 发表于:2010/8/15 18:06:00
Dim s As String = "1111(1234566)"
s = left(s,5) & right(s,1)
output.show(s)
5楼
古奇 发表于:2010/8/15 18:11:00
谢谢。。。只是前面的1111是不固定长度的字符。。。
6楼
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)
7楼
古奇 发表于:2010/8/15 18:53:00
图片点击可在新窗口打开查看。。非常感谢。。
共7 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02539 s, 2 queries.