vb随机数求和VB随机函数

大家好,今日小数来聊聊一篇关于vb随机数求和,VB随机函数的文章,现在让我们往下看看吧!
1、我给你编了个,你试试就知道了。
2、代码如下:Private Sub Form_Click()Dim a%(1 To 20), i%, j%For i = 1 To 20Randomizea(i) = Int(Rnd * 20) 1For j = 1 To i - 1If a(j) = a(i) Then Exit ForNext jIf j = i ThenPrint a(i)Elsei = i - 1End IfNext iEnd Sub。
本文到此分享完毕,希望对大家有所帮助。
这篇好文章是转载于:知行礼动
- 版权申明: 本站部分内容来自互联网,仅供学习及演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,请提供相关证据及您的身份证明,我们将在收到邮件后48小时内删除。
- 本站站名: 知行礼动
- 本文地址: /news/detail/tanhcbbkeb