请问这个‘VB程序’怎么编写：编写程序,利用随机函数模拟硬币的结果,用两个硬币一起投,

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/07/07 08:25:48

请问这个‘VB程序’怎么编写：编写程序,利用随机函数模拟硬币的结果,用两个硬币一起投,
统计“两个正面,两个反面,一正一反”三种情况出现的次数

Private Sub Command1_Click() Dim arr(2) As Integer, i, a, b Randomize For i = 1 To 1000
a = Int(Rnd * 2): b = Int(Rnd * 2) arr(a+b) = arr(a+b) + 1 Next
MsgBox "全正：" & arr(2) & vbNewLine & "全反：" & arr(0) & vbNewLine & "正反：" & arr(1)End Sub

再问：请问一下这是投掷100次吗
再答：这是投掷1000次哎。
再问：能不能给我写一个简单的啊，这上面的函数有的没学.最好是一百次的，亲，给好评哦
再答：亲，把 For i = 1 To 1000 改成 For i = 1 To 100 就行了。

投掷一枚硬币,出现正面的概率是0.6.编写java程序,使用Monta Carlo方法模拟抛硬币的过程并验证结果. 求用vb编写下面的程序 VB编写三角函数的程序 vb编写一个程序,利用随机函数生成15个80~99之间的随机整数,输出其中的最大值与最小值编写一个计算个人所得税的程序（用VB编写）用VB编写一个判断两个正整数的最大公因数的程序怎么写啊? 用VB编写程序:随机产生三个数,求出其中最小的那个数编写一个程序,计算两个非0实数的加减乘除的运算结果!谁帮我编写这个程序? 如何用VB语言编写这个程序? 看看这个程序怎么编写. VB编写程序用计算机模拟掷骰子游戏.编写程序统计掷N次后各点数出现的次数 matlab用隐函数拟合的程序怎么编写