松岡VB2010-ch03(10943 KB )

Download Report

Transcript 松岡VB2010-ch03(10943 KB )

第三章
輸出介面設計
-表單上輸出訊息的常用控制項
本章投影片僅供本書上課教師使用,非經同意請勿拷貝或轉載
3-1 表單物件






Window系統中,視窗應用程式都透過視窗來展現。
在VB程式設計,視窗外觀和樣式設定是由
 表單物件來設定。
表單提供屬性給予不同屬性値
 製作出不同視窗外貌
如BackColor屬性用來設定表單的背景色
 可設為灰色或白色…
 背景色不同產生不同視窗外觀
表單和控制項都是物件
每個物件都擁有屬於自己本身的屬性,
有些屬性可能只有該物件所特有
有些屬性可能在不同物件中亦俱有。
在屬性視窗中,以分類方式來設定表單的外觀屬性
分
類
鈕
閉
合
鈕
展
開
鈕
屬性名稱按「外觀」、「行為」、「其他」…等九大類型來
分類排列。
一、外觀類型的屬性

有關表單外觀屬性共11個屬性

常用外觀屬性:
- BackColor (背景色)
- BackgroudImage (背景圖)
- Cursor (遊標)
- Text (標題文字)
如何修改外觀類型的屬性內容
Step1
Step2
建立新增專案,命名為「Style1」。
選取表單,進入屬性視窗修改表單的Text(標題文字)
屬性值:
Step3 設定表單的 BackColor 背景色屬性
上述過程可用程式表達成 Me.BackColor =Color.Yellow
Step4 設定表單的 BackgroudImage 背景圖屬性:
選取資源對話方塊
程式執行階段使用「C:\vb2010\ch03\Chrysan.jpg」圖檔作表單的背景
Me.BackgroundImage =Image.FromFile(“C:\vb2010\ch03\Chrysan.jpg”)
Step5 設定表單的 Cursor 滑鼠指標屬性
1. 點按下拉鈕
2. 在滑鼠指標清單點選 AppStarting
3. 按F5執行鍵,將滑鼠指標移到表單 內
,觀察滑鼠指標形狀
4. 按關閉鈕
5. 將表單的Cursor屬性值還原成預設值
Step6 設定表單 FormBorderStyle 邊界樣式屬性
1 點按下拉鈕
2 點選 Fixed3D
3 按F5執行鍵,觀察視窗邊界,呈現
固定立體狀,無法拖曳縮放
4 按關閉鈕,返回表單編輯模式
不同 FormBorderStyle 的視窗邊界樣式,
表單物件較常用的外觀類型屬性彙整如下:
二、視窗樣式的屬性

常用視窗樣式屬性有:
- ControlBox (控制盒)
- HelpButton (求助鈕)
- Icon (表單圖示)
- MaximizeBox (最大化鈕)
- MinimizeBox (最小化鈕)
- ShowInTaskbar (顯示在工作列)
如何修改視窗樣式的屬性內容
Step1 建立新增專案,命名為「Style2」。
Step2 選取表單,進入屬性視窗將表單的Text(標題文字)改
為視窗樣式。
Step3 點按ControlBox屬性,預設值為True。
按F5執行,點按左上角視窗圖示,拉出控制盒選單。
按關閉鈕
Step3 點按ControlBox屬性,將屬性值改為False。
按F5執行,執行視窗左上角沒有視窗圖示,亦沒有控
制盒選單。
點按工具列的停止偵錯圖示鈕 關閉執行視窗。
將ControlBox屬性改回True。
無控制盒
Step4 設定表單的 Icon圖示屬性值
點按Icon屬性的對話方塊鈕。
出現開啟舊檔對話方塊,到書附光碟[icons/Misc]資料夾。
選取『dbs.ico』圖示檔。
點按『開啟舊檔』鈕。
更改Icons屬性後,表單圖示即改變。
Step5 設定MaximizeBox 最大化鈕和MinimizeBox最小化鈕
 將表單 MaximizeBox的屬性值由預設值『True』變
