例如产生8个随x机的小写字母,代码如下:
Dim $Num = ""
For $i = 1 To 8
$Num = $Num & Chr(Random(97, 122, 1)) ;Random(97, 122, 1) 也可替换为 Random(Asc("a"), Asc("z"), 1)
Next
MsgBox(64, "8 位随机小写字母", $Num)
For $i = 1 To 8
$Num = $Num & Chr(Random(97, 122, 1)) ;Random(97, 122, 1) 也可替换为 Random(Asc("a"), Asc("z"), 1)
Next
MsgBox(64, "8 位随机小写字母", $Num)


