[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
lxl13596

Rank: 3Rank: 3

帖子
20 
积分
240 
技术
0  
捐助
0  
注册时间
2008-3-9 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 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 编辑 ]
1

评分人数

    • keen: 感谢主动给标题标注[已解决]字样PB + 2
收藏 分享

bhsx

Rank: 3Rank: 3

帖子
40 
积分
287 
技术
1  
捐助
0  
注册时间
2009-8-26 
2楼
发表于 2009-10-21 21:43 | 只看该作者
instr取-的位置再MID

TOP

youxi01

Rank: 8Rank: 8

帖子
962 
积分
2449 
技术
40  
捐助
0  
注册时间
2007-10-25 
3楼
发表于 2009-10-21 22:34 | 只看该作者
测试代码：
  1. Function SplitStr(objStr,Char)

  2. SplitStr=Split(objStr,Char)

  3. End Function

  4. 

  5. a1="5-10"

  6. a2="50-25"

  7. 

  8. msgbox "a:" & a1 & vbcrlf & "b:" & SplitStr(a1,"-")(0) & vbcrlf & "c:" &SplitStr(a1,"-")(1)

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

评分人数

    • lxl13596: 十分感谢youxi01的帮助！PB + 3

TOP

zqz0012005

Rank: 8Rank: 8

帖子
1069 
积分
12123 
技术
38  
捐助
0  
注册时间
2008-5-10 
4楼
发表于 2009-10-21 23:37 | 只看该作者
我还没明白楼主是什么意思。。。

to youxi01
SplitStr 有点冤。。
命令行参考：hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心，别人才愿意奉献热心！
把查看手册形成条件反射！

TOP

lxl13596

Rank: 3Rank: 3

帖子
20 
积分
240 
技术
0  
捐助
0  
注册时间
2008-3-9 
5楼
发表于 2009-10-22 08:44 | 只看该作者

已解决

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

TOP

返回列表