急!! 使用 Set m_odebugform = CreateObject("vbForm") 创建窗体出错, 请指点
我想用Set m_odebugform = CreateObject("vbForm") 创建一个新窗体,结果出错:
实时错误 '429';
ActiveX 部件不能创建对象
语句如下,请高手指点。
Dim m_odebugform As Form
If m_odebugform Is Nothing Then
Set m_odebugform = CreateObject("vbForm")
m_odebugform.Caption = "画面"
m_odebugform.Height = 480
m_odebugform.WindowState = 2
m_odebugform.Visible = True
m_odebugform.Enabled = True
m_odebugform.Show vbModeless
End If