1. 程式人生 > >VB NET版機房收費系統---匯出Excel表格

VB NET版機房收費系統---匯出Excel表格

也歡迎大家轉載本篇文章。分享知識,造福人民,實現我們中華民族偉大復興!

               

       datagridview,翻譯成中文的意思是資料表格顯示,使用DataGridView控制元件,可以顯示和編輯來自不同型別的資料來源的表格,將資料繫結到DataGridView控制元件非常簡單和直觀,大多數情況下,只需要設定DataSource屬性即可,在繫結到包含多個列表或表的資料庫源時,只需將DataMember屬性設定為繫結的列表或表的字串即可。機房收費系統多次用到資料表格的顯示,並且匯出為Excel表格,第一次機房收費系統是用VB版本的,她匯出Excel的方法如下:

        開啟VB-工程-應用-勾選Microsoft  Excel 14.0 Objexts 2.6 Library

         

        程式碼如下:

<span style="font-size:18px;">Private Sub CmdExport_Click()      Dim j As Integer      Dim xlApp As Excel.Application      Dim xlBook As Excel.Workbook      Dim xlSheet As Excel.Worksheet      Set xlApp = CreateObject("Excel.Application")   '例項化物件xlApp          xlApp.Visible = True
      Set xlBook = xlApp.Workbooks.Add      Set xlSheet = xlBook.Worksheets(1)      For i = 0 To myflexgrid.Rows - 1          For j = 0 To myflexgrid.Cols - 1             myflexgrid.Row = i             myflexgrid.Col = j             xlSheet.Cells(i + 1, j + 1) = Trim(myflexgrid.Text)          Next      Next
  End Sub </span>
        第二版機房收費系統VB.NET版本,她又怎麼樣匯出Exce表格nie,跟VB版的匯出Excel表格的方法有哪些異曲同工之妙,又有著VB不具備的妙處呢?下面一一介紹:

          首先,我們需要引用

           

          還有一個細節問題,我們需要把AllowUserToAddRow這個屬性改為False,後面詳解True和False的區別:

           

           程式設計程式碼如下:

<span style="font-size:18px;">Public Function dirivExcel(ByVal dgv As DataGridView) As Boolean        Dim myExcel As New Microsoft.Office.Interop.Excel.Application  '建立Excel連線        myExcel.Application.Workbooks.Add(True)        myExcel.Visible = True        Dim i, j, k As Integer '定義變數        For k = 0 To dgv.ColumnCount - 1     '新增表頭            myExcel.Cells(1, k + 1) = dgv.Columns(k).HeaderText        Next k        For i = 0 To dgv.RowCount - 1   '通過迴圈來新增控制元件中的資料到表格中            For j = 0 To dgv.ColumnCount - 1                '由於第一行是表頭,所以新增資料時就從第二行開始新增                myExcel.Cells(i + 2, j + 1) = dgv(j, i).Value            Next        Next        Return True '新增完畢,返回true    End Function</span>
          現在我們來看一下執行結果:

          

          AllowUserToAddRow這個屬性改為True的時候出現如下錯誤:

          

        因為單元格的value是空的,對一個控制進行.ToString()操作時,就會出現System.NullReferenceException異常。對此我將toString去掉,就不報錯了,另外你可以對value先進行是否為空進行判斷如果不為空,在進行Tostring()操作,上述是在修改程式碼的基礎上來解決了這個問題,另外對於控制元件本身也有一個屬性控制,是否自動新增空白行。VB.NET版機房收費系統,未完,待續......

            這裡寫圖片描述 你好! 這是你第一次使用 **Markdown編輯器** 所展示的歡迎頁。如果你想學習如何使用Markdown編輯器, 可以仔細閱讀這篇文章,瞭解一下Markdown的基本語法知識。

新的改變

我們對Markdown編輯器進行了一些功能拓展與語法支援,除了標準的Markdown編輯器功能,我們增加了如下幾點新功能,幫助你用它寫部落格:

  1. 全新的介面設計 ,將會帶來全新的寫作體驗;
  2. 在創作中心設定你喜愛的程式碼高亮樣式,Markdown 將程式碼片顯示選擇的高亮樣式 進行展示;
  3. 增加了 圖片拖拽 功能,你可以將本地的圖片直接拖拽到編輯區域直接展示;
  4. 全新的 KaTeX數學公式 語法;
  5. 增加了支援甘特圖的mermaid語法1 功能;
  6. 增加了 多螢幕編輯 Markdown文章功能;
  7. 增加了 焦點寫作模式、預覽模式、簡潔寫作模式、左右區域同步滾輪設定 等功能,功能按鈕位於編輯區域與預覽區域中間;
  8. 增加了 檢查列表 功能。

