出于爱好本人用VB编制了本程序，为测试版，目前程序还很不完善，存在一些不足之处,欢迎VB爱好者将本程序进行改进，使其完善。