vb 生成15个随机数,被7整除的降序排序在combobox中,

来源：学生作业帮助网编辑：作业帮时间：2024/07/27 19:47:16

x��TMkQ�+�Bi�%�>�}IR(F!Ej�ey�ɨ��dZK�.�hE좥 �Q.JO��ᛤ�&��zf��{��sμ�JwyS��O�o? z|��lgpp4��>��}��t��޻��|r�ͤm��t��RE��$�&0/U�_�K^��a=�=S�keY�^5˭��J��_�*��m��uk��0�'�N�Zi��;H$��B: ��*«�1�$t�3�w��XxD��^)O�'�1�I�y7Pq3q�i΅]p1��5�-r�rB��9*3r v��37�g�I, vIN�s�� c6�y�"A ��Kgx!�=zN�ȳk�Lxf��Y#ĘŘ��5hF.7��5�g>6Th�T��Hcd�H!��,<�=�R(� "�\�-��]�e�3�5��sˉ�![�!��DfF.��\��ē^��2�nhP�$ٺI��biX�%mV`��k�޿�Z�[�~T[D`-��dc2 �cUul�N��X�a�8Up>g��GN��-�v,�0��.@�p˧�s��X}��G��%PB��\��/�ܕ��ʞX5��g�!�v<��~Z��@c,=L��..�4s�2h��f9l�NZ��K�]3�%Y�vR��{}y�W��g�}iܔ��%��i�y%��J��I7

vb 生成15个随机数,被7整除的降序排序在combobox中,
vb 生成15个随机数,被7整除的降序排序在combobox中,

vb 生成15个随机数,被7整除的降序排序在combobox中,
Private Sub Init_cobNum()
Dim Num As Integer
Dim Tmp As Integer
Dim MD(1 To 15) As Integer
Dim I As Integer
Dim J As Integer
Randomize
For I = 1 To 15
Num = Int(Rnd * 200 + 1) * 7
For J = 1 To I
If MD(J) < Num Then
Tmp = MD(J)
MD(J) = Num
Num = Tmp
End If
Next J
Next I

' For I = 1 To 15
' Debug.Print I, MD(I)
' Next I
With cobNum
For I = 1 To 15
.AddItem MD(I)
Next I
End With

End Sub

vb 生成15个随机数,被7整除的降序排序在combobox中, vb 生成15个随机数,被7整除的降序排序在combobox中, vb中随机生成10个10~90的整数,把能被3整除的随机数从小到大排序在vb的list里生成20个两位数的随机数后,怎样将生成的随机数中的偶数删除, 用vb生成6个两位数的随机数,求得平均值,显示生成的两位数和平均值用vb生成6个两位数的随机数,求得平均值,显示生成的两位数和平均值 vb怎么生成随机数啊. 请问vb中有没有生成随机数的函数? 用vb如何生成0-100之间的随机数 VB 如何让生成的随机数不再出现 VB生成不重复的随机数比如做个35选7,如何实现出来的数字都是不相同的呢? VB中用随机数函数产生100个100～300之间的整数,在窗体上输出能被3 整除的数的和及个数.求代码啊... VB编程产生100个[10,99]的随机数如何用VB求30个100-3000的随机数 c语言编写产生100个1到10范围内的随机数的程序,并且以降序排序用vb怎么生成3位随机数 vb 生成随机数（急!）要分别生成3个1到39的整数其中要去掉4,18,38等数如何做? 产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据