vbs，输出字符串设定一种格式的问题
前提：strRet="湖北联通(10年3月创建)|陈保松|职工|001^湖北联通(10年3月创建)|陈保松|负责人|002^"有字符串数组m_R()，数字内容格式为（假设有两个元素，每个字符串以^分割，）：m_R=split(strRet,"^")我循环一个一个取其中的元素m_msg =m_R(m_i)，之后想以这种格式输出：注册地：湖北联通|姓名：陈保松|职务：职工|编号：001用另外一个字符串变量m_tsmsmsg输出上面的格式 "(10年3月创建)"这个能过滤掉最好，麻烦就算了
a=Split(strret,"^")
For i=0 To UBound(a)-1
b=Split(a(i),"|")
m_tsmsmsg=Left(b(0),InStr(b(0),"(")-1)&"|å§åï¼"&b(1)&"|èå¡ï¼"&b(2)&"|ç¼å·"&b(3)
MsgBox m_tsmsmsg
Next(å ±7è¡)
vbs,输出字符串设定一种格式的问题
For i=0 To UBound(a)-1 b=Split(a(i),"|")m_tsmsmsg=Left(b(0),InStr(b(0),"(")-1)&"|姓名："&b(1)&"|职务："&b(2)&"|编号"&b(3)MsgBox m_tsmsmsg Next(共7行)
VBS输出语句,输出字符串
' 进行变量声明Dim Wshshell,Msg' InputBox 弹窗输入Msg=InputBox("请输入要发送的语句.", "语句")' 设置对脚本宿主对象引用赋给变量Set Wshshell = Wscript.CreateObject("Wscript.Shell")' 运行命令参数 （这里打开系统自带的记事本程序）Wshshell.run "notepad"' 暂停 200 毫秒 （防止达不到预知的...
VBS中有没有一个方法可以将字符串中指定位置的字符输出?
Mid(string, start[, length])从字符串右边返回指定数目的字符 Right(string, length)返回指定数目的从字符串的左边算起的字符 Left(string, length)
vbs 如何输出字符串
mgsbox 不对应当是msgbox! 并且这是VB的用法, VBS 最好用: WScript.Echo("哈,我想你拉") . 用法与MSGBOX 相同.不过最好在()内输入内容或变量.
vbs脚本里面, 如何使原本属于字符串类型的数字格式,转变为数值型...
str1 = int(str1)str2 = int(str2)但是这样写，只适合获得的是整数，对于小数，运算后会去掉小数位。还有一个方法比较合理，不会去掉小数，那就是在你想加前加一个0，这样：0+str1 下面给你一个例子：Dim fso Set fso = WScript.CreateObject("Scripting....
VBS中如何实现,如果字符串中最后出现了逗号,就去掉(只去掉最后的逗号...
dim s,mark mark=","s="去除最后一个逗号,看看效果如何,"if len(s)>0 then if right(s,1)=mark then msgbox left(s,len(s)-1)end if
VBS语句问题
&是个连接符号，如果&前面或后面没有别的字符的话，&" "&和" "的意思是一样的！
关于vbs脚本问题,CreateObject。。
set ws=CreateObject("wscript.shell")ws.run ("""D:\\Program Files\\123.txt""")'用两对双引号转义空格，"" ""，字符串需要一对双引号扩起，合计3对双引号（面对有空格的路径时）
怎样用vbs判断输入的字符串是否含有指定字符??
我这个才是正确的~~~n=inputbox("请输入路径:","","1.txt")set fso=createobject("scripting.filesystemobject")if fso.fileexists(n) then if instr(n,"\\")=0 then msgbox "发现同文件夹有"+n+"文件"else msgbox "路径格式正确："+n+",此文件存在"end if else if instr(n,"\\")=0 ...
vbs如何实现中中英文字符串的比较.为什么vbs读取中文字符串出现...
msgbox "找到了字符:"&cod1 end if 上源码测试可用。同目录下新建两个文件“1.txt”、“2.txt”。“1.txt”写进搜索关键词“中国人”，“2.txt”写入内容“我是中国人，你好。”。字符串比较不分什么文，只要你双引号里面的东西完全一样就相等。有一点点不同都不会相等。有任何问题追问吧。
