生成序列化的字符串有关问题

生成序列化的字符串问题
str="0123456789ABCDEFGHJKLMNPQRSTUVWXYZ" 这里自定义这个字符窜
需要生成N位字符，如0000，这样的字符串，若要100个，如何写vb6，谢谢
0000
0001
...
0009
000A
...
000Z
0010
...
00ZZ


[解决办法]
不懂楼主的意思咯

是不是把数值用36进制来表示？


[解决办法]

VB code

Option ExplicitPrivate Sub Command1_Click()    Dim strP As String    Dim strA() As String    Dim intP As Integer    strP = "0123456789ABCDEFGHJKLMNPQRSTUVWXYZ"    ReDim strA(1 To Len(strP))    For intP = 1 To Len(strP)        strA(intP) = Right("0000" & Mid(strP, intP, 1), 4)        Debug.Print strA(intP)    Next intPEnd Sub