紧急求救 先写了一个自定义控件编译通过创建一个exe工程加载控件ctrl+f5全编译执行没问题编译exe 文件 在写入exe文件时无响应只有强行结束vb进程谁遇到过这个情况? 为什么?谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我换了一台电脑 仍然这样Private Sub UserControl_Terminate()Dim i As Integer On Error GoTo err_proc For i = LBound(m_Column) To UBound(m_Column) Set m_Column(i) = Nothing Next i For i = LBound(m_RowSet) To UBound(m_RowSet) Set m_RowSet(i) = Nothing Next i Erase m_Column Erase m_RowSet Exit suberr_proc: MsgBox Err.DescriptionEnd Sub这是控件里的代码 居然编译调用exe的时候 这个地方会被执行怎么解释 现在可以编译 但是在编译exe的时候会报错subscript out of range我想不通啊 编译的时候去执行这段代码干嘛 我个人的理解是,和C的编译器一样,在compile可执行文件的时候(非debug),编译解释程序会将引用的文件调入编译(如C的头文件),所以会执行你引用的控件代码你可以先检查一下你写的控件中是否有与当前工程不匹配的数据类型、声明等 求助,如何手动指定Mschart坐标系 关于VB和SQL数据库日期查询的方法 紧急求救 VB6.0中DAO使用CreateField在ACCESS2000中建立dbCurrency类型的字段... 关于数据报表显示中纸张设置问题 100分挑战高手!! 如何批量去掉多层文件夹中的多个文件的只读属性? DATAGRID小问题 如何解决 VB6 2000 年问题 一个图表的问题 如何用VB编写模拟银行取款机 写注册表string值,在xp下不管用问题 怎么把数据导出导入功能写成程序?
Dim i As Integer On Error GoTo err_proc
For i = LBound(m_Column) To UBound(m_Column)
Set m_Column(i) = Nothing
Next i
For i = LBound(m_RowSet) To UBound(m_RowSet)
Set m_RowSet(i) = Nothing
Next i
Erase m_Column
Erase m_RowSet Exit suberr_proc:
MsgBox Err.Description
End Sub这是控件里的代码
居然编译调用exe的时候 这个地方会被执行
怎么解释
我想不通啊 编译的时候去执行这段代码干嘛
你可以先检查一下你写的控件中是否有与当前工程不匹配的数据类型、声明等