Vb随机生成长度为[20个大写英文字母、数字]的组合,每五个加一个连字符如何写

来源：学生作业帮编辑：作业帮分类：数学作业时间：2024/11/05 17:20:55

一分都没有.郁闷.
不过还是花点时间给你写一个.vb6.0xp系统测试通过,希望能选择为最佳.另外本人强烈鄙视提问了却不珍惜别人劳动成果,不选任何答案的!
Private Sub Form_Click()
'使用chr()函数
'其中48～57为0到9十个阿拉伯数字
'65～90为26个大写英文字母
'97～122号为26个小写英文字母
'a = Int(Rnd * (da - xiao + 1) + xiao)
X = ""
For i = 1 To 20
s = Int(Rnd * (3))
Select Case s
Case 0
b = Int(Rnd * (57 - 48 + 1) + 48)
Case 1
b = Int(Rnd * (90 - 65 + 1) + 65)
Case 2
b = Int(Rnd * (122 - 97 + 1) + 97)
End Select
X = X & Chr(b)
If i < 20 And (i) Mod 5 = 0 Then:X = X & "-" '使用小于20是避免出现最后那个连词符
Next
Print X
End Su

Vb随机生成长度为[20个大写英文字母、数字]的组合,每五个加一个连字符如何写密码长度为6-20个字符,由英文字母、数字、 (注册用户名)以字母开头,长度为5-20个字符,由英文字母(不区分大小写),数字(0-9),下划线,连字符号组成. 如何随机生成6位英文字母的组合? 哪位大侠可以帮我编个VB程序：数字0到5和字母A到F随机生成一个12位的组合…… 密码需要由英文字母及数字组合,密码长度6-16个字符,例如:TeJ06ku是什么意思密码长度为6-20个字符,由英文字母、数字、及下划线组成,区分大小写密码长度为6-20个字符,由英文字母、数字、怎么办谁有：名长度为3-20个字符,仅允许字母,数字,下划线和连接符的组合 VB随机产生10个不重复的大写英文字母,看看我哪边错了怎么拆分一个单元格里的英文字符为两组英文字符?注意不是字母+汉字或+数字的组合,全是英文字母组合怎么拆分一个单元格里的英文字符为两组英文字符?注意不是字母+汉字或+数字的组合,而全是英文字母组合.