EXCE 中如何对一组数随机排列成一组数.比如0123456789 + - / *〈 〉这16个数随机排列成21位数,不重复4行,每行21个数

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/20 09:38:31
EXCE 中如何对一组数随机排列成一组数.比如0123456789 + - / *〈 〉这16个数随机排列成21位数,不重复4行,每行21个数
xRMKQ+W\h.ta-BQ̠v*S:I rT1FW<=9>o џhHF =o JћTv/|'bZKؽY[@vD"2O'C#ܘDWe++lXe y79>gb3-gph%`p(`v:RhaFn̹!)'0VdCQ)!AN%W~S4Ct#XK@WK,p1,u_^`iY ^55Hq]l

EXCE 中如何对一组数随机排列成一组数.比如0123456789 + - / *〈 〉这16个数随机排列成21位数,不重复4行,每行21个数
EXCE 中如何对一组数随机排列成一组数.
比如0123456789 + - / *〈 〉这16个数随机排列成21位数,不重复
4行,每行21个数

EXCE 中如何对一组数随机排列成一组数.比如0123456789 + - / *〈 〉这16个数随机排列成21位数,不重复4行,每行21个数
用RND函数加MID函数结合一下即可完成你的要求.代码如下:
Sub noky()
For i = 1 To 21
a = Int((16 - 1 + 1) * Rnd + 1)
B = Mid("0123456789+-/*〈〉",a,1)
c = c + B
Next
End Sub
这段代码中的变量C就是你要的随机数