按键精灵(拆分0-9的数字)

Dim数字="1324576980"怎么把十字符串拆分为一个个数字,我要把每个数字按照顺序保存起来MyString(0)="1"MyString(1)="3"MyStri... Dim 数字="1324576980"
怎么把十字符串拆分为一个个数字,我要把每个数字按照顺序保存起来
MyString(0) = "1"
MyString(1) = "3"
MyString(2) = "2"
MyString(3) = "4"
MyString(4) = "5"
MyString(5) = "7"
MyString(6) = "6"
MyString(7) = "9"
MyString(8) = "8"
MyString(9) = "0"
因为数字里没有分割符,小白不知道怎么写了。求大神解答给给思路!谢谢~~
展开
 我来答
帐号已注销
2017-12-19 · TA获得超过1.1万个赞
知道大有可为答主
回答量:6449
采纳率:69%
帮助的人:2108万
展开全部

用Mid函数。

Dim MyString(9)
Dim 数字
数字 = "1234567890"
For i = 0 To 9
MyString(i) = Mid(数字, (i + 1), 1)
Next
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式