VB做的进销存,执行的时候有点小BUG,但是可以供初学者参考