GIF 介紹 小組組員: 9730004 林郁維 9730006 蔣德威 9730010 郭家福 9730029 何永裕...

30
GIF 介介 介介介介9730004 介介 介介介 9730006 蔣蔣蔣 9730010 介介 介介介介 9730029 介介 介介介介 介介 9730030 蔣蔣蔣 介介 9730051 介介 介介介介
  • date post

    15-Jan-2016
  • Category

    Documents

  • view

    374
  • download

    1

Transcript of GIF 介紹 小組組員: 9730004 林郁維 9730006 蔣德威 9730010 郭家福 9730029 何永裕...

GIF 介紹

bull 小組組員 9730004 10506521050652 林郁維bull 9730006 蔣德威bull 9730010 10506521050652 郭家福1049537bull 9730029 10506521050652 何永裕1049537bull 10506521050652 9730030 陳昭宇bull 10506521050652 9730051 10506521050652 許丞翔1049537

GIF GIF(Graphics Interchange Format) 圖形交換格式是一種點陣圖圖形文件格式以 8 位色(即 256 種顏色)重現真彩色的圖像

它實際上是一種壓縮文檔採用 LZW 壓縮演算法進行編碼有效地減少了圖像文件在網路上傳輸的時間它是目前廣泛應用於網路傳輸的圖像格式之一

GIF 格式自 1987 年由 ConpuServe 公司引入後因其體積小而成像相對清晰特別適合於初期慢速的網際網路而從此大受歡迎它採用無損壓縮技術只要圖像不多於 256 色則可既減少文件的大小又保持成像的質量

技術簡介 bull GIF 主要是為數據流而設計的一種傳輸格式而不是作為文件

的存儲格式它具有順序組織形式而不是隨機組織形式

bull GIF 有五個主要部分以固定順序出現所有部分均由一個或多個區塊( block )組成每個塊由第一個位元組中的標識碼或特徵碼標識這些部分的順序為頭塊邏輯屏幕描述塊可選的「全局」色彩表塊(調色板)各圖像數據塊(或專用的塊)以及尾塊(結束碼) 下面是這些部分的內容

bull 起頭為一個區塊它識別數據流為 GIF 並指示如何解釋後面的數據所需的最早版本的 GIF 解碼程序( 87a 或 89a )

bull 邏輯程序描述塊定義了所有後面圖像的圖像平面的大小縱橫尺寸比以及色彩深度(它類似於產生圖像的監視器屏幕)它還指明後面跟隨的是否為「全局」色彩表

bull 全局色彩表(如果存在)構成一個 24 位 RGB 元組的調色板(每種底色為一個位元組)如果後面的像沒有其自己的「局部」調色板那麼全局色表就是預設調色板

bull 後續數據作為「圖形」或「專用」塊出現圖形塊典型地包含一個或多個點陣圖圖像也可能是覆蓋的文本專用塊或者包含一個專用應用程序碼或者包含一句不可列印的註釋

bull 最後的尾塊只是值為 3B (十六進位)的一個位元組表示數據流已結束

優點 缺點 1優秀的壓縮演算法使 | 由於採用了 8位壓縮 其在一定程度上保證 | 最多只能處理 256種顏色 圖像質量的同時將體 | 故不宜應用於真彩圖積變得很小 | 像2可插入多幀從而實 |現動畫效果 |3可設置透明色以產生 |對象浮現於背景之上 | 的效果 |

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF GIF(Graphics Interchange Format) 圖形交換格式是一種點陣圖圖形文件格式以 8 位色(即 256 種顏色)重現真彩色的圖像

它實際上是一種壓縮文檔採用 LZW 壓縮演算法進行編碼有效地減少了圖像文件在網路上傳輸的時間它是目前廣泛應用於網路傳輸的圖像格式之一

GIF 格式自 1987 年由 ConpuServe 公司引入後因其體積小而成像相對清晰特別適合於初期慢速的網際網路而從此大受歡迎它採用無損壓縮技術只要圖像不多於 256 色則可既減少文件的大小又保持成像的質量

技術簡介 bull GIF 主要是為數據流而設計的一種傳輸格式而不是作為文件

的存儲格式它具有順序組織形式而不是隨機組織形式

