设计一个VB程序模拟n次抛硬币过程