Converting from QBasic to VB.nET

• • Reply

  12 years ago

  by RedSouljaz

  HeaVenMan

  , Indonesia

  Joined 18 years ago

   Hi,

   

  Can anyone help me to convert this QBasic code to vb.net

   

  C$ = CHR$(27)

   

  OPEN "LPT1:" FOR RANDOM AS #1

   

  PRINT #1, CHR(2);

   

  PRINT #1, C$; "A";    'start of job

   

  PRINT #1, C$; "V060"; C$; "H150"; C$; "L0102"; C$; "MSN"; CHR$(&HF8); C$; "MSRIE";

   

  PRINT #1, C$; "V050"; C$; "H198"; C$; "L0102"; C$; "M"; CHR$(&HEF);

   

  PRINT #1, C$; "Q2";    'print quantity 1
  PRINT #1, C$; "Z";       'end of job

   

  
  PRINT #1, CHR$(3);

   

  
  CLOSE #1

   

   

  Please please 

   

  Thanks
  

   

  Report abuse