项目代码,用visualbasic6.0编写