vb 生成随机数（急!）要分别生成3个1到39的整数其中要去掉4,18,38等数如何做?

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

vb 生成随机数（急!）要分别生成3个1到39的整数其中要去掉4,18,38等数如何做?
vb 生成随机数（急!）
要分别生成3个1到39的整数
其中要去掉4,18,38等数
如何做?

vb 生成随机数（急!）要分别生成3个1到39的整数其中要去掉4,18,38等数如何做?
Option Explicit
Private Sub Command1_Click()
Randomize
Dim i As Integer,j As Integer
Do
j = Int(Rnd * 39 + 1)
If j 4 And j 18 And j 38 Then
Print j
i = i + 1
If i >= 3 Then Exit Do
End If
Loop
End Sub

vb 生成随机数（急!）要分别生成3个1到39的整数其中要去掉4,18,38等数如何做? 用vb怎么生成3位随机数 vb怎么生成随机数啊. 生成随机数怎么写?VB中比如说我要生成一个1-10的随机数该怎么写?需要像C那样导入随机数种子吗? MATLAB 生成随机数怎样生成10个属于区间[3,+无穷）的随机数? 用vb生成6个两位数的随机数,求得平均值,显示生成的两位数和平均值 用vb生成6个两位数的随机数,求得平均值,显示生成的两位数和平均值 在vb的list里生成20个两位数的随机数后,怎样将生成的随机数中的偶数删除, 用vb怎样生成10个不重复的（1到10）随机数?举一反三那更好.先在这里说声谢谢! vb中随机生成10个10~90的整数,把能被3整除的随机数从小到大排序 vb 生成15个随机数,被7整除的降序排序在combobox中, vb 生成15个随机数,被7整除的降序排序在combobox中, 我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么 vb生成1-9随机数,随机打乱分行置于text1中,互不重复（1,2,3,4,5,6,7,8,9） 怎么用VB编写点生成按钮产生1000个8位不重复的随机数呢?我想点生成显示1000个验证下8位随机数是否有重复,该要怎么改写代码呢? vb中怎么生成给定范围内的不同随机数,包括边界数（生成的数中有小数和整数,不重复）例如要生成0到9之间的三个随机数,包括9以及,范围内的小数 matlab生成随机数,用9次多项式拟合,作图在[-2 7]之间生成10个随机数,这十个随机数的横坐标分别为1,2,3,.,10,用一个9次多项式拟合这10个随机数,并将多项式作图,十个随机数点也标出. VB随机数260-500范围内生成随即数!