本程序的功能是利用随机数函数模拟投币 方法是：每次随机产生一个0或1的整数 相当于—次投币 1代表正
本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于—次投币，1代表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。 
Private Sub Command1_Click( ) Randomize n=CInt(Text1.Text) n1=0 n2=0 For i=1To【 】 r=Int(Rnd*2) If r=【 】Then n1=n1+1 Else n2=n2+1 End If Next TcxtText=n1 TextText=n2 End Sub
请帮忙给出正确答案和分析，谢谢！
参考解答
400***262
2023-07-21 01:58:04
正确答案：n或CInt(Text1.Text)或CInt(Text1)或Text1.Text或Val(Text1.Text)或Val 1
[6由于执行次数由n决定，故Fori循环的终值为n，即总次数有多少，就要执行多少次Fori循环。所以本处填：n或其他等价项目。“Rnd*2”随机产生0与1之间的数，Int函数对“Rnd*1”的返回值只有0与1两种情况。由于Text2用来接受正面(即1)的次数，故在[7处要填1，即当“r=1”时，变量n1加一次。
相似问题
控件数组的名字由Name属性指定 而数组中的每个元素由【 】属性指定。请帮忙给出正确答案和分析 谢谢
控件数组的名字由Name属性指定，而数组中的每个元素由【 】属性指定。请帮忙给出正确答案和分析，谢谢！
有一个事件过程 其功能是：从已存在于磁盘上的顺序文件NM1.txt中读取数据 计算读出数据的平方值
有一个事件过程，其功能是：从已存在于磁盘上的顺序文件NM1 txt中读取数据，计算读出数据的平方值，将该数据及其平方值存入新的顺序文件NM2 txt中。请填
建立随机文件F1.DAT 存放职工姓名和编号 然后把该文件中数据读出显示。请在【 】和【 】处将程序
建立随机文件F1 DAT，存放职工姓名和编号，然后把该文件中数据读出显示。请在【 】和【 】处将程序补充完整。 Type worker name As String*10 pa
假定有以下当循环： While Not条件 循环体 Loop 则执行循环体的“条件”是【 】。请帮忙
假定有以下当循环： While Not条件 循环体 Loop 则执行循环体的“条件”是【 】。请帮忙给出正确答案和分析，谢谢！
下列程序功能是 产生10个0-100的随机数 输出其中的最大值。请将程序补充完整。 Private
下列程序功能是，产生10个0-100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As