bull GIF 有五個主要部分以固定順序出現所有部分均由一個或多個區塊( block )組成每個塊由第一個位元組中的標識碼或特徵碼標識這些部分的順序為頭塊邏輯屏幕描述塊可選的「全局」色彩表塊(調色板)各圖像數據塊(或專用的塊)以及尾塊(結束碼) 下面是這些部分的內容

bull 起頭為一個區塊它識別數據流為 GIF 並指示如何解釋後面的數據所需的最早版本的 GIF 解碼程序( 87a 或 89a )

bull 邏輯程序描述塊定義了所有後面圖像的圖像平面的大小縱橫尺寸比以及色彩深度(它類似於產生圖像的監視器屏幕)它還指明後面跟隨的是否為「全局」色彩表

bull 全局色彩表(如果存在)構成一個 24 位 RGB 元組的調色板(每種底色為一個位元組)如果後面的像沒有其自己的「局部」調色板那麼全局色表就是預設調色板

bull 後續數據作為「圖形」或「專用」塊出現圖形塊典型地包含一個或多個點陣圖圖像也可能是覆蓋的文本專用塊或者包含一個專用應用程序碼或者包含一句不可列印的註釋

bull 最後的尾塊只是值為 3B (十六進位)的一個位元組表示數據流已結束

優點 缺點 1優秀的壓縮演算法使 | 由於採用了 8位壓縮 其在一定程度上保證 | 最多只能處理 256種顏色 圖像質量的同時將體 | 故不宜應用於真彩圖積變得很小 | 像2可插入多幀從而實 |現動畫效果 |3可設置透明色以產生 |對象浮現於背景之上 | 的效果 |

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

技術簡介 bull GIF 主要是為數據流而設計的一種傳輸格式而不是作為文件

的存儲格式它具有順序組織形式而不是隨機組織形式

bull GIF 有五個主要部分以固定順序出現所有部分均由一個或多個區塊( block )組成每個塊由第一個位元組中的標識碼或特徵碼標識這些部分的順序為頭塊邏輯屏幕描述塊可選的「全局」色彩表塊(調色板)各圖像數據塊(或專用的塊)以及尾塊(結束碼) 下面是這些部分的內容

bull 起頭為一個區塊它識別數據流為 GIF 並指示如何解釋後面的數據所需的最早版本的 GIF 解碼程序( 87a 或 89a )

bull 邏輯程序描述塊定義了所有後面圖像的圖像平面的大小縱橫尺寸比以及色彩深度(它類似於產生圖像的監視器屏幕)它還指明後面跟隨的是否為「全局」色彩表

bull 全局色彩表(如果存在)構成一個 24 位 RGB 元組的調色板(每種底色為一個位元組)如果後面的像沒有其自己的「局部」調色板那麼全局色表就是預設調色板

bull 後續數據作為「圖形」或「專用」塊出現圖形塊典型地包含一個或多個點陣圖圖像也可能是覆蓋的文本專用塊或者包含一個專用應用程序碼或者包含一句不可列印的註釋

bull 最後的尾塊只是值為 3B (十六進位)的一個位元組表示數據流已結束

優點 缺點 1優秀的壓縮演算法使 | 由於採用了 8位壓縮 其在一定程度上保證 | 最多只能處理 256種顏色 圖像質量的同時將體 | 故不宜應用於真彩圖積變得很小 | 像2可插入多幀從而實 |現動畫效果 |3可設置透明色以產生 |對象浮現於背景之上 | 的效果 |

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull 全局色彩表(如果存在)構成一個 24 位 RGB 元組的調色板(每種底色為一個位元組)如果後面的像沒有其自己的「局部」調色板那麼全局色表就是預設調色板

bull 後續數據作為「圖形」或「專用」塊出現圖形塊典型地包含一個或多個點陣圖圖像也可能是覆蓋的文本專用塊或者包含一個專用應用程序碼或者包含一句不可列印的註釋

bull 最後的尾塊只是值為 3B (十六進位)的一個位元組表示數據流已結束

優點 缺點 1優秀的壓縮演算法使 | 由於採用了 8位壓縮 其在一定程度上保證 | 最多只能處理 256種顏色 圖像質量的同時將體 | 故不宜應用於真彩圖積變得很小 | 像2可插入多幀從而實 |現動畫效果 |3可設置透明色以產生 |對象浮現於背景之上 | 的效果 |

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

