谁能帮我做一个数字串生成器生成的数字是8位数,其中第5位数固定是2,其他位数随机,例：4578258954872752就是这样的,谢谢!

Question

谁能帮我做一个数字串生成器
生成的数字是8位数,其中第5位数固定是2,其他位数随机,例：45782589 54872752 就是这样的,谢谢!

Answer 1

不知道你要什么语言的,我做了个VB的,调试通过：
Private Sub Command1_Click()
Dim a,b,c,d,e,f,g As Integer '七个数
Dim str As String
Dim fina As Long
a = Fix(Rnd * 10) 'rnd 是随机函数 产生七个随机数
b = Fix(Rnd * 10)
c = Fix(Rnd * 10)
d = Fix(Rnd * 10)
e = Fix(Rnd * 10)
f = Fix(Rnd * 10)
g = Fix(Rnd * 10)
str = CStr(a) + CStr(b) + CStr(c) + CStr(d) + "2" + CStr(e) + CStr(f) + CStr(g) '将它们拼接起来 其中第五位是2
fina = CLng(str) '将字符串转换为长整型 这个fina就是你要的结果
Print fina
End Sub