No.2ベストアンサー
- 回答日時:
正直見てらんない。
メニューはともかく、せめてこんな風にしてほしかった。
----------------------------------------------------------------
a = inputbox("数値(1)",TITLE)
a = CDbl(a)
b = inputbox("数値(2)",TITLE)
b = CDbl(b)
select case arithmetic
case "1"
c = a + b
case "2"
c = a - b
case "3"
c = a * b
case "4"
c = a / b
case "5"
c = a ^ b
end select
msgbox "計算結果は「" & c & "」です。"
----------------------------------------------------------------
No.3
- 回答日時:
Visual Basicの解説ですが、アルゴリズムの参考になると思います。
http://homepage1.nifty.com/rucio/main/dotnet/sho …
http://www.seosoft.net/labo/vbprog/default.asp
No.1
- 回答日時:
可能か不可能か と言われると 可能。
数字ボタンなどGUI形式にはできないので、
・メニュー番号を入力する形式
・式を入力して文字列を識別させて計算する形式
とかになるでしょうけど。
この回答への補足
以下のようなものを作っていました。
意見をお願いします。
↓ ↓ ↓
Option Explicit
Dim arithmetic
Dim a
Dim b
Dim c
Dim d
Dim e
Dim f
Dim g
Dim h
Dim i
Dim j
Dim k
Dim l
Dim m
Dim n
Dim o
Const TITLE = "電卓"
arithmetic = InputBox("計算したい四則を選択" _
& VbCrLf & "【1】足し算" _
& VbCrLf & "【2】引き算" _
& VbCrLf & "【3】掛け算" _
& VbCrLf & "【4】割り算" _
& VbCrLf & "【5】べき乗",TITLE)
If arithmetic = "1" Then
a = inputbox("数値(1)",TITLE)
a = CDbl(a)
b = inputbox("数値(2)",TITLE)
b = CDbl(b)
c = a + b
msgbox "計算結果は「" & c & "」です。"
ElseIf arithmetic = "2" Then
d = inputbox("数値(1)",TITLE)
d = CDbl(d)
e = inputbox("数値(2)",TITLE)
e = CDbl(e)
f = d - e
msgbox f
ElseIf arithmetic = "3" Then
g = inputbox("数値(1)",TITLE)
g = CDbl(g)
h = inputbox("数値(2)",TITLE)
h = CDbl(h)
i = g * h
msgbox i
ElseIf arithmetic = "4" Then
j = inputbox("数値(1)",TITLE)
j = CDbl(j)
k = inputbox("数値(2)",TITLE)
k = CDbl(k)
l = j / k
msgbox l
ElseIf arithmetic = "5" Then
m = inputbox("数値(1)",TITLE)
m = CDbl(m)
n = inputbox("数値(2)",TITLE)
n = CDbl(n)
o = m ^ n
msgbox o
Else
End If
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
電卓での二乗のやり方
-
iPhoneの電卓
-
電卓で3割引とかの計算の仕方
-
スマホの電卓で計算したら、1.E...
-
電卓で8分の1の打ち方を教えて...
-
電卓の「MU」キーって何ですか?
-
ルートの中に少数がある場合ど...
-
電卓でWindowsのCtrl+Zみたいな...
-
計算機で割り算の余りを出す方...
-
電卓計算(掛け算と足し算)
-
tanΘを出すときの電卓の使い方
-
電卓の「M+」「M-」「MR」「MC...
-
電卓のような字体は何と言うの...
-
電卓 分数計算のしかたを、教え...
-
電卓やキーボードの音について
-
16000000円の1,000分の...
-
長方形の対角の寸法を普通の電...
-
人口の0.7%って、何人?
-
2の29乗の計算式を終えて下さい。
-
電卓の調子が悪いときどうして...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
電卓での二乗のやり方
-
iPhoneの電卓
-
電卓で3割引とかの計算の仕方
-
計算機で割り算の余りを出す方...
-
電卓の「MU」キーって何ですか?
-
ルートの中に少数がある場合ど...
-
長方形の対角の寸法を普通の電...
-
電卓計算(掛け算と足し算)
-
電卓で8分の1の打ち方を教えて...
-
スマホの電卓で計算したら、1.E...
-
電卓でWindowsのCtrl+Zみたいな...
-
電卓の調子が悪いときどうして...
-
SHARPの電卓 GT押すとゼロになる
-
電卓の計算結果を解説してほし...
-
人口の0.7%って、何人?
-
エクセルで、同一セル内に自動...
-
電卓のキーが固くなってしまい...
-
電卓やキーボードの音について
-
電卓の「M+」「M-」「MR」「MC...
-
手数料が加算される計算方法
おすすめ情報