用VB和USB通信的一个实例