本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个0或1的整数,相当投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是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