用vb编写的一些实用代码 可以根据需要选用,有较强的实用性!