功能快捷鍵

撤銷:Ctrl/Command + Z 重做:Ctrl/Command + Y 加粗:Ctrl/Command + B 斜體:Ctrl/Command + I 標題:Ctrl/Command + Shift + H 無序列表:Ctrl/Command + Shift + U 有序列表:Ctrl/Command + Shift + O 檢查列表:Ctrl/Command + Shift + C 插入程式碼:Ctrl/Command + Shift + K 插入連結:Ctrl/Command + Shift + L 插入圖片:Ctrl/Command + Shift + G

合理的建立標題,有助於目錄的生成

直接輸入1次#,並按下space後,將生成1級標題。 輸入2次#,並按下space後,將生成2級標題。 以此類推,我們支援6級標題。有助於使用TOC語法後生成一個完美的目錄。

如何改變文字的樣式

強調文字 強調文字

加粗文字 加粗文字

標記文字

刪除文字

引用文字

H2O is是液體。

210 運算結果是 1024.

插入連結與圖片

連結: link.

圖片: Alt

帶尺寸的圖片: Alt

當然,我們為了讓使用者更加便捷,我們增加了圖片拖拽功能。

如何插入一段漂亮的程式碼片

部落格設定頁面,選擇一款你喜歡的程式碼片高亮樣式,下面展示同樣高亮的 程式碼片.

// An highlighted block var foo = 'bar'; 

生成一個適合你的列表

  • 專案
    • 專案
      • 專案
  1. 專案1
  2. 專案2
  3. 專案3
  • 計劃任務
  • 完成任務

建立一個表格

一個簡單的表格是這麼建立的:

專案 Value
電腦 $1600
手機 $12
導管 $1

設定內容居中、居左、居右

使用:---------:居中 使用:----------居左 使用----------:居右

第一列 第二列 第三列
第一列文字居中 第二列文字居右 第三列文字居左

SmartyPants

SmartyPants將ASCII標點字元轉換為“智慧”印刷標點HTML實體。例如:

TYPE ASCII HTML
Single backticks 'Isn't this fun?' ‘Isn’t this fun?’
Quotes "Isn't this fun?" “Isn’t this fun?”
Dashes -- is en-dash, --- is em-dash – is en-dash, — is em-dash

建立一個自定義列表

Markdown
Text-to-HTML conversion tool
Authors
John
Luke

如何建立一個註腳

一個具有註腳的文字。2

註釋也是必不可少的

Markdown將文字轉換為 HTML

KaTeX數學公式

您可以使用渲染LaTeX數學表示式 KaTeX:

Gamma公式展示 Γ(n)=(n1)!nN\Gamma(n) = (n-1)!\quad\forall n\in\mathbb N 是通過尤拉積分

Γ(z)=0tz1etdt&ThinSpace;. \Gamma(z) = \int_0^\infty t^{z-1}e^{-t}dt\,.

你可以找到更多關於的資訊 LaTeX 數學表示式here.

新的甘特圖功能,豐富你的文章

gantt
        dateFormat  YYYY-MM-DD
        title Adding GANTT diagram functionality to mermaid
        section 現有任務
        已完成               :done,    des1, 2014-01-06,2014-01-08
        進行中               :active,  des2, 2014-01-09, 3d
        計劃一               :         des3, after des2, 5d
        計劃二               :         des4, after des3, 5d
  • 關於 甘特圖 語法,參考 這兒,

UML 圖表

可以使用UML圖表進行渲染。 Mermaid. 例如下面產生的一個序列圖::

張三李四王五你好!李四, 最近怎麼樣?你最近怎麼樣,王五?我很好,謝謝!我很好,謝謝!李四想了很長時間,文字太長了不適合放在一行.打量著王五...很好... 王五, 你怎麼樣?張三李四王五

這將產生一個流程圖。:

連結長方形圓角長方形菱形
  • 關於 Mermaid 語法,參考 這兒,

FLowchart流程圖

我們依舊會支援flowchart的流程圖:

  • 關於 Flowchart流程圖 語法,參考 這兒.

匯出與匯入

匯出

如果你想嘗試使用此編輯器, 你可以在此篇文章任意編輯。當你完成了一篇文章的寫作, 在上方工具欄找到 文章匯出 ,生成一個.md檔案或者.html檔案進行本地儲存。

匯入

如果你想載入一篇你寫過的.md檔案或者.html檔案,在上方工具欄可以選擇匯入功能進行對應副檔名的檔案匯入, 繼續你的創作。