更為『False』結果最大化鈕呈無效狀態;最小化鈕
呈有效狀態。
 將表單的 MaximizeBox 的屬性值還原為『True』
MinimizeBox的屬性值變更為『False』
 最小化鈕呈無效狀態;最大化鈕呈有效狀態。
 將MaximizeBox、MinimizeBox 屬性值皆設為
『False』,結果:
Step6 設定表單的HelpButton 求助鈕屬性值
 將表單的HelpButton的屬性值 由 False 預設值
 變更 True:
[註]當 MinimizeBox =False 且 MaximizeBox =False
 求助鈕才會顯現。
 將HelpButton的屬性值還原成『False』,再將
MaximizeBox 、MinimizeBox屬性值還原成True。
Step7 設定表單的ShowInTaskbar顯示在工作列屬性
先按F5鍵執行程式。再將視窗樣式表單縮小至工作列。
該圖像會顯示在工作列。
在縮小圖示上按滑鼠右鍵,點選快顯功能表中的關閉視
窗選項,回到編輯模式。
將表單的ShowInTaskbar屬性值由預設值「True」改
為『False』。
按F5鍵執行程式。再將視窗樣式表單縮小,此時,該圖
像緊呈現縮小狀並不會顯示在工作列。
將滑鼠指標移到縮小圖示上,可以拖曳移動該圖像。
按縮小圖示上之關閉紐,回到編輯模式。
三、配置類型的屬性

常用配置類型的屬性有
- Location 表單位置
- Size 表單大小
- StartPosition 起始化位置
- WindowState 表單狀態等屬性:
如何修改配置類型的屬性內容
Step1 建立新增專案,命名為「Style3」。
Step2 選取表單,進入屬性視窗將表單的Text(標題文字)改
為配置屬性。
Step3 設定表單的Size表單大小屬性
選取表單,點按size屬性名稱前的展開紐,展開表單寬度和表
單高度兩個子屬性名稱。
拖曳表單物件右側、下方或右下角的小方塊改變表單大小,觀察
Size、Width、Height屬性值變化。
Step4 設定表單的 StartPosition 表單第一次出現的位置屬性值
 按StartPosition屬性值欄的下拉紐,點選
CenterScreen選項。
 按F5鍵執行程式,程式視窗會出現在螢幕中央位置。
 點按程式視窗關閉鈕。
Step5 設定表單的 Location 表單位置屬性
 將StartPosition屬性值改設為Manual選項。
 將Location表單位置屬性值由預設『0,0』改為
『100,200』。
 按F5鍵執行,程式視窗出現在螢幕左上角向右
100點、向下200點位置。
 點按關閉鈕來關閉程式視窗。
Step6 設定表單的WindowState 表單狀態屬性
 將 WindowState 屬性值設為『Maximized』
按
鍵執行,視窗最大化佔滿整個螢幕。
 點按視窗右上方的
關閉鈕關閉視窗。
 將 WindowState 屬性值改設為『Minimized』
按
鍵執行,視窗縮至最小置於工作列。
 在工作列
點選
縮小圖示上按一下滑鼠右鍵,
選項,結束視窗。
表單物件常用的配置類型屬性彙整:
3-2 標籤控制項
一、控制項的Text 屬性與 Name 屬性




每個物件都有 Name 和 Text 屬性
 Name 名稱屬性用來在程式中叫用
 Text關聯文字或稱標圖文字屬性是顯示在控制項上
面的文字。
表單上建立的控制項,Name和Text屬性的預設名稱都
一樣
如表單物件預設名稱為 Form1、Form2…,
標籤控制項預設名稱為 Label1、Label2…,
文字方塊控制項預設名稱為TextBox1、TextBox2…,
按鈕控制項預設名稱為Button1、Button2…。
物件的Name 名稱屬性的預設名稱在程式中除可繼續
使用外,也可自行命名以提高程式可讀性。
建議物件命名在名稱前加前置字串。如:
 使用標籤控制項顯示單價,lbl當標籤控制項Name名
