批处理之家 - Powered by Discuz! Board

标题: [已解决]请教VBS取字符的函数或脚本 [打印本页]

作者: lxl13596 时间: 2009-10-21 20:32 标题: [已解决]请教VBS取字符的函数或脚本

变量a
eg. a=5-10 或是a=50-25
求出b,c的值
b=5或50
c=10或25
开始想到用mid，但发现变量有可能是两位数或一位数
请教高手帮帮忙！
谢谢大家的支持!

[ 本帖最后由 lxl13596 于 2009-10-22 08:45 编辑 ]

作者: bhsx 时间: 2009-10-21 21:43

instr取-的位置再MID

作者: youxi01 时间: 2009-10-21 22:34

测试代码：

Function SplitStr(objStr,Char)
SplitStr=Split(objStr,Char)
End Function

a1="5-10"
a2="50-25"

msgbox "a:" & a1 & vbcrlf & "b:" & SplitStr(a1,"-")(0) & vbcrlf & "c:" &SplitStr(a1,"-")(1)
msgbox "a:" & a2 & vbcrlf & "b:" & SplitStr(a2,"-")(0) & vbcrlf & "c:" &SplitStr(a2,"-")(1)
复制代码

作者: zqz0012005 时间: 2009-10-21 23:37

我还没明白楼主是什么意思。。。

to youxi01
SplitStr 有点冤。。

作者: lxl13596 时间: 2009-10-22 08:44 标题: 已解决

万分感谢各位的帮助，尤其是youxi01，就是这个意思！

欢迎光临批处理之家 (http://bbs.bathome.net/)