以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何删除特定字符串的后面所有字符。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11443)

--  作者:lihe60
--  发布时间:2011/7/28 14:37:00
--  如何删除特定字符串的后面所有字符。
贺老师,如何删除字符串中某个字符后面所有的字符。
如abacd-efta,如何删除"-"以及“-”后面的字符-efta,只保留abacd.

--  作者:雨中的泪
--  发布时间:2011/7/28 14:52:00
--  

可以使用Remove方法删除从指定位置开始的、指定长度的字符串,例如:

Output.Show("123456789".Remove(2,4)) \'删除从第3个字符开始的连续4个字符

在命令窗口执行上述代码,得到的结果是:12789


--  作者:lihe60
--  发布时间:2011/7/28 14:56:00
--  
问题是是,事先不知道位置。也不知道字符串有多长。
[此贴子已经被作者于2011-7-28 14:57:36编辑过]

--  作者:lihe60
--  发布时间:2011/7/28 14:56:00
--  

abacd-efta,如何删除"-"以及“-”后面的字符-efta,只保留abacd.

abcd-efa,如何删除"-"以及“-”后面的字符-efa,只保留abcd.

[此贴子已经被作者于2011-7-28 14:57:55编辑过]

--  作者:lihe60
--  发布时间:2011/7/28 15:01:00
--  
 

Dim Str1 As String = "中华人民共和国"
Output.Show(Str1.IndexOf(
"人民"))

 

可以试一下。


--  作者:lihe60
--  发布时间:2011/7/28 15:04:00
--  
Dim Str1 As String = "中华人民共和国"
Dim a As Integer=Str1.IndexOf("民")
Dim b As Integer=str1.length
Output.Show(str1.Remove(a,b-a))

--  作者:lihe60
--  发布时间:2011/7/28 15:05:00
--  
帅哥,在线噢!
雨中的泪
谢谢点拨。
--  作者:blackzhu
--  发布时间:2011/7/28 17:02:00
--  
trim函数
--  作者:lihe60
--  发布时间:2011/7/28 17:13:00
--  
以下是引用blackzhu在2011-7-28 17:02:00的发言:
trim函数

trim不行的,只能删除指定的字符。


--  作者:lihe60
--  发布时间:2011/7/28 17:14:00
--  
以下是引用lihe60在2011-7-28 15:04:00的发言:
Dim Str1 As String = "中华人民共和国"
Dim a As Integer=Str1.IndexOf("民")
Dim b As Integer=str1.length
Output.Show(str1.Remove(a,b-a))

有没有比这个更简洁的代码?