Board logo

标题: [已解决]请教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

测试代码:
  1. Function SplitStr(objStr,Char)
  2. SplitStr=Split(objStr,Char)
  3. End Function
  4. a1="5-10"
  5. a2="50-25"
  6. msgbox "a:" & a1 & vbcrlf & "b:" & SplitStr(a1,"-")(0) & vbcrlf & "c:" &SplitStr(a1,"-")(1)
  7. 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://www.bathome.net/) Powered by Discuz! 7.2