稱屬性的前置字串標籤控制項顯示單價由預設
Label1 更名lblPrice
 使用按鈕控制項顯示確認, btn當按鈕控制項Name
名稱屬性的前置字串按鈕控制項顯示確認由預設
Button1更名為btnOK
 使用文字方塊控制項顯示數量, txt當文字方塊控制
項Name名稱屬性的前置字串文字方塊控制項顯示數
量,由預設TextBox1更名為txtQty
按照下面操作步驟練習如何設定標籤控制項常用的屬性:
Step1 新增專案,專案名稱命名「Label1」。
Step2 點選表單,點選Text屬性將標題欄關聯文字改
為『標籤屬性』。
Step3 在表單內建立一個標籤(Label1)控制項。
Step4 改變標籤控制項的Name (物件名稱)之屬性值。
i.e.將Name的屬性值清空,重新輸入lblShow。
結果標籤控制項物件名稱並未改變,像人改名
其外觀並無差異。
Step5 改變標籤控制項的Text(關聯文字)之屬性值。由
Label1改為我是lblShow。此時標籤控制項物
件名稱改為我是lblShow。如下圖
操作請參閱本書 P3-18至P 3-20頁
下圖為修改標籤控制項上面Text(關聯文字)的前後比較:
二、標籤控制項常用的屬性
Step1 新增專案,專案名稱命名「Label2」。
Step2 在表單內建立一個標籤(Label1)控制項。
Step3 設定標籤控制項的Name (物件名稱) -改為lblWise
與Text (標題文字)的屬性值-改為智慧是給低心學習
的人。
Step4 設定標籤控制項的Font 字型屬性值。
按一下Font屬性名稱前的展開鈕使變成閉合鈕,以
出現第二層的Name、Size、Unit…等屬性名稱。
將字型(Name)改為標楷體、大小(Size)改為11、
斜體(Italic)屬性值設為『True』。
結果lblWise標籤控制項的顯示文字如P3-22。
二、標籤控制項常用的屬性
Step5 設定標籤控制項的AutoSize 自動調整大小屬性值。
因AutoSize屬性預設值為True,所以lblWise標籤
控制項的尺寸大小能自動縮放。
拖曳標籤控制項左上角的小方塊,結果只能移動而
無法手動縮放。
將AutoSize屬性值改為False,結果可以手動縮放。
Step6 設定標籤控制項的BorderStyle 邊框屬性值。
標籤控制項的BorderStyle邊框屬性預設值為
None(無框線),所以不會顯示標籤控制項的框線。
可將BorderStyle邊框屬性值改為FixedSingle(單線
固定),如P3-23頁圖示。
亦可將BorderStyle邊框屬性值改為Fixed3D(立體
固定),如P3-23頁圖示。
程式碼 lblWise.BorderStyle = BorderStyle.Fixed3D
二、標籤控制項常用的屬性
Step7 設定標籤控制項的TextAlign對齊方式屬性值。
將標籤控制項的Text屬性值改為『智慧』,並將控制
項的尺寸拉大一些。
將TextAlign屬性的每一個屬性值分別設定一次,觀
察標籤控制項內顯示文字的不同對齊方式。如下圖
程式執行階段,如要設成右上角顯示,程式碼為
lblWise.TextAlign = ContentAlignment.TopRight
以上步驟操作請參閱本書 P3-21至P 3-24頁
標籤控制項較常用的外觀類型屬性:
3-3 VB 2010的基本敘述
一、Rem 敘述
使用時機
在程式中的敘述需做說明時,可用此敘述
 好處
方便日後程式的閱讀和修改。
 程式執行中,碰到此敘述不會執行自動跳
過。

 Rem是Remark的縮寫,屬不可執行敘述。
 Rem可用單引號「’」來代替
寫法:Rem 加法程式 或 ’ 加法程式
 註解不一定要在敘述最前面,也可在敘述的最後面加上
