首先,你必須對Visual Basic這套軟體操作介面要有基本概念,不過會想讀下去應該對VB已經有基本概念...
第一,依據遊戲規則建立程式雛形(以下程式範例假設有5個不同處):
比較左右圖片,在右圖上每次以滑鼠點選不同處,就有提示找到訊息,如果點錯,也會提示答錯訊息。
[表單設計]
- 設定表單背景圖:從網路上找人家已經設計好的左右對照圖片,當然也可以自己用影像處理軟體來做圖,但比較麻煩,找現成的就好,然後在Form1屬性BackgroundImage匯入作為專案資源檔。
- 置入6個標示:用Label1~5來標示5個不同處,再用Label6當作相同處。但是Label如同圖層概念,Label6會蓋住Label1~5,所以要將Label6移到最下層(按滑鼠右鍵設定),如此滑鼠才可以點到Label1~5。
- 調整標示大小:配合不同處大小調整Label1~5的尺寸(尺寸範圍表示滑鼠點選的作用區),不要重疊,然後調整Label6尺寸蓋住整個右圖,如下圖(本圖已將Label6屬性BackColor改為透明色以凸顯5個不同處)。
- 去除標示背景顏色:將Label1~6屬性BackColor改為透明色(Transparent,在下拉選單中間Web標籤第1項可以找到),如下圖。
- 清除Label1~6屬性Text的內容。
[程式撰寫]此處只用一種語法:MsgBox("訊息內容"),令電腦提示訊息。
- 在Label1上用滑鼠點兩下,開啟程式碼編輯視窗,在游標處輸入:MsgBox("你找到了!"),你會在程式碼編輯視窗看見以下內容,紅色反白表示撰寫的程式碼:
Public Class Form1
Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
MsgBox("你找到了!")
End Sub
End Class
註:上述程式碼表示~當你用滑鼠點一下Label1,程式提示"你找到了!"的訊息。 - 重複1.的作法,完成Label2~6的程式碼。
- Label6是用來當作相同處,所以提示訊息改成:MsgBox("你找錯了!")
............程式已經可以執行了,你可以按 ▶開始 玩玩看........................
沒有留言:
張貼留言