您的位置：首页> 正文

求教:vbs怎么删除字符串中的最后一个或最后几个字符?

发布网友发布时间：2024-10-24 13:30

共3个回答

热心网友时间：2024-10-31 21:47

vbs中没有直接删除最后几个字符的函数，得这样：
'═════代═══码═══开═══始═════
dim s
s="ABCDEFGHIJKLMN"
s1=StrReverse(s)'得到NMLKJIHGFEDCBA
s2=mid(s1,2)'得到LKJIHGFEDCBA
s=StrReverse(s2)'再一次掉头，得到ABCDEFGHIJKL
msgbox s
'═════代═══码═══结═══束═════

热心网友时间：2024-10-31 21:52

right

Dim AnyString, MyStr
AnyString = "Hello World" ' Define string.
MyStr = Right(AnyString, 1) ' Returns "d".
MyStr = Right(AnyString, 6) ' Returns " World".
MyStr = Right(AnyString, 20) ' Returns "Hello World".

热心网友时间：2024-10-31 21:54

dim str
str="123456!!!"
'删除感叹号保留数字
msgbox "方法1: "&left(str,len(str)-3)
msgbox "方法2: "&mid(str,1,len(str)-3)
msgbox "方法3: "&replace(str,"!","")

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

求教:vbs怎么删除字符串中的最后一个或最后几个字符?

最新推荐

猜你喜欢

热门推荐