Access入力フォーム画面で角度の計算

Question

入力フォームで非連結を使用し、角度の計算をしたいと考えています。
入力フォームは以下になります。
![イメ

1行目と2行目を足して、それからそれから360度を引いた値を
3行目に自動で入るようにしたいです。
例
89゜58’20” ＋ 270゜01’30” － 360゜ ＝ - 0゜0’10”
90゜04’30” ＋ 268゜55’25” － 360゜ ＝ - 0゜0’05”

このように角度の加減計算をする場合は、角度を時間に置き換えて
計算する方法になるのでしょうか？

アドバイスお願い致します。

Answer 1

それぞれの 度、分、秒 の角テキストボックス名を下記のようにします。

deg1 min1 sec1

deg2 min2 sec2

deg3 min3 sec3

また、合計計算用のテキストボックスを３つ追加して名前をそれぞれ下記のようにします。

secSum1　secSum2　secSum3

さらにマイナス表示用にテキストボックスを追加して、名前を sgn3 とします。

それぞれのテキストボックスのコントロールソースを下記のように設定しします。

secSum1　=[deg1]*3600+[min1]*60+[sec1]
secSum2　=[deg2]*3600+[min2]*60+[sec2]
secSum3　=[secSum1]+[secSum2]-360*3600

sgn3　=IIf(Sgn([secSum3])=-1,"-","")
deg3　=Abs([secSum3]\3600)
min3　=Abs(([secSum3]\60) Mod 60)
sec3　=Abs([secSum3] Mod 60)

secSum1　secSum2　secSum3 は計算用なので「可視」を「いいえ」にして非表示にします。

以上です。

Comments

[sai_chan]

hatena様
無事、解決できました。
秒に変換し、そこから計算し、差を抽出してるんですね。
とても参考になります。ありがとうございます。