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

2025-04-02 12:07:52
推荐回答(1个)
回答1:

用Mid函数。

Dim MyString(9)
Dim 数字
数字 = "1234567890"
For i = 0 To 9
MyString(i) = Mid(数字, (i + 1), 1)
Next