本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。

Private Sub Command1_Click（）

Randomize

n = CInt（Text1.Text）

n1 = 0

n2 = 0

F．or I = 1 To ________

r = Int（Rnd*2）

If r = ________ Then

n1 = n1 + 1

E．lse

n2 = n2 + 1

E．nd If

Next

Text2.Text = n1

Text3.Text = n2

E．nd Sub

[填空题] 在VBScript中，可用（）函数产生一个0到1之间的随机数。

randint(1,10))产生1到10的一个整型随机数,包括1不包括10 产生1到10的一个整型随机数,不包括1包括10 产生1到10的一个整型随机数,1和1

[单选题]现有[0，1]上均匀分布的随机数：0.00582，0.00725，0.69011，0.25976，0.09763。利用反函数方法获得均值为1的泊松分布

[单选题]现有[0，1]上均匀分布的随机数：0.00582，0.00725，0.69011，0.25976，0.09763。利用反函数方法获得均值为1的泊松分布

[单选题]现已利用Box-Muller方法产生了标准正态分布随机数0.8082，需生成模拟随机利率的随机数Y=，X服从参数为μ=5，σ2=4的对数正态分布，则得

[单选题]现已利用Box-Muller方法产生了标准正态分布随机数0.8082，需生成模拟随机利率的随机数Y=，X服从参数为μ=5，σ2=4的对数正态分布，则得

[单选题]函数Int（Rad*99+1）产生随机数的范围是（）。A . [1，99）B . [1，99]C . [1，100）D . [1，100]

为了使每次程序运行时生成的随机数不同，需要使用函数srand()设置随机数种子。为了使每次程序运行时生成的随机数不同，需要使用函数srand()设置随机数种子。

[单选题]在Excel2003中，返回0到1之间一个随机数的函数为（）。A . AVERAGEB . COUNTC . COUNTAD . RAND

[填空题] （）方法用来产生随机数。