作业帮3位字母数字混合,最多有多少个组合?怎么写代码?
来源：学生作业帮 编辑：作业帮 分类：综合作业 时间：2024/05/11 20:29:04
3位字母数字混合,最多有多少个组合?怎么写代码?
3位的数字和字母混合,一共可以生成多少对组合?不分字母或者数字开头.具体用VB怎么写呢?
不好意思啊大家,很久没上百度了,没有分给大家了,实在不好意思,帮个忙!
3位的数字和字母混合,一共可以生成多少对组合?不分字母或者数字开头.具体用VB怎么写呢?
不好意思啊大家,很久没上百度了,没有分给大家了,实在不好意思,帮个忙!
你先定义一个常量 a=“1234567890abcd.xyzABCD.XYZ” 再用循环依次取出来
一共有62×62×62=238328种
再问： 能具体点吗？？万分感谢！！！
再答： Sub test() Dim a, temp As String Dim a_len, h, i, j As Integer a = "1234567890abcdefghijklmnopqrstuvwxyz" a_len = Len(a) h = 1 Do While h < a_len i = 1 Do While i < a_len j = 1 Do While j < a_len temp = Mid(a, h, 1) & Mid(a, i, 1) & Mid(a, j, 1) Debug.Print temp j = j + 1 Loop i = i + 1 Loop h = h + 1 Loop End Sub
一共有62×62×62=238328种
再问： 能具体点吗？？万分感谢！！！
再答： Sub test() Dim a, temp As String Dim a_len, h, i, j As Integer a = "1234567890abcdefghijklmnopqrstuvwxyz" a_len = Len(a) h = 1 Do While h < a_len i = 1 Do While i < a_len j = 1 Do While j < a_len temp = Mid(a, h, 1) & Mid(a, i, 1) & Mid(a, j, 1) Debug.Print temp j = j + 1 Loop i = i + 1 Loop h = h + 1 Loop End Sub