電卓の小数点の入れ方

Question

VB.NETの初心者です。
今Visual Studio 2015で電卓を作っていますが、小数点のコードの書き方がわからないです。
電卓としては、四則演算ができればいいです。
今のところ、四則演算ができていています。でも小数点のとこで躓いました。

整数加算の電卓画面クラス以下
Public Class Form1
Private ope As String = Nothing

Private beforeIn As String = "C"
Private ans As Long = 0
Private num As Long = 0

End Class

数字1を押下した画面は以下
Private Sub BtnOne_Click(sender As Object, e As EventArgs) Handles BtnOne.Click
If beforeIn >= "0" And beforeIn <= "9" Then
If LblAnser.Text.Length < 8 Then
LblAnser.Text &= "1"
End If
Else
LblAnser.Text = "1"
End If
beforeIn = "1"

End Sub

どなたが小数点のコードのヒントをくれたら嬉しいです。

Answer 1

まずLong型に小数点はありませんよね

いろいろやり方があると思いますが、

• 入力ストリームを記録しておく→表示用のString型
• 現在有効になっている演算子→String型でも使える演算子をEnumで縛っておいてもいいですね
• 計算するため→目的の型(IntegerでもLongでもSingleでもDoubleでもDecimalでもお好きに)

と分けて持たせておいて、入力ストリームがTryParseで目的の型に

• 変換できた→入力OK
• 変換できなかった→入力NG

としても良いかもしれませんね

Answer 2

小数点同士の演算は値がfloatかdoubleになることを考えればいいかと。

誤差どこまで許容するかによりますが、簡易電卓ならそこまで気にしなくて
いいのではないでしょうか。

「.」があるときは文字列長が変わるので注意。

あと、内部的に今まで押された内容を覚えておくとより分かりやすい。

Comments

[ekiti]

ありがとうございます。
floatかdoubleとおしゃいましたが、それについてもう少し説明してもらいますか。

[kanimaru]

プログラムによりますが型という概念があるので、以下のページ参照してください。
https://msdn.microsoft.com/ja-jp/library/dd314347.aspx
https://msdn.microsoft.com/ja-jp/library/dd314344.aspx

[ekiti]

ありがとうございます。
参考になります。