这个是我写的,用的工具是vb2008,调试成功,可以正常使用,功能比较齐全。