VB ADO Excel DataGrid 高手出點小力。

2025-04-28 22:35:04 字數 1499 閱讀 1060

1樓:琚明歸程

vb6+2000環境,資料庫用到了ado 和datagrid,datagrid查詢結果配合乙個command按鈕加了陸鬧頌段輸出到excel的**,可是隻能輸出當前datagrid顯彎老示的一頁,超出頁部份不輸出,手動翻到datagrid下一頁再次執行才行,而且是又輸出到乙個新檔案,哪位大哥大姐大叔大嬸幫下忙,看看怎麼樣把datagrid裡所有的查詢結果全部一次輸出到excel,幫幫忙啦,除錯可行的話另外加分~~

**如下:private sub command1_click()

dim i, j as integer

on error resume next

set xlworkbook =

set xlsheet =

for i = 1 to

i) = - 1).caption

for j = 0 to - 1

2, i) = - 1).celltext(

next j

next i

trueset xlsheet = nothing

set xlworkbook = nothing

end sub

引用了乙個excel的library部件,通過乙個button控制項和乙個datagrid控制項,能夠實現分頁匯出,但不能一次全部匯出^_^

誰要是有早鄭其它可用的**也可以~~不用非要修改我的~呵呵。

2樓:網友

先我的答案,問題很簡單,就怕不給分1 呵呵 今天遇見了好幾個不給分的了!

3樓:網友

看不懂 網路高手不會幫你填的 小心上當。

vb ado綁datagrid查詢結果輸出excel問題

4樓:禹希初

你這種方式只能輸出datagrid當前顯示的那一頁,如果你禁用datagrid的分頁的顯示,便可以輸出。

整個查詢結果集了。

祝你好運!

vb中ado連線excel有什麼好處?

5樓:匿名使用者

沒什麼好處,用excel自帶的動態庫訪問最合適了。

vb+access+ado+datagrid怎樣操作**運算

6樓:網友

首先讀取數物巧凳罩旅據庫的記錄總數寬指,然後用迴圈解決。比如記錄總數是x,那麼:

with datagrid1

for i=1 to x

金額」).value =數量」).value *單價」).valuenext i

ned with

7樓:網友

這一列是計算列。

要用**新增列。

vb ado,datagrid同步更新問題

8樓:網友

在form2中設定就可以啦。