單引號「’」
total = total + income ’ total是總收入
單引號後的文字說明被視為註解不予執行。
 Rem 除註解程式碼外,在程式除錯時
 將懷疑有錯的敘述標成註解,然後重寫程式碼來做比
較。
二、End 敘述
 關閉程式中所有已開啟的檔案、表單,並清除所有
的變數。
 可放在程式任意位置終止程式執行,通常放在結束
鈕或功能表 [檔案(F)/結束(X)] 選項的Click事件程序
 整合環境下啟動未經編譯原始程式,執行 End 敘述,
會終止程式的執行回VB整合開發環境。
 在Windows作業環境下,啟動已編譯過可執行檔
程式,當執行End敘述時,會關閉應用程式所開啟
的表單(視窗)結束程式執行。
三、vbNewLine 和 vbCrLf 常數
為強迫換行字元常數,兩者用法相同。
 當標籤控制項或文字方塊控制項設為多行顯示
顯示文字長度超過控制項寬度時,文字會自動
換行。
 若要在一行中間強迫換行,分成兩個段落,可
透過 vbNewLine 和 vbCrLf 完成。

若希望在 lblWise 標籤控制項內,將『智慧』
和『是給低心學習的人』用兩行來顯示。
 寫法:

Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
lblWise.Text = "智慧" & vbCrLf & "是給低心學習的人"
End Sub
四、Font屬性
如何在程式執行中改變文字大小、顏色。
 語法:

在 lblShow 標籤控制項內,文字字體大小設為15,標楷
體、斜體顯示。寫法:
lblWise.Font = New Font("標楷體", 15, FontStyle.Italic)

五、Color設定顏色
lblWise.BackColor = Color.Blue
六、Color.FromArgb(R, G, B) 方法

Color 還可呼叫 Color 的 FromArgb方法來調配
顏色值
 表單背景色調配成紫色寫法:
Me.BackColor = Color.FromArgb(255, 0, 255)
 將表單背景色調配成白色寫法:
Me.BackColor = Color.FromArgb(255, 255, 255)
3-4 表單物件常用的事件
事件(Event)是物件(表單或控制項)傳送訊息給應用程式
,告知有事情要處理,我們就將傳送訊息的動作稱為
「觸動事件」。至於觸動的事件要處理什麼事情,就決
定於撰寫在事件處理程序裡的程式碼稱為「事件處理程
序」。命名方式如下:
例如:物件名稱為按鈕控制項,其Click(按一下)事件的
事件處理程序為 Sub btnOk_Click
表單物件常見有Load、Activated、Click、DoubleClick
四個事件。
1. Load事件
 視窗應用程式開始執行,先載入表單
 系統就會呼叫該表單物件的Load事件。
 Load 事件是表單載入後最早被觸動的事件
 優先權最高的事件且只執行一次。
 常在表單Load事件程序中
 設定變數、陣列或物件屬性的初值。
 設定 score = 0,即預設score變數初值為0
2. Activated 事件

程式開始執行時
 最先被執行是 Load事件 (只執行一次)
 接著執行表單Activated事件(執行可能不止
一次)。
 當程式視窗成為「作用視窗」時觸動該表單
的 Activated 事件。

表單開啟為作用視窗有下列三種:
 當程式執行時,表單第一次被載入,
先執行 Load 事件再執行 Activated事件。
 當視窗(表單)被其他視窗遮住,用滑鼠點選
視窗置於其他視窗最上層,此時該視窗
(表單)成為作用視窗,則表單的 Activated
事件被觸動。
 若視窗(表單)縮小至工作列再開啟時,該
視窗被放在桌面的最上層,此時該視窗
(表單)成為作用視窗。
3. Click事件
當程式執行時,在表單內沒放控制項的地方,
按滑鼠左鍵時會觸動該表單的 Click事件。
4. DoubleClick事件
當程式執行時,在表單內沒放置控制項的地方,
快按滑鼠左鍵兩下時,會觸動該表單的
DoubleClick事件。
注意,執行DoubleClick事件前,Click事件程
序會先被觸動。
Step1 新增專案
專案名稱命名「Event1」。將表單標題文字設為
「表單事件」。
表單內建立一個標籤控制項,稱為「lblShow」。
各物件屬性如下:
預設物件名稱
Name
Text
Font/Size
BorderStyle
Form1
Form1
表單事件
11
---
Label1
lblShow
Label1
11
FixedSingle
Step2 編輯表單物件的Form1_Load事件處理程序:
在表單空白處快按兩下,進入Form1_Load事件處
理程序的編碼窗格。
在Form1_Load事件處理程序內輸入下列程式碼
按F5鍵執行程式,程式視窗內標籤控制項顯示:
目前所觸動的是:
Form_Load事件
點按關閉鈕,關閉程式視窗。
Step3 編輯表單物件的Form1_Activated事件處理程序:
按方案總管的檢視程式碼圖示鈕,切換到程式編碼
在編碼窗格中,先在左窗格選取「 (Form1事件) 」
,再到右窗格選取「 (Activated) 」事件。 進入
Form1_ Activated事件處理程序的編碼窗格。
在Form1_ Activated事件處理程序內輸入程式碼
按F5鍵執行程式,程式視窗內標籤控制項顯示:
目前所觸動的是:
Form_Activated事件
點按關閉鈕,關閉程式視窗。
Step4 修改程式碼同時顯示Form1_Load與
Form1_Activated事件處理程序的字串內容:
修改Form1_Load事件處理程序,在第二行敘述後
增加『&vbNewLine』,程式碼如下:
再修改Form1_ Activated事件處理程序,將第二行
敘述的「=」更改為「+=」合併字串,程式碼如下:
Step4
按F5鍵執行程式,程式視窗內標籤控制項顯示:
目前所觸動的是:
Form_Load事件
目前所觸動的是:
Form_Activated事件
點按關閉鈕,關閉程式視窗。
操作步驟
參閱本書 P3-31至P3-34 頁
13
Step1 新增專案
 專案名稱設為 Event2,Text屬性設為『字型格式』。
 表單內建立一個標籤控制項,Name屬性設為『lblShow』
 將 lblShow 標籤控制項的 BorderStyle 屬性值設為
FixedSingle,AutoSize 屬性值設為 False,Font / Size
屬性值設為12,TextAlign 屬性值設為MiddleCenter。
 適當縮放表單及 lblShow 標籤控制項的尺寸:
預設物件名稱
Name
Text
BorderStyle
AutoSize
Font/Size
TextAlign
Form1
Form1
字型格式
---
---
12
---
Label1
lblShow
Label1
FixedSingle
False
12
MiddleCenter
Step2 編輯表單物件的Form1_Click事件處理程序:

進入Form1_Click事件處理程序內輸入程式碼如下
設定 lblShow 標籤控制項:
 背景色呈黃色 / 前景色呈藍色
 顯示「背景色黃色 前景色藍色」
 文字格式為標楷體/大小13/樣式斜體
‘背景色為黃色
‘前景色為藍色
‘顯示文字格式

F5
執
行
背景色黃色
前景色藍色

關
閉
Step 3 編輯表單的 Form1_DoubleClick事件程序
進入Form1_DoubleClick事件處理程序內輸入程式碼
設計使 lblShow標籤控制項
背景白色 / 前景紅色
 顯示文字「背景色白色 前景色紅色」
 文字格式新細明體 /大小12 / 樣式粗體


F5
執
行
關閉

3-5 按鈕控制項
一、按鈕控制項常用的屬性
按鈕控制項中比較會用到的屬性,如:Text(標
題文字)、Enabled(有效)、TabIndex(Tab鍵次
序)、TabStop(Tab鍵停駐)、Visible(顯現)。而
按鈕的事件中,最常用到的是Click事件。
二、控制項的 Enabled 屬性與 Visible 屬性

Enabled 屬性
是設定控制項在程式執行階段時是否有功能。

