今天才发现，原来VB真是太好用了！

我一直认为在Windows平台上，VB+VC是黄金组合，可是，兄弟我的一个问题一直很困惑，哪位若有兴趣不妨看看：1）以下是Usercontrol中的部分有关代码：
Option Explicit'事件声明:
Event Timer()
'计时器ID
Dim m_hTimer As Long
'设置计时器API函数
Private Declare Function timeSetEvent Lib "winmm.dll" (ByVal uDelay As Long, ByVal uResolution As Long, ByVal lpFunction As Long, ByVal dwUser As Object, ByVal uFlags As Long) As Long'设置计时器
Private Sub SetTimer()
    m_hTimer = timeSetEvent(m_Interval, 0, AddressOf VCSTimer_CallbackProc, Me, TIME_PERIODIC)
End Sub'计时器事件
Public Sub RaiseProc()
    RaiseEvent Timer
End Sub2）以下是标准模块中的代码：Option Explicit
'构造回调函数
Public Sub VCSTimer_CallbackProc(ByVal uID As Long, _
                                ByVal uMsg As Long, _
                                ByVal MyObject As Object, _
                                ByVal dw1 As Long, _
                                ByVal dw2 As Long)
    MyObject.RaiseProc
End Sub以上是我的一个控件有问题的部分代码，在VB环境中，通过添加一个测试工程，可以很好的运行，但是，该控件一旦脱离了VB环境，就会出错：该程序导致无效页，执行了非法操作，确定后关闭。