メニューを実装したいので、QBasicで簡単な電卓を作成しています。私が従った実践は次のとおりです。
PRINT "Select an Option"
PRINT "1. Addition"
PRINT "2. Subtraction"
PRINT "3. Multiplycation"
PRINT "4. Division"
PRINT "Option No.: "
INPUT opt
CLS
SELECT CASE opt
CASE 1
PRINT "You have selected Addition"
PRINT "Enter a no.:"
INPUT n1
PRINT "Enter second no.:"
INPUT n2
PRINT "The Sum is "; n1 + n2
CASE 2
PRINT "You have selected Subtraction"
PRINT "Enter a no.:"
INPUT n1
PRINT "Enter second no.:"
INPUT n2
PRINT "Difference between "; n1; " and "; n2; " is "; n1 - n2
CASE 3
PRINT "You have selected Multiplycation"
PRINT "Enter a no."
INPUT n1
PRINT "Enter second no.:"
INPUT n2
PRINT "Product is "; n1 * n2
CASE 4
PRINT "You have Selected Division"
PRINT "Enter a no.:"
INPUT n1
PRINT "Enter second no.:"
INPUT n2
PRINT "The Quotient is "; n1 / n2; " and the remainder is "; n1 MOD n2
CASE ELSE
PRINT "Invalid Option Number"
END SELECT
しかし今回は、次のようなより洗練されたものが必要です:
(A)dd Numbers
(S)subtract Numbers
(M)ultiply Numbers
(D)ivide Numbers
これらはすべて、画面の中央に配置されたボックス内にあります。を使用してLOCATE
いますが、必要な結果が得られません。はい、グラフィックなしでこれを試しています。INKEY$
ユーザーが入力したキーを取得するためにも使用しています。試してみINPUT
ましたが、ユーザーが入力した文字がエコーされました。
編集: @ user2864740、完璧な座標を取得できなかったことを意味します。