VB编写的双色球缩水摇号机

在WindowsXP下调试通过。说明：本人调试通过后，用摇出的号头两次均有收获，第一次中4个红球；第二次买5注中3个蓝球，不知道是程式真好用还是这两天运气好，反正双色球买了N年，中奖也没这么集中过，刚试用了两天不敢独享，发出来和网友们一快儿撞大运，呵呵！纯粹交流，对此软件引起的任何责任本人概不负任。