求一种数字加字母的写法
比如我要生成字节为3位的数字和字母组合 我要限制生成出来的数字是0-9 字母是a-f不分大小写
最后生成出的结果如下
000
001
...
FFF
请问怎么写
[解决办法]
'1个按钮 1个listbox
Private Sub Command1_Click()
Dim i As Long, s As String
For i = 0 To 4095
s = Hex(i)
s = Right( "000 " & s, 3)
List1.AddItem s
Next
End Sub
[解决办法]
日，来晚了，被抢了。更可恶的是思路也一样。
搂主你笨啊，4位就是 16*16*16*16-1=65535
常识啊
[解决办法]
直接该循环次数就可以了，
不过还是可以说一楼的回答有一点点小问题，因为他用的是LIST控件来保存结果。
如果搂主想要计算的位数够长，是会放不下的，而且速度也慢下来。
小改一下:
Dim HexStr(4095) as String
Dim I As Long
For I = 0 To 4095
HexStr(I) = Hex(I)
Next
因为十进制从0到4095正好是十六进制从000到FFF，所以直接一一转换就可以了。
