[填空题] 本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有3个文本框,名称分别是Text1、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图16-12所示。程序运行后,在文本框Text1中输入总次数,然后单击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。
Private Sub Command1_Click()
Randomize
n=CInt(Text1. Text)
n1=0
n2=0
For i=1 To 【14】
r=Int(Rnd*2)
If r= 【15】 Then
n1=n1+1
Else
n2=n2+1
End If
Next
Text2. Text=n1
Text3. Text=n2
End Sub
正确答案:
[14]n [15]1解析:[分析]: 从填空[14]的位置来看,此处应该放置For循环的循环终值。根据题意,填空[14]为变量n。因变量n1的结果赋给Text2中,n1应放置正面的次数,所以填空[15]应为1。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)