機房收費之報表

來源:互聯網
上載者:User

 前言:

     報表作為機房收費系統的一大重點,其主要流程分為報表設計-資料庫連接-vb與報表的互動。下面首先介紹一下報表設計。

     1.首先下載安裝報表設計師,大家普遍使用的是Grid++Report5.0

       下載連結:http://xiazai.zol.com.cn/detail/27/262835.shtml

        VB中添加相應組件

       


     2.開啟編輯器-->插入報表頭-->插入靜態框  在靜態框中填寫需要內容

        

       添加時間需插入系統變數框-->在屬性框-->資料-->選擇日期格式

         

          

       3.插入明細網格-->輸入sql查詢語句-->點擊下圖所示建立與資料庫連接

         

       點擊建立資料庫連接-->按指示操作

       

       

      將資料庫checkday_Info表中的欄位匯入網格中去(下圖兩項)-->更改表頭

        

        

      4.vb與報表互動的代碼:

      類似於匯出excel 首先定義 然後賦值 最後執行使用

     Dim Report As grproLibCtl.GridppReport   '執行個體化報表
        
     Private Sub Form_Load()     Dim txtSQL As String  '執行個體化報表Report       Set Report = New grproLibCtl.GridppReport  '報表建立的位置       Report.LoadFromFile App.Path & "\checkday.grf"     Report.DetailGrid.Recordset.ConnectionString = ConnectString   '資料來源串連資料庫直接調用寫好的模組內容       txtSQL = "select * from CheckDay_Info"     Report.DetailGrid.Recordset.QuerySQL = txtSQL  '查看報表     GRDisplayViewer1.Report = Report '顯示報表     GRDisplayViewer1.Start     End Sub
  小結 :

     報表學習暫告一階段,在學習過程中不斷有這樣的感悟:很多時候都是困難的心理暗示嚇倒了我們而不是困難本身,電腦學習還是需要我們塌下心來去專研,一切問題都是紙老虎。

        

           

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.