err.prg

来自「建设银行计算机设备台帐程序计算机设备管理程序。其中包括一个网络文件传输示例」· PRG 代码 · 共 8 行

PRG
8
字号
DO CASE
  CASE ERROR()=1002
  XX=MESSAGEBOX("输入/输出错误,您的磁盘没有放好或磁盘已满",0+48,"信息")
  retu
  other
  XX=MESSAGEBOX("操作错误,请与作者联系..."+chr(13)+"主页地址:http://zhanghongju.163.net"+chr(13)+"技术支持:Email:dzzhj@263.net",0+48,"信息")
 retu
endcase  

⌨️ 快捷键说明

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