首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
本程序的功能是利用随机数函数模拟投币,方法是;每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、 Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图所
本程序的功能是利用随机数函数模拟投币,方法是;每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、 Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图所
admin
2006-08-25
42
问题
本程序的功能是利用随机数函数模拟投币,方法是;每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、
Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图所示。
程序运行后,在文本框Text1中输入总次数,然后单击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。
Private Sub Command1_Click( )
Radomize
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
Next2.Text=n1
Next3.Text=n2
End Sub
选项
答案
n , 1
解析
转载请注明原文地址:https://jikaoti.com/ti/WV80FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列代码段之后,x的值为______。publicclassex25{publicstaticvoidmain(String[]args){intx=12;
捕获异常的统一出口是______语句。
______语句的功能是退出循环,并从紧接着该循环的语句开始继续执行。
Java语言中提供了一套标准的图形用户界面的包是______。
在VisualFoxPro中,数据表中备注型字段所保存的数据信息存储在以______为扩展名的文件中。
下列关于继承()叙述是正确的。
在面向对象的设计中,用来请求对象执行某一处理或回答某些信息的要求称为【】。
请完成下列Java程序:用AWT实现一个图形用户界面,包含一个List构件和一个TextField构件,List中包含5个项目。要求选择不用的项目时,能在TextField构件中显示出相关的信息,包括事件的名称、选择的项目编号和项目的状态。注意:请
求菲波那契数列的数学表达式为 fibonacci(n)=n, n=0,1; fibonacci(n)=fibonacci(n-1)+fibonacci(n-2), n≥2; 设m是long型变量,下面是递归算法求菲波那契数列的方法
需求分析阶段的任务是确定
随机试题
符合朗伯比尔定律的有色溶液稀释时,其最大吸收峰的波长位置改变是A.不移动,但峰高值降低B.不移动,但峰高值增大C.向长波长方向移动,且峰高值增大D.向短波长方向移动,且峰高值降低E.向短波长方向移动,峰高值降低
产后需要禁止性生活的时间是产后子宫进入盆腔,在腹部摸不到宫底的时间是
A.直方图B.圆图C.散点图D.直条图E.线图说明频数分布资料其变量值的分布状态可绘制
根据《建设工程质量管理条例》,工程在正常使用条件下,承包人对工程质量保修期限最低为2年的工程有()。
“生态旅游”一词,最早提出的时间是1985年。()
(湖南大学2013)下列贷款中不能依靠正常经营收入归还贷款本息但注定要发生损失的贷款是()。
嘉克的姨母把她的遗嘱给了他,并要求他在她死后公开她的遗嘱,嘉克答应了她。姨母死后,嘉克看了遗嘱:遗嘱中规定她所有的钱都归属于她的朋友杰其。嘉克明白如果他公开了这个遗嘱,杰其就会挥霍那些钱,既不有益于杰其也不有益于其他任何人。嘉克同时也明白,如果他不公开这个
Whatisthespeaker’smaintopic?
HowtoWriteChildren’sLiterature?TheauthorofDannytheDragonMeetsJimmyissharingsomeofherthoughtsabouttheimporta
Obama’sSuccessIsn’tAllGoodNewsforBlackAmericansA)AsErinWhitewatchedtheelectionresultsheadtowardsvictoryforBa
最新回复
(
0
)