📄 406.html
字号:
<html> <head> <title>还是不能用啊!!!</title> </head> <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK=""> <center> <h1>还是不能用啊!!!</h1> </center><HR><p>Posted by <a href="mailto:eipper@ms14.hinet.net">阿晴</a> on August 17, 1997 at 09:21:46:<p>In Reply to: <a href="381.html"><b>佑道问题了</b></a> posted by 小吴 on August 13, 1997 at 17:42:01:<p>弟实验过了,还是不行啊! 我想问题应该是出在 Class上. 弟将 Class的Source Code简写如下:<br>档名: MyClass.Cls<br>Option Explicit<br> <br>Public Sub Message(ByVal MsgIndex As String)<br> Select Case MsgIndex<br> Case "读取错误" <br> MsgBox "找不到档案或档案格式错误!",vbOkOnly<br> Case Else<br> MsgBox "找不到这个讯息索引!",vbOkOnly<br> End Select<br>End Sub<p>专案名称: MyProject 专案描述: 错误讯息 , 然后将它制成DLL档.<br>开启新专案来测试:<br>Option Explicit<br>Dim TestClass As New MyClass -->是这样吗？可不可以不要加New?<p>Private Sub Form_Load()<br> TestClass.Message "读取错误" <br>End Sub<br>程式执行结果并未出现任何MsgBox,也没有出现任何错误讯息,真是太奇怪了? 请问要怎么解决?! Thanks!<br><br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 406--><!--top: 407--><li><a href="407.html"><b>Re: 还是不能用啊!!!</b></a> 小吴 <i>17:38:01 8/17/97</i>(<!--responses: 407-->0)<ul><!--insert: 407--></ul><!--end: 407--></ul><!--end: 406--><br><HR><p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -