-PR-
解決
済み

アクセスのフォーム内で消費税計算方法を分岐させたい

  • 困ってます
  • 質問No.43883
  • 閲覧数858
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 100% (4/4)

アクセスでフォームを作って、消費税額を表示させるテキストボックスを
作りました。消費税は、場合によって外税だったり内税だったりするので、
オプションボタンを作って処理を分岐させようと思っています。
case文で処理を分岐させたいのですが、オプションボタンを選択したあとに
実行させるプロシージャの書き方がわからないのです!
すみませんが、教えてください!

また、オプションボタンよりもっと簡単にできる方法ってあるんでしょうか?
本を見ながらの初心者なので、どれが適した処理方法なのか、判断できない
のです・・・。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1

関数を作ってそれに課税対象額と課税区分を渡すって言う感じですね。


オプショングループで1が外税・2が内税とします。
Kingakに課税対象となる金額コントロール、Kubunにオプショングループを指定します。消費税を表示したいコントロールのコントロールソースに下記のファンクション名を指定して下さい。

Function Get_Tax(Kingak As Money,Kubun As Int)
Select Case Kubun
Case 1 '外税
Get_Tax = Kinigak * 0.05
Case 2 '内税
Get_Tax = Kingak - (Kingak / 105 * 100)
End Select

 って感じでしょうか。端数処理は行っていませんので小数点以下も表示されてしまいますが。切り上げ・切り捨て・四捨五入などint()で付け加えてください。
お礼コメント
wk_jazz

お礼率 100% (4/4)

丁寧な説明ありがとうございました!
お礼が遅くなってすみません(PCがおかしくなってしまっていたので・・・)
助かりました。本当にありがとうございました。
投稿日時 - 2001-02-26 15:45:22
-PR-
-PR-
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