以按鈕控制項為例
 Enabled = True 表按鈕有效(允許被按下);
 Enabled = False表按鈕失效(按鈕上文字呈
浮水印狀)。

若要設定btnOk(i.e.按鈕控制項的name)在程式
執行時失效,寫法:
btnOK.Enabled = False

Visible屬性
是設定程式執行時是否能顯現。

Visible = True 表示可顯現
Visible = False 表示不顯現。

在程式編輯模式,要設定 btnOk 按鈕控制項在
程式執行時不能顯現,寫法:
btnOK.Visible = False
豬
大
Step1 建立表單
專案名稱命名為『buttonEx』。
在表單內,建立五個按鈕控制項與一個標籤控制項,
如下圖所示:
Step2 請按照下表來設定各物件的屬性:
btn1
Step3 編輯各事件處理程序的程式碼
' FileName : buttonEx.sln
01 Private Sub btnEnd_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnEnd.Click
02
End
‘隨時可按結束鈕,結束執行
03 End Sub
04 ' ----------------------------------------------------------------------------------05 Private Sub btn1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btn1.Click
06
btn1.Text = "大野狼"
‘btn1按鈕上的文字改成大野狼
07
btn1.Enabled = False
‘btn1按鈕功能失效
08
lblMsg.Text = “小心大野狼!" ‘lblMsg標籤顯示該" "字串
09 End Sub
10 ' ----------------------------------------------------------------------------------11 Private Sub btn2_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btn2.Click
12
btn2.Text = "大野狼"
13
btn2.Enabled = False
14
lblMsg.Text = "小心大野狼!"
15 End Sub
17 Private Sub btn3_Click(ByVal sender As System.Object, ByVal e _
As System.EventArgs) Handles btn3.Click
18
btn3.Text = "豬小弟"
‘btn3按鈕顯示豬小弟
19
btn3.Enabled = False
‘btn3按鈕功能失效
20
btn1.Visible = False
‘btn1按鈕失不顯現
21
btn2.Visible = False
‘btn2按鈕失不顯現
22
btn4.Visible = False
‘btn4按鈕失不顯現
23
lblMsg.Text = "來烤小乳豬!"
‘lblMsg標籤顯示該"
"字串
24 End Sub
25 ' --------------------------------------------------------------------------------------
26 Private Sub btn4_Click(ByVal sender As System.Object, ByVal e _
As System.EventArgs) Handles btn4.Click
27
btn4.Text = "大野狼"
28
btn4.Enabled = False
29
lblMsg.Text = "小心大野狼!"
30 End Sub
Step4
按F5鍵執行程式,再按鍵盤Tab鍵觀察及測試各按鈕
3-6 超連結標籤控制項
一、超連結標籤控制項常用的屬性

超連結標籤(LinkLabel)控制項
 具有超連結功能
 可在表單上製作文字超連結到指定的網站去
瀏覽網頁
 或到自己電腦內去開啟檔案。
 其他功能與標籤控制項使用上大同小異。

超連結標籤控制項屬性除擁有標籤控制項的屬
性外,還擁有下列標籤控制項所沒的屬性
二、超連結標籤控制項的 LinkClicked事件

超連結標籤控制項可連結到一個執行檔、一個網址、
Email信箱,連結指令寫在 LinkClicked 事件程序內,
超連結方法:
1. 超連結到Windows所提供的「小畫家」執行檔
Process.Start("C:\WINDOWS\SYSTEM32\mspaint.exe")
2. 超連結到搜索引擎Google網站
Process.Start("www.google.com.tw")
3. 超連結到指定的E-Mail信箱
Process.Start("mailto: [email protected]")
4. 超連結到上一範例buttonEx「抓小豬」的執行檔
Process.Start("..\..\..\buttonEx\bin\debug\buttonEx.exe")
‘執行時標籤不加底線、標示為棕色已瀏覽
‘執行時只有連絡字樣有功能,執行後全功能消失
點按時標籤
變 紅 色
超連結標籤
改 為 綠 色
Step1 建立表單
專案名稱命名為『linkEx』。
在表單內建立四個超連結標籤控制項,如下圖所示:
Step2 請按照下表來設定各物件的屬性:
Step3 編輯Form1_Load事件處理程序的程式碼
01 Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
02
lnklbl1.LinkColor = Color.Green
03
lnklbl2.LinkColor = Color.Green
lnklbl3.LinkColor = Color.Green
lnklbl4.LinkColor = Color.Green
04
05
06 End Sub
‘設定超連結標籤為綠色
Step4 使第一個超連結標籤連結到Windows附屬程式的小畫家
 在第一個超連結標籤直接編輯Inklbl1_LinkClicked()事件的程式碼
