2019年2月25日 星期一

用VB程式語言設計"大家來找碴"小遊戲(1)

本文藉由Visual Basic(VB)程式語言來設計"大家來找碴"的小遊戲,並分成幾個篇幅來模擬以初學者如何來逐步改良遊戲,區分篇幅用意其實表示任何程式都是經由一再修改,才會愈改愈好,沒有程式設計是一步登天的。
首先,你必須對Visual Basic這套軟體操作介面要有基本概念,不過會想讀下去應該對VB已經有基本概念...


第一,依據遊戲規則建立程式雛形(以下程式範例假設有5個不同處):

比較左右圖片,在右圖上每次以滑鼠點選不同處,就有提示找到訊息,如果點錯,也會提示答錯訊息


[表單設計]

  1. 設定表單背景圖:從網路上找人家已經設計好的左右對照圖片,當然也可以自己用影像處理軟體來做圖,但比較麻煩,找現成的就好,然後在Form1屬性BackgroundImage匯入作為專案資源檔。
  2. 置入6個標示:用Label1~5來標示5個不同處,再用Label6當作相同處。但是Label如同圖層概念,Label6會蓋住Label1~5,所以要將Label6移到最下層(按滑鼠右鍵設定),如此滑鼠才可以點到Label1~5。
  3. 調整標示大小:配合不同處大小調整Label1~5的尺寸(尺寸範圍表示滑鼠點選的作用區),不要重疊,然後調整Label6尺寸蓋住整個右圖,如下圖(本圖已將Label6屬性BackColor改為透明色以凸顯5個不同處)。
  4. 去除標示背景顏色:將Label1~6屬性BackColor改為透明色(Transparent,在下拉選單中間Web標籤第1項可以找到),如下圖。
  5. 清除Label1~6屬性Text的內容




[程式撰寫]此處只用一種語法:MsgBox("訊息內容"),令電腦提示訊息。

  1. 在Label1上用滑鼠點兩下,開啟程式碼編輯視窗,在游標處輸入:MsgBox("你找到了!"),你會在程式碼編輯視窗看見以下內容,紅色反白表示撰寫的程式碼:
    Public Class Form1

        Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
            MsgBox("你找到了!")
        End Sub
    End Class

    註:上述程式碼表示~當你用滑鼠點一下Label1,程式提示"你找到了!"的訊息。
  2. 重複1.的作法,完成Label2~6的程式碼。
  3. Label6是用來當作相同處,所以提示訊息改成:MsgBox("你找錯了!")


............程式已經可以執行了,你可以按 ▶開始 玩玩看........................


沒有留言:

張貼留言