如何用VB求30个100-3000的随机数

来源：学生作业帮助网编辑：作业帮时间：2024/04/28 19:30:11

如何用VB求30个100-3000的随机数
如何用VB求30个100-3000的随机数

如何用VB求30个100-3000的随机数
Option Explicit
Option Base 1
Private Sub Form_click()
Dim a(30) As Integer, i As Integer
Randomize
For i = 1 To 30
a(i) = Int(Rnd * (3000 - 100) + 1) + 100
Print a(i);
Next i
End Sub
30个数字是一行显示的,你把窗体拖大了再执行就能全看见了!
祝你愉快!

如何用VB求30个100-3000的随机数如何用vB程序随机产生30个不同的字母? 如何用VB制作随机数程序用VB制作一个 0-9十个数中随机出8个不重复的数字,例如：01235689, 用VB在1-100中产生10个随机整数,按从小到大的顺序排列如题..求代码 VB:随机产生30个[100,500]区间的随机整数,求其和及平均值. 如何用VB产生随机的3,5,8,在这三个数中变化 vb中如何用随机方式产生一个今天的时间如何用VB随机取一个整数(无范围)? 利用随机函数产生10个30～100之间的随机正整数,求最大值,最小值平均值,并显示数组的值和结果用VB程序设计 vb 随机产生10个100-200之间的数求最大值如何用vb编个每次产生的随机数与之前产生过的都不同?求代码急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, 编一VB程序,随机产生10个30~100(包括30,100)的正整数,求最大值,最小值和平均值,并显示整个数组的值和结果问一个VB基础题啊怎么随机产生10个30到100的数,求最大值、最小值和平均值.输出结果 VB:随机产生 10 个整数,求其中最小的数.若随机产生n个整数又如何实现如何用vb中的随机函数产生奇数?（只要奇数） vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值, 如何用VB产生2~99之间的1次1个随机数,可以重复的,另外求如何用VB产生1~n之间的1次20个随机数用VB产生1~n之间的1次20个随机数,这个不能重复...