修改vb程序

程序没什么大问题（不过你得先把kl改成k1，不然k3和k是永远的0哦），还要注意如下几点：

①在For I = 1 To N之前，加上一行Randomize，这样可以让每次随机的结果都不一样。

②Picture1的AutoRedraw一定要设置成True，以岁姿滑免程序执行时间过长，被Windows其他程序干扰后，显示不出衍射图像，电子个数乎腊设置到100以上就可以慢慢欣赏了，不过最好在册高Next I后加一句Msgbox "模拟结束！"的提示。

③Picture1.PSet (x, Y), RGB(255, 255, 255) 改成Picture1.PSet (x, Y), RGB(255, 0, 0)，效果会更好。

先找出这个按钮的句柄（这个估计你会了，因为你都能把它隐藏了），然后用API函数SetWindowText把它的文字改了：

SetWindowText 句柄, "基橡要搏段旁改的文字"燃尘

---