vb.net返回随机数 vbs随机数代码

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

n = 10

For i = 0 To n

a(i) = Int(Rnd() * (n + 1))

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

相关问答

Q1: 什么是vb的随机数和种子??

VB的随机数即使用Rnd函数生成的随机数值。种子，为初始值，用来生成伪随机数字。

Rnd 函数，返回一个包含随机数值的 Single。

对最初给定的种子都会生成相同的数列，因为每一次调用 Rnd 函数都用数列中的前一个数作为下一个数的种子。

在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有根据系统计时器得到的种子。

种子，为初始值，用来生成伪随机数字。例如， Randomize 语句创建一种子值供 Rnd 函数使用，以接着创建唯一伪随机数列。

Randomize 语句，初始化随机数生成器。

说明

Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。

如果没有使用 Randomize，则（无参数的）Rnd 函数使用第一次调用 Rnd 函数的种子值。

Randomize 语句示例

本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以

Randomize 用 Timer 函数的返回值作为新的随机数种子值。

Dim MyValue

Randomize   ' 对随机数生成器做初始化的动作。

MyValue = Int((6 * Rnd) + 1)   ' 生成 1 到 6 之间的随机数值。

Q2: vb。net取随机数

取随机数可以用 Random 类。

给定10个数的话，可以把这10个数放在一个数组里，然后取0~9的范围内的随机数，用它当数组下标取数组成员即可。

Q3: 请问在vb.net中如何实现随机取数??

Dim k() As Integer = New Integer() {1, 2, 3, 4, 5, 6}

Dim p1 As Integer

Random r = new Random();

int p1 = k(r.Next(5)) '随机出现0~5之间的数。

关于vb.net返回随机数和vbs随机数代码的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。