在一个自定义的类中有如下的代码
Private WithEvents mTimer1 As IeTimerPrivate Sub Class_Initialize()
Set mTimer1 = frmFastPlaceFeatures.Controls.Add("Internet.Timer.1", "tmr1" & Hex(ObjPtr(Me)))
mTimer1.Left = 10000
mTimer1.Interval = 50
mTimer1.Enabled = ValTrue
End Sub运行到红色字体处出错,错误号为-2147221005 无效的类别字符串。但是并非所有的机器上都有该错误,哪位大侠碰到过,可以指点一下,感激不尽!机器的操作系统都是xp的。
Private WithEvents mTimer1 As IeTimerPrivate Sub Class_Initialize()
Set mTimer1 = frmFastPlaceFeatures.Controls.Add("Internet.Timer.1", "tmr1" & Hex(ObjPtr(Me)))
mTimer1.Left = 10000
mTimer1.Interval = 50
mTimer1.Enabled = ValTrue
End Sub运行到红色字体处出错,错误号为-2147221005 无效的类别字符串。但是并非所有的机器上都有该错误,哪位大侠碰到过,可以指点一下,感激不尽!机器的操作系统都是xp的。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货