err.bak

来自「票据打印软件」· BAK 代码 · 共 13 行

BAK
13
字号
DO CASE
  CASE ERROR()=1
  XX=MESSAGEBOX("输入/输出错误,您的磁盘没有放好或磁盘已满",0+48,"信息")
  CASE ERROR()=1002
  XX=MESSAGEBOX("输入/输出错误,您的磁盘没有放好或磁盘已满",0+48,"信息")
   RETURN 
  CASE ERROR()=56
  XX=MESSAGEBOX("没有足够的磁盘空间,操作不成功",0+48,"信息") 

  other
  XX=MESSAGEBOX("操作错误,错误号:"+allt(str(error()))+",信息:"+MESSAGE()+CHR(13)+"请与作者联系..."+chr(13)+"技术支持:Email:salerno@263.net",0+48,"信息")
 retu
endcase  

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?