ここから質問投稿すると、最大10000ポイント当たる!!!! >>

単純なことかもしれませんが、表題の表現方法がわかりません。
10000以上30000未満の場合、変数Aに1を
30000以上100000未満の場合、変数Aに2を
代入したいのですが、If ~ Then の間にどのように比較演算子を入れればうまくいくのでしょうか。
コードを教えていただければ助かります。

このQ&Aに関連する最新のQ&A

A 回答 (2件)

こんな感じでどうですか?



if 10000<=X and X<30000 then
A=1
else if 30000<=X and X<100000 then
A=2
endif
    • good
    • 0
この回答へのお礼

エラーになりましたが、修正して解決しました。
有り難うございました。

お礼日時:2004/01/11 12:45

IF THENは回答済みなので、Case文で


Sub test01()
p01:
n = InputBox("n=")
Select Case n
Case Is >= 100000
MsgBox "3"
Case Is >= 30000
A = 2
MsgBox "2"
Case Is >= 10000
A = 1
MsgBox "1"
Case Else
MsgBox "0"
End Select
GoTo p01
End Sub
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング