2 控制物件(初階)

瞭解屬性、方法和事件

2-1Form(表單)控制物件

物件:包括影像、文字、按鈕、下拉式選單…等都是物件。

表單:Form，又稱交談窗或視窗，一個表單可以放置許多許多的物件在其上，如以上的「執行」視窗。

表單有那些(重要)屬性?使用A->Z之排序方便你找到想要改的屬性。

如果找不到屬性視窗，可以從「檢視」->「屬性視窗」。並可在其頁籤上mouse right key->選擇「浮動」或「索引標籤式文件」->「新增垂直索引標籤群組 」，幫助找查要更改的屬性。

attr

常用屬性:

  1. (Name):請注意與Text的差別，建議不更動。
  2. BackClolor:更改背景顏色，建議不更動。
  3. BakckgroudnImage:更改底圖，建議不更動。
  4. Font:影響其內所有物件，建議不更動。
  5. Size:尺寸
  6. Text:顯示的文字

常用事件:

  1. Click
  2. Load

常用方法:

  1. Close:
  2. Hide:
  3. Show:

 

2-2 Button(按鈕)控制物件

「工具箱」->「通用控制項」->「Button」

如找不到工具箱，可從「檢視」->「工具箱」

常用屬性:

  1. Size:尺寸
  2. Text:顯示的文字
  3. Font:顯示文字的字形(大小)

 

2-3 Label(標籤)控制物件

「工具箱」->「通用控制項」->「Label」

常用屬性:

  1. Text:顯示的文字
  2. Font:顯示文字的字形(大小)

常用事件:

  1. Click

 

try 製作以下之表單，並學習「偵錯」

請注意，在偵錯過程中，是無法對物件或程式做更動的，故若你想更動，請先按「停止偵錯」。

2-4 控制物件的調整

  1. 利用滑鼠拖曳調整
  2. 先利用滑鼠拖曳框選，再利用「格式」調整，其調整位置或大小是以白點外框物件為基準。操作時可mouse left點選黑點外框物件，以切換白點外框物件。亦可按Shift key+mouse left反選黑點外框物件。

adjust

 

.一次選擇多個控制項再修改，會有什麼效果?

 

 

2-5利用程式改變控制物件的屬性

此小節要使用程式碼改變控制物件的屬性。

物件.屬性="屬性值"

 

2-5-1

製作程式(EX2_5.exe):

首先需建立如下的表單(含2個Label，3個Button)

經由選取"觸發"的物件(如上圖的Button3)。再經由程式碼執行改變。

Form1.vb <-> Form1.vb[設計]可切換程式碼編寫與表單設計。

編寫(執行)若有錯誤，會有錯誤清單，也會在可能發生錯誤的地方做出標示，而當出現「發生建置錯誤…」之對話框時，請選取否，以修改錯誤。

Public Class Form1表單

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label2.Text = "您已按下按鈕A"
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Label2.Text = ""

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Label2.Text = Button3.Text
End Sub
End Class

.開始偵錯後經由程式更改屬性後，結束偵錯後，屬性會維持嗎?

若是將Button3_Click中改成Label2.Text =" Button3.Text"，會有什麼結果?

若是將Button3_Click中之Label2.Text = Button3.Text，"="兩邊互換，會有什麼結果?

2-6 TextBox文字輸入框

常用屬性:

  1. Size:尺寸(只針對長度)
  2. Text:顯示的文字(預設文字)

製作程式(2_6.exe):

同上例，首先需建立一表單(含2個Label，1個Button，1個TextBox)

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'這是註解，不影響程式的執行，但可讓日後的維護及程式閱讀更容易
Label1.Text = "你輸入的文字是"
'在執行時預先將Label1.Text顯示"你輸入的文字是"
TextBox1.Text = "這是預設文字"
'TextBox預設顯示文字

'''''''''''''''''''''''''''空行和多個註解符號是可允許的
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label2.Text = TextBox1.Text
'在按下Button1後，Label2.Text改成TextBox1中之輸入文字
End Sub
End Class

' 號代表註解，不影響程式的執行。