Skip to main content

Search This Blog

Visual Basic .Net (VB.Net) 程式語言案例學習 (08. 研討會簡報產生器)

Visual Basic .Net (VB.Net) 程式語言案例學習 (08. 研討會簡報產生器)

Visual Basic .Net (VB.Net) 程式語言案例學習 (08. 研討會簡報產生器)

8.1 問題

在許多的研討會中，都會請應邀者準備簡報檔，以利研討會的進行，大會基本上會希望採用同樣的格式，讓研討會的簡報看起來有連貫性。這時候就產生了問題，就算將範本寄給應邀者，請應邀者修改並修改或加入自己的內容，但仍舊免不了有意外的發生。因此就有了這個程式的需求，不如制定一個標準格式，依照基本資料自動產生簡報檔，再將簡報檔寄給應邀者，應邀者不用變更格式，繼續增加新的投影片即可，如此一來所有的簡報格式都會是一致的。

8.2 需求

表格 8‑1 「研討會簡報產生器」系統目的分析表

版本：1.0　　 要做什麼 　 不要做什麼（不要做不代表不會做） 　
能做什麼 （第一格：必要項目） 　　 （第二格：次要項目）
利用資料庫將基本資料存入。 將資料庫升級至SQL Server，透過網路讓使用者建立基本資料。　
載入基本資料，可透過點選方式將基本資料填入欄位。　
可在產生簡報檔之前，修改欄位內容。
可透過欄位內容產生簡報檔。
不能做什麼（不能做代表不需要做） （第三格：不必要項目） （第四格：不需要項目）
設計批次產生簡報檔的功能。 將程式設計成網頁，利用ASP.NET與VB.NET設計，讓使用者可以在網頁上編輯基本資料，並自行產生簡報檔。　

表格 8‑2 「研討會簡報產生器」系統目標分析表

版本：　 重要 　 不重要 　
優先 （重） （急）
可透過欄位內容產生簡報檔。 利用資料庫將基本資料存入。
不急迫 （輕） （緩）
可在產生簡報檔之前，修改欄位內容。　 載入基本資料，可透過點選方式將基本資料填入欄位。　

表格 8‑3 「研討會簡報產生器」系統規格表

規格項目 　 規格內容 　 備註
主要功能 可透過欄位內容產生簡報檔。 …
利用資料庫將基本資料存入。
使用介面 可在產生簡報檔之前，修改欄位內容。　 …
載入基本資料，可透過點選方式將基本資料填入欄位。　

8.3 特色

特點就是可以透過基本資料，自動產生格式相同的簡報檔，而無需人工製作。

8.4 使用工具

語言 　 軟體 　
Visual Basic 2005　 MS Visual Studio 2005 .NET、MS PowerPoint、MS Access　

8.5 系統架構

在這裡我們將建立簡報檔的部分，設計成一個類別，這樣有助於往後的重複使用。透過這個類別產生物件，我們就可以很簡單的建立簡報檔。因此本程式的關鍵在於這個類別，而程式介面則是次要的問題。如果要發佈成可單獨執行的程式，則須要配合兩個DLL檔，Microsoft.Office.Interop.PowerPoint.dll與Microsoft.Vbe.Interop.dll，如此一來就可以直接執行。當然還有基本資料庫Member.mdb和簡報範本檔TechRays_Prt.pot，但這些是可以依照您的需求而做替換的，倘若您覺得簡報範本不適合使用，隨時都可以修改或置換。在教學檔案就是直接執行的範例，您可以參考看看。

8.6 程式實作


‘所有變數必須宣告才能使用

Option Explicit On

‘加入基本參考

Imports System

Imports System.Windows.Forms

Imports System.Collections.Specialized

‘Form1的類別

