這是一個可以將GRID表中的內容導入到EXCEL中的一個很好的類,它只要在表單中拉入這個類中的GRID,然後在一個按鈕中寫上"thisform.zclgrid1.repxls()",就可將該GRID導出到一個EXCEL文件中,但令人遺憾的是,這個類每次導出之後,EXCEL表頭總是有"ZCLGRID 試用版"幾個字,在類屬性裏有一項SPAGEHEADE(默認值爲:"ZCLGRID 試用版",即輸出到EXCEL表頭),然而一旦將"ZCLGRID 試用版"幾個字去掉或改掉,"thisform.zclgrid1.repxls()",這個語句就失去作用了,也就不能導出EXCEL了.想請各位高手看看,有沒有哪位能夠修改這個類的,看能否實現改這個表頭字的,或者將這幾個去掉,而類的功能不變.
Select (Thisform.Grid1.Recordsource)
Copy To Excel表名.Xls Type Xl5