如何在vb中调用i/o口的例子(10KB)