請選擇 進入手機版 | 繼續訪問電腦版

微剋多資訊

 找回密碼
 註冊

Sign in with google

Google帳號登入

搜索
回覆 0則 瀏覽 11701篇
Line

[教學] Autoit MsgBox 製作一個猜數字遊戲

簽到天數: 17

該用戶今日未簽到

升級   24%

發表於 2023-3-31 20:32 | 顯示全部樓層 |閱讀模式
#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)
樓主熱門主題
您需要登入後才可以回帖 登入 | 註冊

本版積分規則

小黑屋|Archiver|微剋多資訊(MicroDuo)

GMT+8, 2024-3-29 10:13

Discuz! X

© 2009-2023 Microduo

快速回覆 返回頂部 返回列表