二项式分布m1.bas

<VB数理统计实用算法>书中的算法源程序

Attribute VB_Name = "modParameter"
'二项式分布
Option Explicit
'数组A保存计算结果
Public A() As Double
'n：试验次数
'p：一次试验中事件A出现的概率
'x：n次试验中事件A出现的次数
Public n As Integer, p As Single, x As Integer