Click Dim Guess As Integer Guess = Val(InputBox("請輸入數字 1-1000")) Do Until Guess = 666 '666 為答案 If Guess > 666 Then MsgBox("猜小一點") '猜太大了, ...
確定! 回上一頁