Attribute VB_Name = "modCall"
Option Explicit
'調用計算正態(tài)分布函數的子程序
Sub Main()
    Dim x, F
    For x = 1 To 5
        Norm x, F   '調用計算正態(tài)分布函數的子程序
        Debug.Print "正態(tài)偏離點 x =", x, "下側概率 F =", F
    Next x
    For x = -1 To -5 Step -1
        Norm x, F   '調用計算正態(tài)分布函數的子程序
        Debug.Print "正態(tài)偏離點 x =", x, "下側概率 F =", F
    Next x
End Sub