📄 1346.html
字号:
<html> <head> <title>Run-tim error</title> </head> <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="blue" VLINK="#808080" ALINK="red"> <center> <h1>Run-tim error</h1> </center><HR><p>Posted by <a href="mailto:shien@wusnet.net.tw">小贤</a> on November 20, 1997 at 01:09:52:<p>我的程式如下: 如果我磁碟机未放磁片会发生 Run-time error '71',程式就结束掉,我不要让它结束掉要怎么办? on err 没有用!<p>On Err GoTo ErrTable<br>MsgBox "请将磁片放入A: 关上磁碟机后按确定!"<br>If Dir("b:\A.mdb") = "" Then<br> MsgBox "找不到档案"<br>End If<br>Exit Sub<br>ErrTable:<br>Select Case Err.Number<br> Case Else<br> MsgBox "错误代码 ： " & Err.Number <br>End Select<p><br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1346--><!--top: 1353--><li><a href="1353.html"><b>Re: Run-tim error</b></a> Noway <i>07:06:31 11/20/97</i>(<!--responses: 1353-->0)<ul><!--insert: 1353--></ul><!--end: 1353--></ul><!--end: 1346--><br><HR><p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -