機房收費系統 匯出Excel表

2021-08-14 06:18:57 字數 1019 閱讀 6803

前言

機房收費系統進行了很長時間,其中很典型的乙個功能就是匯出excel**,很多窗體都需要實現這個功能。

主要內容

首先需要在vb的「工程」→引用  microsoft excel 15.0object library

然後從vb中的mshflexgrid中匯出資料,**實現如下:

private sub cmdoutput_click()

dim xlbook as excel.workbook '宣告工作簿物件

dim xlsheet as excel.worksheet '宣告工作表單

dim i as integer

dim j as integer

if msflexgrid1.text = "" then '判斷是否有記錄可以匯出

msgbox "沒有記錄可匯出!", vbokonly + vbexclamation, "警告"

exit sub

else

set xlsheet = excel.activeworkbook.activesheet '建立新的工作表單

for i = 0 to msflexgrid1.rows - 1 '填入資料

for j = 0 to msflexgrid1.cols - 1

xlsheet.cells(i + 1, j + 1) = msflexgrid1.textmatrix(i, j) 'cell(a,b)表示a行,b列

next j

next i

end if

end sub

小結起初遇到這個功能不知道怎麼去實現,然後到網上查了一下,看了很多巨人的部落格,突然恍然大悟,遇到不懂的一定要利用好我們的搜尋引擎,對我們的幫助真的很大。

機房收費系統 查詢並匯出Excel表

15 30 時間過的很快,但是自己的進度確實有夠慢的,很多同學已經開始進入到軟工了,自己還為機房收費系統苦惱著。雖然進度很慢,但是每每解決乙個問題都很興奮。開始都說,只要參考學生資訊管理系統敲就行了,但是壓根就沒有思路,但是現在,只要解決乙個,下乙個就會有些思路,久而久之,突然感覺有很多相似的窗體,...

機房收費系統C 版 匯出Excel

機房合作開始好長了一段時間。反重複復開了幾次會,專案也是一拖再拖,作為組長。有80 的責任都在於我。為了不讓這個專案陪著我過春節。要求自己一定要在這幾天敲完。還是一樣的問題,用c 敲,從一開始到如今,不論什麼乙個功能的實現都是現學現查。對於匯出excel 這個功能來說更不是意外。在網上找了非常多資料...

機房收費系統(1) 匯出為Excel文字

機房收費系統是在學生管理系統之後的又乙個自己做的資訊管理系統,它在學生管理系統的基礎之上有 了 部分的拓展,同時也更加接近真正乙個比較完備的系統。在機房收費系統中有很多值得學習,同時也是對自己今後的學習比較有幫助的功能模組,在這裡就先拿 對於匯出為excel來說並不是很難,只是將mshfllexgr...