Public Class Form1

    Inherits System.Windows.Forms.Form

    ‘宣告簡報檔產生物件

    Dim ppt As PPTAutomation

    ‘產生簡報按鈕被點選事件

    Private Sub btnCreate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCreate.Click

        ‘預設所有欄位皆已填滿

        Dim filled As Boolean = True

        ‘檢查姓名欄位

        If (txtName.Text).Trim().Length.Equals(0) Then

            errorProvider.SetError(txtName, “不能空白。”)

            filled = False

        End If

        ‘檢查年齡欄位

        If (txtAge.Text.Trim().Length.Equals(0)) Then

            errorProvider.SetError(txtAge, “不能空白。”)

            filled = False

        End If

        ‘檢查稱呼欄位

        If (txtDesignation.Text.Trim().Length.Equals(0)) Then

            errorProvider.SetError(txtDesignation, “不能空白。”)

            filled = False

        End If

        ‘檢查區域欄位

        If (txtPlace.Text.Trim().Length.Equals(0)) Then

            errorProvider.SetError(txtPlace, “不能空白。”)

            filled = False

        End If

        ‘檢查電子郵件欄位

        If (txtEmail.Text.Trim().Length.Equals(0)) Then

            errorProvider.SetError(txtEmail, “不能空白。”)

            filled = False

        End If

        ‘檢查組織欄位

        If (txtCompany.Text.Trim().Length.Equals(0)) Then

            errorProvider.SetError(txtCompany, “不能空白。”)

            filled = False

        End If

        ‘倘若資料皆已填滿

        If (filled = True) Then

            ‘宣告字串集合

            Dim array As StringCollection

            ‘建立簡報產生物件

            ppt = New PPTAutomation

            ‘建立字串集合物件

            array = New StringCollection

            ‘將文字欄位內容存入字串集合中

            array.Insert(0, txtName.Text)

            array.Insert(1, txtAge.Text)

            array.Insert(2, txtDesignation.Text)

            array.Insert(3, txtCompany.Text)

            array.Insert(4, txtPlace.Text)

            array.Insert(5, txtEmail.Text)

            ‘呼叫簡報產生器

            ppt.CreateFile(array)

        End If

    End Sub

    ‘程式初始化載入事件

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        ‘宣告並建立資料庫連結物件

        Dim objCnn As New OleDb.OleDbConnection

        ‘宣告資料庫連結字串變數

        Dim strCnn As String

        ‘宣告並建立資料集物件

        Dim objDS As New DataSet

        ‘設定資料庫連結文字

        strCnn = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source =” & Application.StartupPath & “\Member.mdb”

        objCnn.ConnectionString = strCnn

        ‘開啟資料庫

        objCnn.Open()

        ‘建立資料表轉接器

        Dim objAD As New OleDb.OleDbDataAdapter(“Select * From Member”, objCnn)

        ‘將資料表填入資料集

        objAD.Fill(objDS, “Member”)

        ‘設定資料顯示表的資料表名稱

        DataGridView1.DataMember = “Member”

        ‘設定資料顯示表的資料來源

        DataGridView1.DataSource = objDS

    End Sub

    ‘當資料顯示表的列被選擇時

    Private Sub DataGridView1_RowEnter(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.RowEnter

        ‘由資料表列中載入資料到所屬的欄位

        txtName.Text = DataGridView1.Item(1, e.RowIndex).Value

        txtAge.Text = DataGridView1.Item(2, e.RowIndex).Value

        txtDesignation.Text = DataGridView1.Item(3, e.RowIndex).Value

        txtCompany.Text = DataGridView1.Item(4, e.RowIndex).Value

        txtPlace.Text = DataGridView1.Item(5, e.RowIndex).Value

        txtEmail.Text = DataGridView1.Item(6, e.RowIndex).Value

    End Sub

End Class

如圖8-1可見點選上方的基本資料表，就會把該列的資料載入文字欄位中。

image.png
圖 8‑1

如圖8-2可見由程式搭配簡報範本檔所自動產生的簡報檔。

image.png
圖 8‑2

8.7 修改重點

因為產生簡報檔的類別已經完成了，基本上要修改的重點應該是放在架構上，例如：將基本資料升級在SQL Server上，建立網頁，讓使用者可以自行在網頁上建立基本資料，而產生器就可以依照基本資料產生簡報檔。此外，批次產生簡報檔的構想也是很不錯的，如果是大型的研討會，例如：學術年會。就會很需要批次產生簡報檔，而無需人工點選產生按鈕。

8.8 結論

其實這支程式是非常的小巧，但卻能夠帶來極大的便利，這是一個好的應用範例。很多應用能夠結合現有的軟體，例如：MS Excel、MS PowerPoint、…等等。都將會是很省時間又有效率的程式，由其MS Office系列使用者廣布全球，幾乎只要是微軟系統就會搭上一套MS Office，而大多數人們也都具備基本的操作能力，因此設計應用程式時，倘若能夠結合到MS Office，您會發現能夠節省許多工夫，而不必為客製化的問題而煩惱，所以基本上現在的商用軟體，大多都能匯出MS Excel、MS Word的檔案，這就是免去過渡客製化的方法之一。

image.png
Lai Tai-Yu (賴岱佑)

回到教材說明

Posted by -
Newer Posts Home Older Posts

Popular posts from this blog

數位影像處理：最佳化處理策略之快速消除扭曲演算法

Image
最佳化處理策略之快速消除扭曲演算法 我們的論文（最佳化處理策略之快速消除扭曲演算法；A Quickly Dewarping Algorithm of Optimization Processing Strategy）被 2019 工程科技應用研討會 接受了。 會議地點在台北城市科技大學的工程學院，舉辦日期是西元二零一九年四月十二日。 最近，全景影像的應用逐漸變得越來越有用。優點是一個能夠捕捉3​​60度影像的相機。但是，360度影像是圓形影像。因此，Dewarping技術有助於圓形影像轉換為平面影像。在本研究中，不需要參考額外的信息，如攝像機參數，鏡頭參數，視頻或影像參數等。本研究提出了去扭曲演算法的優化處理策略。策略和演算法進一步改善了性能。快速去扭曲演算法能夠將圓（全景影像）快速變換為平面影像。優化處理策略能夠提高演算法的性能。用於評估性能，本研究中使用的CPU負載。比較其他Dewarping演算法的性能。結果，這項研究在性能方面優於其他Dewarping演算法。 本研究旨在研究去扭曲演算法的快速計算和低CPU負載。 例如，圖2是原始影像。 圖3顯示了本研究的基線。 圖4是研究的結果影像（全景影像）。 圖2 原始影像 圖3 顯示了本研究的基線 圖4 研究的結果影像（全景影像） 表1是比較概覽表[8]。 有六家公司的演算法和我們提出的演算法。 這項研究支持所有魚眼相機和特殊魚眼相機（Cata-Fisheye相機）。 有不同之處在於是否使用GPU。 雖然有兩家公司使用GPU進行去扭曲演算法。 但是，當應用OpenCL來使用GPU時，NUUO的去扭曲演算法的CPU負載為19％。 當源影像的分辨率為1920 x 1440時，我們提出的CPU負載為3.65％。圖5是我們提出的演算法的CPU負載圖。 表1 比較概覽表 User additional effort Generic De-warp Support vendor Calibration GPU Acceleration NUUO No need ...
Read more

寫作：波蘭文學習之旅：1-1. 波蘭文字母與發音（注音版）

Image
波蘭文學習之旅：1-1. 波蘭文字母與發音（注音版） 波蘭文字母(Alfabet Polski) 波蘭語是中歐的西斯拉夫語言，也是波蘭的官方語言。它的書面標準是波蘭語字母表，對應於拉丁字母表，有幾個附加內容。 波蘭語的人在波蘭大部分地區以統一的方式使用這種語言。 它也是繼俄語和烏克蘭語之後使用最廣泛的第三種斯拉夫語言。波蘭語的本地名稱是 polski（波蘭語），język polski（波蘭語），或者更正式的 polszczyzna（波蘭語）。 波蘭文字母、名稱、注音對照表 注意：這張表是我整理出來，經波蘭友人聽我的發音，確認聲音相似度高，才製作完成。 但發音要更道地，仍然還有不同波蘭文字母搭配後，改變發音的情況。因此這張簡表只能說是參考用，以及快速建立發音基礎。 Letter Name 注音 複合字母     A a a ㄚˋ Letter Name 注音 Ą ą ą ㄥˋ Ch, ch ce/ha ㄏㄜ˙ B b be ㄅㄜ˙ Ci, ci ce/i ㄑㄧ C c ce(ㄘㄟˋ) ㄘ Cz, cz ce/zet ㄔ Ć ć cie(ㄑㄧㄝˋ) ㄑ Dz, dz de/zet ㄗ D d de ㄉㄜ˙ Dzi, dzi de/zet/i ㄐㄧ˙ E e e ㄟˋ ...
Read more

Python 日期與時間的處理

Image
Python 日期與時間的處理 Python 日期與時間的處理 ¶ 在 Python 中，常見處理日期與時間的套件，如下： time datetime relativedelta calendar 　　 引用方式，如下：　　 import time from datetime import datetime from dateutil.relativedelta import relativedelta import calendar time.time() 函數 ¶ time.time() 可以傳回從 1970/1/1 00:00:00 算起至今的秒數： In [1]: # 匯入 time 模組 import time # 從 1970/1/1 00:00:00 至今的秒數 seconds = time . time () # 列印結果 print ( seconds ) 1613001756.3572578 time.time() 通常是用來作為時間戳記，例如測量程式執行時間。 In [6]: import time # 紀錄起始時間 start_time = time . time () # 撰寫程式，例如：迴圈執行 a = 0 for _ in range ( 10000000 ): a += 1 # 紀錄結束時間 end_time = time . time () # 將結束時間減去起始時間，等於執行時間 time_cost = end_time - start_time # 顯示執行時間 print ( f "Time Cost: { time_cost } seconds" ) ...
Read more

數位影像處理：最佳化處理策略之快速消除扭曲演算法

Image
最佳化處理策略之快速消除扭曲演算法 我們的論文（最佳化處理策略之快速消除扭曲演算法；A Quickly Dewarping Algorithm of Optimization Processing Strategy）被 2019 工程科技應用研討會 接受了。 會議地點在台北城市科技大學的工程學院，舉辦日期是西元二零一九年四月十二日。 最近，全景影像的應用逐漸變得越來越有用。優點是一個能夠捕捉3​​60度影像的相機。但是，360度影像是圓形影像。因此，Dewarping技術有助於圓形影像轉換為平面影像。在本研究中，不需要參考額外的信息，如攝像機參數，鏡頭參數，視頻或影像參數等。本研究提出了去扭曲演算法的優化處理策略。策略和演算法進一步改善了性能。快速去扭曲演算法能夠將圓（全景影像）快速變換為平面影像。優化處理策略能夠提高演算法的性能。用於評估性能，本研究中使用的CPU負載。比較其他Dewarping演算法的性能。結果，這項研究在性能方面優於其他Dewarping演算法。 本研究旨在研究去扭曲演算法的快速計算和低CPU負載。 例如，圖2是原始影像。 圖3顯示了本研究的基線。 圖4是研究的結果影像（全景影像）。 圖2 原始影像 圖3 顯示了本研究的基線 圖4 研究的結果影像（全景影像） 表1是比較概覽表[8]。 有六家公司的演算法和我們提出的演算法。 這項研究支持所有魚眼相機和特殊魚眼相機（Cata-Fisheye相機）。 有不同之處在於是否使用GPU。 雖然有兩家公司使用GPU進行去扭曲演算法。 但是，當應用OpenCL來使用GPU時，NUUO的去扭曲演算法的CPU負載為19％。 當源影像的分辨率為1920 x 1440時，我們提出的CPU負載為3.65％。圖5是我們提出的演算法的CPU負載圖。 表1 比較概覽表 User additional effort Generic De-warp Support vendor Calibration GPU Acceleration NUUO No need ...
Read more

寫作：波蘭文學習之旅：1-1. 波蘭文字母與發音（注音版）

Image
波蘭文學習之旅：1-1. 波蘭文字母與發音（注音版） 波蘭文字母(Alfabet Polski) 波蘭語是中歐的西斯拉夫語言，也是波蘭的官方語言。它的書面標準是波蘭語字母表，對應於拉丁字母表，有幾個附加內容。 波蘭語的人在波蘭大部分地區以統一的方式使用這種語言。 它也是繼俄語和烏克蘭語之後使用最廣泛的第三種斯拉夫語言。波蘭語的本地名稱是 polski（波蘭語），język polski（波蘭語），或者更正式的 polszczyzna（波蘭語）。 波蘭文字母、名稱、注音對照表 注意：這張表是我整理出來，經波蘭友人聽我的發音，確認聲音相似度高，才製作完成。 但發音要更道地，仍然還有不同波蘭文字母搭配後，改變發音的情況。因此這張簡表只能說是參考用，以及快速建立發音基礎。 Letter Name 注音 複合字母     A a a ㄚˋ Letter Name 注音 Ą ą ą ㄥˋ Ch, ch ce/ha ㄏㄜ˙ B b be ㄅㄜ˙ Ci, ci ce/i ㄑㄧ C c ce(ㄘㄟˋ) ㄘ Cz, cz ce/zet ㄔ Ć ć cie(ㄑㄧㄝˋ) ㄑ Dz, dz de/zet ㄗ D d de ㄉㄜ˙ Dzi, dzi de/zet/i ㄐㄧ˙ E e e ㄟˋ ...
Read more

Python 日期與時間的處理

Image
Python 日期與時間的處理 Python 日期與時間的處理 ¶ 在 Python 中，常見處理日期與時間的套件，如下： time datetime relativedelta calendar 　　 引用方式，如下：　　 import time from datetime import datetime from dateutil.relativedelta import relativedelta import calendar time.time() 函數 ¶ time.time() 可以傳回從 1970/1/1 00:00:00 算起至今的秒數： In [1]: # 匯入 time 模組 import time # 從 1970/1/1 00:00:00 至今的秒數 seconds = time . time () # 列印結果 print ( seconds ) 1613001756.3572578 time.time() 通常是用來作為時間戳記，例如測量程式執行時間。 In [6]: import time # 紀錄起始時間 start_time = time . time () # 撰寫程式，例如：迴圈執行 a = 0 for _ in range ( 10000000 ): a += 1 # 紀錄結束時間 end_time = time . time () # 將結束時間減去起始時間，等於執行時間 time_cost = end_time - start_time # 顯示執行時間 print ( f "Time Cost: { time_cost } seconds" ) ...
Read more

Visual Basic 6.0 (VB6) 程式語言案例學習 (10. 條碼列印程式)

Image
Visual Basic 6.0 (VB6) 程式語言案例學習 (10. 條碼列印程式) Visual Basic 6.0 (VB6) 程式語言案例學習 (10. 條碼列印程式) ¶ 10.1 問題 ¶ 隨著科技進步神速，條碼列印已經不再是商家專用，或者需要特殊技巧的一件事情了。透過一般的印表機搭配條碼列印程式就可以輕鬆的列印條碼貼紙，這對於普遍的使用者來說，是一件很好的事情。條碼輸入設備感應越做越好，好一點的設備，無論是正掃反掃側掃都可以判斷正確無誤，這次遇到的問題，是要替光碟資產做條碼歸檔，利用市面上隨處可見的條碼貼紙，一張A4大小的貼紙，就可輕鬆的製作條碼。 10.2 需求 ¶ 表格 10‑1 「條碼列印程式」系統目的分析表 版本：1.0　　 要做什麼 　 不要做什麼（不要做不代表不會做） 　 能做什麼 （第一格：必要項目） （第二格：次要項目） 可自行編輯要列印的資料。 可預覽列印。 可將編輯的英文及數字資料轉為條碼。 可調整字級大小。 不能做什麼（不能做代表不需要做）　 （第三格：不必要項目） （第四格：不需要項目） 可讀入Excel檔案。 可大量印製。 表格 10‑2 「條碼列印程式」系統目標分析表 版本：　 重要 　 不重要 　 優先 （重） （急） 可自行編輯要列印的資料。 可預覽列印。 可將編輯的英文及數字資料轉為條碼。 不急迫 （輕） ...
Read more

Visual Basic .Net (VB.Net) 程式語言案例學習 (06. 題庫測驗系統)

Image
Visual Basic .Net (VB.Net) 程式語言案例學習 (06. 題庫測驗系統) Visual Basic .Net (VB.Net) 程式語言案例學習 (06. 題庫測驗系統) ¶ 6.1 問題 ¶ 這是一個題庫練習的程式，分為循序練習及模擬（電腦亂數選題）練習，循序練習會依序將題庫中所有題目列出，讓受測者作答。而模擬練習則由電腦出題，抽出一百題讓受測者測驗。題型分為是非題跟選擇題，因此答題介面設計上就必須依照題型而有所變化。最後是成績顯示，顯示答對題數以及答錯題數，並計算出成績。成績計算之後便會顯示正確答案，受測者可以瀏覽所有的正確答案。 6.2 需求 ¶ 表格 6-1 「題庫測驗系統」系統目的分析表 版本：1.0　 要做什麼 　 不要做什麼（不要做不代表不會做） 　 能做什麼 （第一格：必要項目） （第二格：次要項目） 建立是非題型與選擇題型可共用的資料結構，使用MS Access 2003資料庫。　 可提供循序練習及模擬練習。 答題區可依照不同題型而提供適當的選擇。 結束練習時可瀏覽正確答案。 可以統計答錯題數及答對題數，和最後成績。 不能做什麼（不能做代表不需要做） （第三格：不必要項目） 　　 （第四格：不需要項目） 提供答案的詳解。 將資料庫送上SQL，開發成網路版本。 表格 6‑2 「題庫測驗系統」系統目標分析表 版本： 　 重要 　　　　 不重要 　　 優先 （重） （急） 建立是非題型與選擇題型可共用的資料結構，使用MS Access 2...
Read more

修復損毀的 SQLite DB 資料庫

Image
修復損毀的 SQLite DB 資料庫 修復損毀的 SQLite DB 資料庫 ¶ 當遇到 SQLite DB 資料庫損毀時，完全無法讀取資料，只見到錯誤訊息時，還有一個方法可以嘗試看看。 上圖的上半部，我們做了將壞掉資料庫匯出的動作；圖的下半部，我們將匯出的檔案匯入新的資料庫。 匯出資料庫 使用 sqlite3 {檔案名稱}，開啟壞掉的資料庫。 使用 .output tmp.sql ，在這裡 output 前面有個點，請各位要注意。這是指定資料匯出到 tmp.sql 檔案的方法。 使用 .dump 的指令才開始真正的匯出資料到 tmp.sql 檔案內，這過程要看原始資料庫大小，越大時間越長。 匯出完成 .quit 離開 sqlite3。 匯入資料庫 使用 sqlite3 {新檔案名稱}，在這裡任意建立一個新的資料庫。 使用 .read tmp.sql 讀取 tmp.sql 資料，並且匯入到 {新檔案名稱｜新資料庫}中。 匯入完成後， .quit 離開 sqlite3。 以上是個人成功的經驗，一個 5GB 的損毀資料庫，經過救援之後，變成 6GB ，但卻運作正常無誤。 如果有遇到類似的狀況，不妨試一試這個方法。 注意： 若你 dump 出來的檔案最後一行是 ROLLBACK ，請改為 COMMIT 。因為 ROLLBACK 會在你還原結束後執行，執行之後新資料庫會被清空。
Read more

用１０種程式語言做影像二值化（Image binarization）

用１０種程式語言做影像二值化（Image binarization） 用１０種程式語言做影像二值化（Image binarization） ¶ 完整原始碼下載 簡介 ¶ 有些時候，我們需要將彩色影像轉換為黑白影像，這很簡單，利用門檻值的方法就可以做到。 作法 ¶ Visual C++ 2010 ¶ // 影像的高度 for ( int iY = 0; iY DibInfo->bmiHeader.biHeight; iY++ ) { // 影像的寬度 for ( int iX = 0; iX DibInfo->bmiHeader.biWidth; iX++ ) { // 影像的索引值，因為這張影像的24 bit ，所以要乘以3 lIDXA = ( iX * 3 ) + ( iY * imageA->DibInfo->bmiHeader.biWidth * 3 ); // 取得藍色像素值 byteRGB_BA = imageA->DibArry[lIDXA+0]; // 取得綠色像素值 byteRGB_GA = imageA->DibArry[lIDXA+1]; // 取得紅色像素值 byteRGB_RA = imageA->DibArry[lIDXA+2]; // 將RGB利用YUV公式轉換Y（灰階） dobYUV_YA = (0.299 * byteRGB_RA + 0.587 * byteRGB_GA + 0.114 * byteRGB_BA); // 利用...
Read more

Visual Basic 6.0 (VB6) 程式語言案例學習 (04. 人事考勤管理系統)

Image
Visual Basic 6.0 (VB6) 程式語言案例學習 (04. 人事考勤管理系統) Visual Basic 6.0 (VB6) 程式語言案例學習 (04. 人事考勤管理系統) ¶ 4.1 問題 ¶ 這也是紙本作業流程想要電腦化的需求，每年度有四次的評鑑，前三次的評鑑是由單位主管執行，而最後一次是由單位主管評分後，交由高層會議整合，訂出最後的評鑑考績。以往的做法就是先依據每一個單位，做出許多Excel表格，然後會整起來，變成一張Excel統計表，保留起來等待到下次評鑑時，同樣的步驟繼續進行，到第四次之後，這三張統計表的成績將作為第四次評鑑的參考，甚至有些個案會參考到更久之前的成績，為求能夠審慎的評鑑。 這項工作困難點在於，人員有新進、離職、留職停薪、…等等因素，並且要收集各單位的檔案，檔案繳交時間點非常零散，整理表格時要依照人員屬性而有不同的評鑑主管，例如：甲老師是國文科召集人，因職務原故評鑑單位為教務處、學務處、總務處、諮商中心、資源中心；乙老師是美育組長，評鑑單位為教務處、總務處、資源中心。總共有三百人左右，每個人員所屬職務不同，評鑑單位也不同。而計分方式，也是依照職務屬性而有不同百分比計算，例如：甲老師是國文科召集人，因此教務處評分佔60%，其餘單位的評分是佔10%；乙老師是美育組長，教務處佔20%，總務處佔10%，資源中心佔70%。而評鑑資料處理並非專人專責，而是由人事室的成員分攤處理，這又增加了複雜度。例如：交接的時候不清楚，有可能之後處理的人員，多了重複的作業。有些時候先紀錄在紙本上，尚未登錄在Excel統計表時，也有可能造成問題。但評鑑工作還是得進行，而且要審慎的計算，因為這會影響到考績。 因此希望能夠電腦化，簡化流程，而且調閱歷史資料要十分容易，並且可以透過筆記型電腦，於會議室投影，讓高層會議整合時可以直接填寫成績。 4.2 需求 ...
Read more

解決 ValueError: If using all scalar values, you must pass an index

Image
解決 ValueError: If using all scalar values, you must pass an index 解決 ValueError: If using all scalar values, you must pass an index ¶ 這個錯誤通常出現在沒有設定索引時，想要建立一個 DataFrame。 ¶ In [2]: import pandas as pd dict1 = { 1 : "a" , 2 : "b" , 3 : "c" , 4 : "d" } df = pd . DataFrame ( dict1 ) --------------------------------------------------------------------------- ValueError Traceback (most recent call last) <ipython-input-2-68948f391692> in <module> 1 import pandas as pd 2 dict1 = { 1 : "a" , 2 : "b" , 3 : "c" , 4 : "d" } ----> 3 df = pd . DataFrame...
Read more

Visual Basic 6.0 (VB6) 程式語言案例學習 (07. 收據列印程式)

Image
Visual Basic 6.0 (VB6) 程式語言案例學習 (07. 收據列印程式) Visual Basic 6.0 (VB6) 程式語言案例學習 (07. 收據列印程式) ¶ 7.1 問題 ¶ 這是所有學校以及公司行號由來已久的問題，需要大量列印收據或者是股東會單的資料，原來的方式是使用點陣式印表機，然後列印三聯單，列印之前先將相關資料編輯成文字檔，核對正確之後，再開始列印。但問題是編輯的文字檔其實也是要依照用Excel所整理的資料整理的，這等於多做了一次工，因此需求是可以匯入原先就有的Excel檔，然後就可以列印。當然步驟流程越簡單越清楚是最好的，操作介面清楚明瞭，這是需求者的要求。 7.2 需求 ¶ 表格 7‑1 「收據列印程式」系統目的分析表 版本：1.0 　 要做什麼 　 不要做什麼（不要做不代表不會做） 　 能做什麼 　 （第一格：必要項目） 　 （第二格：次要項目） 　 要能夠直接由Excel匯入程式中。 　 建立單據人員資料管理。 要能夠列印到正確的位置。 每次列印的資料，都要保存下來，以免補單或者是需要單筆列印的時候，可以直接列印。　 要能夠大量列印。 金額的部分要能夠轉為國字大寫。 不能做什麼（不能做代表不需要做）　 （第三格：不必要項目） （第四格：不需要項目） 具有歷史查詢功能，可查詢是否列印，或列印幾次。　 能夠與學籍資料庫連線，獲得列印名單。 表格 7‑2 「收據列印程式」系統目標分析表 版本：　 重要 　　　　 ...
Read more