優點 缺點 1優秀的壓縮演算法使 | 由於採用了 8位壓縮 其在一定程度上保證 | 最多只能處理 256種顏色 圖像質量的同時將體 | 故不宜應用於真彩圖積變得很小 | 像2可插入多幀從而實 |現動畫效果 |3可設置透明色以產生 |對象浮現於背景之上 | 的效果 |

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF圖檔格式bull 目前使用來製作動畫的 GIF格式一般都是以 GIF89a格式居

多少數是 GIF87a格式讀者應可猜想出 GIF89a的前身就 是 GIF87a只是 GIF89a 擴充了 GIF87a的功能 GIF的影像圖檔格式是一種被壓縮過的圖檔格式所以 GIF格式的影像圖檔 會遠比其它的影像圖檔格式 (如 bmp)所占的檔案小得多像是同一張大小的影像 若分別以 GIF與 BMP不同的檔案格式來儲存則 BMP檔的大小可以達到GIF檔的幾 十倍之大當然BMP檔其對影像的失真會較小相對的 GIF檔雖然是可省去不少 檔案空間但其色彩失真的現象往往比 BMP檔還要嚴重一些

bull GIF的影像圖檔格式是採用一種叫作 LZW的壓縮演算法 (compression algorithm)也就是說當一個影像或圖檔在被存檔時若是選擇存成 GIF的檔案格式時則該影像或圖檔在被存到硬碟之前會先以 LZW的壓縮演算法將其存成 GIF的檔案格式

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF圖檔格式的顏色限制bull 以 GIF89a 格式來儲存圖檔其檔案大小會比其它的格式來的小除了先前提過是因為 GIF89a 是有經過壓縮的處理之外另一原因是 GIF 的圖檔格式最多只能允許有 256種顏色但一般其它的圖檔格式甚至允許上百萬種的顏色當然圖檔格式中允許越多的顏色其檔案會越大也就是說一個 GIF 的圖檔 ( 或影像 ) 中最多只能有 256 種不同的顏色若是某個圖檔它是超過 256 種顏色則繪圖軟體在存這個圖檔成 GIF 格式時會自動將顏色轉換為 256 種顏色所以圖案的色澤會有失真的現象在 GIF89a 的檔案格式中其允許顏色種類的範圍是最少 2 種最多不可超過 256 種顏色並且圖檔中顏色種類越少其檔案的大小會越小

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF89a格式製作動畫優點bull 在 Home Page的設計中您不需要使用到複雜的 Java

或其它 CGI程式只要使用 GIF Construction Set或 Ulead GIF Animator 軟體就可以製作動畫

bull Internet上的瀏覽器如 Netscape或 Explorer均可以直接解讀GIF89a的格式也就是說可以看到GIF89a的動畫而不須加掛另外的軟體來解讀GIF89a格式的圖檔

bull 因有壓縮的功能製作出的動畫其檔案會較小可減少網路傳送的時間

bull 可設定動畫的背景顏色是透明的

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull 可設定圖檔以交錯的方式來顯示

bull 提供不同顏色的色板如色板可以是 2 4 8 1632 64 128或 256種顏色可對圖檔大小提供最佳化的選擇

bull 可適用在不同作業系統的平台上如Win31Win95Win NT UnixMAC Sun linux Irix 等等

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF 壓縮比較bull 這裡的自然照片泛指一般生活環境下所拍攝的人事物照片這些圖片的特點是圖案及色彩變化都不規則顏色數多但不常出現亮度或顏色對比非常強烈的情況

bull GIFGIF 因為無法自由調整壓縮比率大體上只能以減少色數來調整檔案大小原圖包含 26328 色減至 34 色後才把檔案減少至 10K 除了灰色雲的層次較差外大致上品質還能接受不過想把檔案再縮小一半顏色必須再減少至 9 色此時畫質已經大受影響了 34 色 10K Byte 9 色 5K Byte

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

JPEG壓縮比較

