这是我从网上搜寻的vb6的代码,现在我用vb.net编程了,用不着了,故发上去共享一下,给你节约时间。