魔导 发表于 2012-4-14 16:46:10

如何把 用FOR 处理的 字符串 写入INI[已解决]

本帖最后由 魔导 于 2012-4-14 17:40 编辑

如题，
比如
原有的：18253289549876543
处理后的(想要写入*.ini中的字符)：8188828583828889858489888786858483b0
目的：在原有数字的每个数字前加个8最后一个数字加 8 后在后面再加 b0
小弟拆散处理后合并不起来了，请前辈们指点指点。
源码：$a = "18253289549876543"
WinActivate("123")
For $i = 1 To StringLen ($a)
$b = "8"
$b &= StringMid ($a,$i,1)
If $i = StringLen ($a) Then $b &= "b0"
Send($b)
next

user3000 发表于 2012-4-14 16:54:51

回复 1# 魔导
循环里不用加什么判断的, 添加的字符位置放在前面就可以了!$a = "18253289549876543"
;WinActivate("123")
$b = ""
For $i = 1 To StringLen($a)       
$b &= '8' & StringMid($a, $i, 1)
Next
$b &= "b0"
;Send($b)
MsgBox(0, '', $b)

zldfsz 发表于 2012-4-14 16:59:18

本帖最后由 zldfsz 于 2012-4-14 09:00 编辑

原来楼上已经给出了！

user3000 发表于 2012-4-14 17:06:54

回复 3# zldfsz

呵呵, 看到我先回复了, 又修改了自己的回复吧!
我已无数次遇到这类事情:
打了半天字回复时, 刷新2次, A 版的回复就冒在前头了!

现在, 我回复信息前,一般要看A 版在不. 另一个是, 把自己的回复复制后刷新页面再发送

zldfsz 发表于 2012-4-14 17:09:55

回复zldfsz

呵呵, 看到我先回复了, 又修改了自己的回复吧!...打了半天字回复 ...
user3000 发表于 2012-4-14 09:06 http://www.autoitx.com/images/common/back.gif

是的，并且我还没把判断语句去掉，呵呵

魔导 发表于 2012-4-14 17:40:02

原来是这样子的啊，，，，，，谢谢两位

afan 发表于 2012-4-14 20:41:12

这个不用正则很浪费哦$Str = '18253289549876543'
MsgBox(0, $Str, StringRegExpReplace($str, '.', '8$0') & 'b0')

zldfsz 发表于 2012-4-14 20:55:46

回复 7# afan

哇，牛

魔导 发表于 2012-4-15 00:06:27

本帖最后由 魔导 于 2012-4-15 00:07 编辑

回复 7# afan


   {:face (258):} A大   太霸道啦
这样的话   要是数字固定还不一招就秒啦！！！！
MsgBox(0,18253289549876543, StringRegExpReplace(18253289549876543, '.', '8$0') & 'b0')
页: [1]
查看完整版本: 如何把 用FOR 处理的 字符串 写入INI[已解决]