锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net随机数教程 vb随机数的代码编写

IT技术随机数

vb.net产生随机数方法名称：next()；功能描述：返回一个0~2147483647之间的整数
方法名称：next(i)；功能描述：返回一个0~i之间的整数
方法名称：next(i，j)；功能描述：返回一个i~j之间的整数
方法名称：Nextdouble()；功能描述：返回一个0~1之间的随机小数
================
使用方法：
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim rand = New System.Random()
MsgBox(rand.next().ToString())
End Sub
==========================
产生N个不同数的话，我给你个我写的VB的代码，你稍微改下：
产生0-10的数：
Private Sub Command1_Click()
Randomize
Dim a(10) As Long
【vb.net随机数教程 vb随机数的代码编写】n = 10
For i = 0 To n
a(i) = Int(Rnd() * (n1))
For j = 0 To i - 1
If a(i) = a(j) Then
i = i - 1
Exit For
End If
Next
Next
For i = 0 To n
Print a(i)
Next
End Sub
vb 。net取随机数取随机数可以用 Random 类 。
给定10个数的话，可以把这10个数放在一个数组里，然后取0~9的范围内的随机数，用它当数组下标取数组成员即可 。
怎么用vb.net随机产生5个不同的数，范围1-33，求帮忙改一下Private Sub Command1_Click()
Dim num(6) As Integer
Dim i As Integer, j As Integer
Dim tmp As Integer
Randomize '防止每次生出随机数一样
For i = 0 To 5
num(i) = Int(Rnd * 53)1
Next
PrintNum "新生成的6个随机数为：", num()
For i = 0 To 5
For j = 0 To 5
If num(j)num(j1) Then
tmp = num(j)
num(j) = num(j1)
num(j1) = tmp
End If
Next
Next
PrintNum "排序后的6个随机数为：", num()
End Sub
关于vb.net随机数教程和vb随机数的代码编写的介绍到此就结束了 ， 不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：DNS服务器的收费方式是什么？ DNS服务器是怎么收费的

    下一篇：荣耀60手机怎么去掉广告，荣耀60手机怎么去掉广告弹出