郁闷死了
用了灵图公司的三维控件
vrmapWin3d对象极耗内存
打开一个三维文件后
再换另一个肯定内存不足
因为他不能先释放内存这个对象没有提供unload 方法
也不可set = nothing 我目前想到两种方法
可不知能不能实现
大家给点建议
一:
让它打开一个空的文件
然后几秒钟后再打开要装载的文件什么方法可以让系统在这同秒钟内对任何事件都不响应二:
干脆就动态将这个控件删除再加载
不知道怎么实现
用了灵图公司的三维控件
vrmapWin3d对象极耗内存
打开一个三维文件后
再换另一个肯定内存不足
因为他不能先释放内存这个对象没有提供unload 方法
也不可set = nothing 我目前想到两种方法
可不知能不能实现
大家给点建议
一:
让它打开一个空的文件
然后几秒钟后再打开要装载的文件什么方法可以让系统在这同秒钟内对任何事件都不响应二:
干脆就动态将这个控件删除再加载
不知道怎么实现
Dim rsTemp As New ADODB.Recordset
Dim strSQL As StringcnnTemp.Open "your ConnectionString"
strSQL = "SELECT * FROM TABLE1"
rsTemp.Open strSQL, CNTEMP, adOpenKeyset, adLockOptimistic, adCmdText
Open FileName For Input As #1
While Not EOF(1)
Input #1, Feild1Value, Feild2Value, Feild3Value
With rsTemp
.AddNew
.Fields(1).Value = Feild1Value
.Fields(2).Value = Feild2Value
.Fields(3).Value = Feild3Value
.Update
End With
Wend
Close #1注意你的文本文件书写格式
feild1value,feild2value,feild3value
feild1value,feild2value,feild3value
feild1value,feild2value,feild3value
...
发错了
删不掉
Unload Object并非Object.Unload
我用这个语句来卸载这个对象时 报错
说是这个对象不支持unload