A small example of VB calling WINIO to implement parallel port communication