2. 计算机
  3. 本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个整数0或1，相当于一次投币，1代表正面，0代表反面。在窗体上有3个文本框，名称分别是Textl、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图1所示

本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个整数0或1，相当于一次投币，1代表正面，0代表反面。在窗体上有3个文本框，名称分别是Textl、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图1所示

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

    Private Sub Commandl Click()
    Randomize
    n=CInt(Textl．Text)
    n1=0
  n2=0
  For i=1 To__________
    r=Int(Rnd*2)
    If r=________Then
    nl==n1+1
    Else
    n2=n2+1
    End If
  Next
  Text2．Text=n1
  Text3．Text=n2
End Sub
选项
答案n 1。
解析 程序中Int()用来求不大于number参数的最大整数;
转载请注明原文地址:https://www.kaotiyun.com/show/vjhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)