kaihsin1703 發表於 2023-3-31 20:32

Autoit MsgBox 製作一個猜數字遊戲

#include <MsgBoxConstants.au3>

; 生成 1 到 100 之間的隨機數字
$number = Random(1, 100, 1)

; 顯示說明對話框
MsgBox($MB_OK, "猜數字遊戲", "我們生成了一個 1 到 100 之間的隨機數字,請猜一下它是多少。")

; 開始猜數字
$guess = 0
While $guess <> $number
    ; 彈出輸入框讓用戶輸入猜測的數字
    $guess = InputBox("猜數字遊戲", "請輸入你的猜測:")

    ; 檢查用戶是否取消了輸入
    If @error Then
      Exit
    EndIf

    ; 比較用戶猜測的數字和實際數字的大小關係
    If $guess < $number Then
      MsgBox($MB_OK, "猜數字遊戲", "你猜的數字太小了,請再猜一次。")
    ElseIf $guess > $number Then
      MsgBox($MB_OK, "猜數字遊戲", "你猜的數字太大了,請再猜一次。")
    EndIf
WEnd

; 猜對了,顯示恭喜對話框
MsgBox($MB_OK, "猜數字遊戲", "恭喜你猜對了!答案是:" & $number)
頁: [1]
查看完整版本: Autoit MsgBox 製作一個猜數字遊戲