现在要写一段控制代码我要转化到其他语言。
PRINT #1,CHR$(&H1B);"p";CHR$(0);CHR$(100);CHR$(250);

解决方案 »

  1.   

    十六进制        十进制
    &H1B      =      27
      

  2.   

    chr(27) 就是得到ascii码值为27的那个字符了.
      

  3.   

    你可以放一个text控件.让text1.text=chr$(&H1b) 不就可以看到结果了?:)
      

  4.   

    如钱箱接打印口的话,
      try
       assignFile(mytext,'Lpt1');
       buf:=chr(27)+chr(45)+chr(2);
       writeln(mytext,buf);
      finally
       closefile(mytext);
      end;