本人利用一个MSHFLEXGRID绑定一个ADO数据源,数据已显示在MSHFLEXGRID表格控件中,然后通一个标准模块中的另存为EXCEL文件公用过程进行另存为EXCEL文件。采用的是传值模式,也就是将整个MSHFLEXGRID传给该过程,期间的采用DOEVENTS语句。
问题是在公用过程执行复制数据时,如果我不改变原来的MSHFLEXGRID控件内的数据的话,程序完全运行正常,但是我一执行查询来改变MSHFLEXGRID控件的数值的话,公用过程就会显示出错,显示为下标超界。
错误语句:MYWRS。CELLS(I+1,J+1)=MSHFLEXGRID1。TXTMARTYS(I,J)