用vb程序模拟一个概率题，与数学计算结果不符，求解，谢谢。