本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一

题目：

本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代表正面，0代表反面。在窗体上有3个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。
Private Sub Command1_Click()
Randomize
n=CInt(Text1. Text)
n1=0
n2=0
For i=1 To______
r=Int (Rnd*2)
If r=______Then
n1=n1+1
Else
n2=n2+1
End If
Next
Text2. Text=n1
Text3. Text=n2
End Sub