Vbscript 将数字转换为数组

Vbscript 将数字转换为数组,vbscript,qtp,Vbscript,Qtp,我正在尝试使用VBScript将数字转换为数字并保存在数组中 例如,如果我有一个号码“5508426”,那么我想把它作为 A[0] = '5' A[1] = '5' A[2] = '0' A[3] = '8' A[4] = '4' A[5] = '2' A[6] = '6' 有人能帮我吗?创建一个大小合适的数组,并用Mid()获得的数字填充它: 您可以考虑数据类型—字符串与数字—确定您有什么作为输入,想要什么作为元素,然后加入一些CStr()和/或CInt()/CLng()/CDbl()。创建

我正在尝试使用VBScript将数字转换为数字并保存在数组中

例如,如果我有一个号码“5508426”,那么我想把它作为

A[0] = '5'
A[1] = '5'
A[2] = '0'
A[3] = '8'
A[4] = '4'
A[5] = '2'
A[6] = '6'

有人能帮我吗?

创建一个大小合适的数组,并用Mid()获得的数字填充它:


您可以考虑数据类型—字符串与数字—确定您有什么作为输入,想要什么作为元素,然后加入一些CStr()和/或CInt()/CLng()/CDbl()。

创建一个大小合适的数组,并用Mid()获得的数字填充它:

您可以考虑数据类型—字符串和数字—确定您作为输入的内容和作为元素需要的内容,然后加入一些CStr()和/或CInt()/CLng()/CDbl()

>> s = "5508426"
>> ReDim a(Len(s) - 1)
>> For i = 0 To UBound(a)
>>     a(i) = Mid(s, i + 1, 1)
>> Next
>> WScript.Echo Join(a, "-")
>>
5-5-0-8-4-2-6