创建对象,不时的不能使用
创建对象,时不时的不能使用?本帖最后由 Emder_Maus 于 2012-11-15 01:34:13 编辑声明了一个过程Private Su
创建对象,时不时的不能使用?
本帖最后由 Emder_Maus 于 2012-11-15 01:34:13 编辑 声明了一个过程
Private Sub Connect()
Dim rdserver = CreateObject("MTPServer")
Dim rdinstrument = rdserver.CreateInstrumentObject
rdinstrument.send= "S"
'资源回收
rdinstrument = Nothing
rdserver = Nothing
End Sub
很奇怪,调用一次,两次都可以,到第三次的时候就会说
object variable or with block variable not set,错误的是 rdinstrument.send= "S"
真是活见鬼了。这个要到底怎么修改啊? 求大虾们帮忙啊 !
[最优解释]Dim rdserver = nothing
Dim rdinstrument = nothing
rdserver = CreateObject("MTPServer")
rdinstrument = rdserver.CreateInstrumentObject rdinstrument.send= "S"
'资源回收
rdinstrument = Nothing
rdserver = Nothing
最好lock 同步 这样安全点
[其他解释]http://www.cnblogs.com/forward/archive/2009/05/20/1468210.html
[其他解释]没人看见吗,急啊!!
[其他解释]斑斑大哥啊,你给点实质性的帮助啊,这个到底是咋回事啊,是不是中间要弄个什么时间差啊?
[其他解释]现在改成
Dim rdserver = Nothing
rdserver)CreateObject("MTPServer")
Dim rdinstrument = Nothing
rdinstrument=rdserver.CreateInstrumentObject
貌似到现在测了5次了都没问题,我等会再去试试。
[其他解释]LS兄弟跟我想得一样啊,只不过顺序不同,多谢啦!