bull JPEG非常適合用來壓色彩圖案變化不規則的圖案因為在這種情況下壓縮所造成的失真也是不規則的即使兩張圖實際上已經有不少的變化人眼還是看不太出來因此 10K與 5K 的畫質差異不大甚至與原稿都相去不遠下方的壓縮品質為壓縮的參數 100 為最佳畫質 0 為最大壓縮

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF與其他格式比較

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

GIF 檔

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

影片轉GIF 製作

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

以 VB 程式開啟 GIF 檔

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull VB 程式bull 作者網站 httpvbexuhomenetbull 作者電郵 dictbenehotmailcombull bull Option Explicitbull Private Declare Function ShellExecute Lib shell32dll Alias ShellEx

ecuteA (ByVal hwnd As Long ByVal lpOperation As String ByVal lpFile As String ByVal lpParameters As String ByVal lpDirectory As String ByVal nShowCmd As Long) As Long 這行大概是瀏覽資料夾的函數

bull Private Sub Command1_Click(Index As Integer) bull 按下按鈕時的判斷 bull On Error GoTo Errh 開檔錯誤就到下面的 Errh bull Dim MyPath As String 開啟檔案 bull Select Case Index 選擇按鈕 bull Case 0bull ShellExecute Mehwnd vbNullString Dir1Path amp amp File1Li

st(File1ListIndex) 1 執行清單上顯示的檔案

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull

bull Case 1bull If MsgBox(你確定要刪除嗎 vbYesNo + vbQuestion 檔案處理工具 ) = vbYes Then Kill Dir1Path amp amp File1List(File1ListIndex)

bull 出現訊息盒子 選擇刪除或不刪除檔案 bull Case 2bull If MsgBox(你確定要製作資料夾嗎 vbYesNo + vbQuestio

n 檔案處理工具 ) = vbYes Thenbull MyPath = InputBox(資料夾名稱 檔案處理工具 )bull If Left(Dir1Path 1) = Thenbull MkDir Dir1Path amp MyPathbull Elsebull MkDir Dir1Path amp amp MyPathbull End Ifbull End Ifbull 出現訊息盒子詢問是否建立資料夾接著輸入資料夾檔名就可

在選單上看見新增的資料夾 bull

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull Case 3bull If MsgBox(你確定要刪除資料夾嗎 vbYesNo

+ vbQuestion 檔案處理工具 ) = vbYes Then RmDir Dir1Path

bull 出現訊息盒子 選擇刪除或不刪除資料夾 bull Case 4bull frmMainShowbull Unload Mebull End Selectbull Command2_Clickbull Exit Subbull 重新排列檔名

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

bull Errhbull MsgBox ErrDescription vbCritical ErrNumber

出現訊息盒子 開檔出現錯誤 bull End Subbull Private Sub Command2_Click()bull Drive1Refreshbull Dir1Refreshbull File1Refreshbull End Subbull Private Sub Command3_Click()bull MsgBox 檔案處理工具 v10 amp vbCrLf amp 作者德本立 amp vbCr

Lf amp 本軟件為 httpvbexuhomenet 的範例如果轉載請先通知

bull End Subbull Private Sub Dir1_Change()bull File1Path = Dir1Path   取得路徑 bull End Subbull Private Sub Drive1_Change()bull Dir1Path = Drive1Drive   取得路徑 bull End Sub

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30

心得bull 這次的小組報告我們知道網路上 GIF 格式普遍

適用於圖表按鈕等等只需少量顏色的圖像以及 GIF 的運作流程等等讓我們更加的了解 GIF 也多學了 Ulead GIF Animator 5 這個軟體以及ㄧ些 vb 的基本概念至少經過這次的報告已經知道 GIF 的應用與特性

  • Slide 1
  • Slide 2
  • Slide 3
  • Slide 4
  • Slide 5
  • Slide 6
  • Slide 7
  • Slide 8
  • Slide 9
  • Slide 10
  • Slide 11
  • Slide 12
  • Slide 13
  • Slide 14
  • Slide 15
  • Slide 16
  • Slide 17
  • Slide 18
  • Slide 19
  • Slide 20
  • Slide 21
  • Slide 22
  • Slide 23
  • Slide 24
  • Slide 25
  • Slide 26
  • Slide 27
  • Slide 28
  • Slide 29
  • Slide 30