# 还是不能用啊!!!

Posted by 阿晴 on August 17, 1997 at 09:21:46:

In Reply to: 佑道问题了 posted by 小吴 on August 13, 1997 at 17:42:01:

弟实验过了,还是不行啊! 我想问题应该是出在 Class上. 弟将 Class的Source Code简写如下:
档名: MyClass.Cls
Option Explicit
Public Sub Message(ByVal MsgIndex As String)
Select Case MsgIndex
Case "读取错误"
MsgBox "找不到档案或档案格式错误!",vbOkOnly
Case Else
MsgBox "找不到这个讯息索引!",vbOkOnly
End Select
End Sub

专案名称: MyProject 专案描述: 错误讯息 , 然后将它制成DLL档.
开启新专案来测试:
Option Explicit
Dim TestClass As New MyClass -->是这样吗？可不可以不要加New?

Private Sub Form_Load()
TestClass.Message "读取错误"
End Sub
程式执行结果并未出现任何MsgBox,也没有出现任何错误讯息,真是太奇怪了? 请问要怎么解决?! Thanks!

Follow Ups:

- Re: 还是不能用啊!!! 小吴 17:38:01 8/17/97 (0)