01 Private Sub lnklbl1_LinkClicked(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.LinkLabelLinkClicked _
EventArgs) Handles lnklbl1.LinkClicked
02
Process.Start("c:\windows\system32\mspaint.exe") ‘超連結到小畫家
03
lnklbl1.ActiveLinkColor = Color.Red
04 End Sub
‘點按時超連結標籤文字變紅色
 按F5鍵執行,游標移到小畫家超連結標籤點按,觀察結果。
 關閉視窗程式。
Step5 使第二個超連結標籤連結到網際網路的Google台灣網站
 編輯第二個超連結標籤Inklbl2_LinkClicked()事件處理程序的程式碼
01 Private Sub lnklbl2_LinkClicked(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.LinkLabelLinkClicked _
EventArgs) Handles lnklbl2.LinkClicked
02
03
04
05
06
Process.Start("www.google.com.tw")
‘超連結到Google台灣網站
lnklbl2.LinkBehavior = LinkBehavior.NeverUnderline ‘點按時標籤不加底限
lnklbl2.LinkVisited = True
lnklbl2.VisitedLinkColor = Color.Brown
‘點按時超連結標籤文字不加底限,
End Sub
‘並設定為棕色標示已瀏覽
綠色
沒有底線
呈 棕色
 按F5鍵執行,游標移到小畫家超連結標籤點按,觀察結果。
 關閉視窗程式。
Step6 將第三個超連結標籤連結到發E-mail給指定的Address
 在表單模式下設定lnklbl3超連結標籤控制項的LinkArea屬性值



到 LinkArea 屬性設定欄
上按一下,開啟
「LinkArea 編輯器」對話方塊
選取『連絡』兩字
再按
鈕。
 編輯Inklbl3_LinkClicked()事件的程式碼
01 Private Sub lnklbl3_LinkClicked(ByVal sender As System.Object,
ByVal e As System.Windows.Forms.LinkLabelLinkClicked
EventArgs) Handles lnklbl3.LinkClicked
02
Process.Start("mailto: [email protected]")
lnklbl3.Enabled = False ‘該超連結標籤執行後功能消失
03
04 End Sub
按F5鍵執行,游標移到跟我連絡超連結標籤上,觀察結果。
沒有連結功能
有連結功能
連結後該超連結標籤功能消失,並開啟E-mail發信視窗。
關閉視窗。
Step7 將第四個超連結標籤連結到上一範例buttonEx抓小豬的
執行檔
 編輯lnklbl4_LinkClicked()事件處理程序內的程式碼,如下:
01 Private Sub lnklbl4_LinkClicked (ByVal sender As System.Object, ByVal _
eAs System.Windows.Forms.LinkLabelLinkClicked EventArgs) _
Handles lnklbl4.LinkClicked
02
Process.Start("C:\Documents and Settings\user\My Documents _
\Visual Studio2010\Projects \buttonEx\bin\debug\buttonEx.exe")
03 End Sub
‘應用程式buttonEx.exe執行檔存放在資料夾C:\Documents and
‘ Settings\user\My Documents\Visual Studio2010\Projects _
‘ \buttonEx\bin\debug\buttonEx.exe ch03\buttonEx\bin\debug的子資料夾內
按F5鍵執行,游標移到捉小豬的超連結標籤上,觀察結果。
關閉捉小豬的程式視窗與本程式的視窗。