現在、専門学校の卒業作品を作成しています。
その中に地下鉄の料金計算の処理を行いたいと思っています。
(http://www.city.sapporo.jp/st/ryoukin.html )ここのサイトにあるような物をVBでやりたいと思っています。
そこでこのような料金計算をどうやったら良いのか困っています。
WinAPIを使用すると簡単に出来ると聞いたのですが、いまいち理解できませんでした…
VBでできればやりたいのですが、どなたか教えていただけないでしょうか。
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
もう解決しましたか。
http://www.city.sapporo.jp/st/ryoukin.html
のhtmlソースを見ると料金計算の方法が
JavaScriptでかかれています。データは
テーブルを参照するという方法で
VBAへの変換を試みられていかがですか。
No.2
- 回答日時:
駅数が少ないのであれば、ただ単にすべての駅間の組み合わせを
羅列した運賃表をテーブルとしてもっていればいいだけで単純です。
これを少しAccessらしい使い方にするなら、
(1)運賃表ではなく駅間距離の一覧表にする
(2)距離対運賃の表を別に持つ
(2’)特殊運賃(加算運賃、割引運賃など)の仕様をプログラムに組み込む
ことにより、運賃改定時には(2)のテーブルのみ更新するという
仕様にすればそれなりの製作品になるんではないでしょうか?
しかし、駅数が1万(たとえばJRなど)もあるとなるとハナシは別です。
すべての組み合わせの運賃表(距離表)をもつのはかなり困難ですので。
No.1
- 回答日時:
>WinAPIを使用すると簡単に出来ると聞いたのですが
こりゃまた根も葉もないヨタですね。
単なる区間の料金計算なので、どんな言語でも、
単純な比較と計算によるプログラムになります。
要点が多いので、整理します。
(1)コンボボックス
コンボボックスの作り方、操作方法は分かって
いますか?
(2)駅情報
乗車駅と降車駅が分かったとして、駅間距離は
どのように求めるのか?
例えば、基点駅からの距離の差を求める等
(3)料金体系
距離による計算方式
ここで、(2)が一番面倒です。単一路線なら簡単ですが、
複数路線で乗換えがあるとかを考えると、複雑ですね。
とりあえず、単一路線で考えるなら、コンボボックスに
駅名と起点駅からの距離を仕込みます。1行に2列と
なりますが、ListWidthで、2列目の幅を0にしておけば、
1列しか見えません。
コンボの元ネタはテーブルから取るようにすれば、
Accessらしい体裁になると思います。
例:
(1)路線テーブル
駅名、基点駅からの距離
(2)コンボ
値集合ソース:SELECT 駅名,距離 FROM 路線 ORDER BY 距離
列数:2
列幅:1;0 ★左側は0でなければ1でなくても良い
更新後処理:★ここでVBAを使って処理する。
(3)コンボの2列目の値の取得方法
距離 = Me.Combo.Column(1)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・家の中でのこだわりスペースはどこですか?
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
クエリのキャンセルがいつにな...
-
ユニオンクエリの結果をテーブ...
-
accessテーブル作成クエリを実...
-
アクセスのテーブル作成クエリ...
-
エクセルでテーブルの最終行が...
-
重複するレコードに対しフラグ...
-
VIEWしか読み取れないユーザの...
-
UNIONなどで複数のテーブルから...
-
SQLスクリプトを自動生成する方法
-
テーブル作成クエリで新テーブ...
-
#ワークテーブルにinsert時 変...
-
ACCESS-リンクテーブルの設定で...
-
コンボボックスで入力したもの...
-
レプリケーションしているテー...
-
ストアドをまたがるローカル一...
-
「マスタ」と「テーブル」の違...
-
ACCESSのSQLで、NULLかNULLでな...
-
sqlserverで集計結果をUPDATEし...
-
Accessにインポートしたら並び...
-
ACCESS2007 フォーム 「バリア...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
accessテーブル作成クエリを実...
-
クエリのキャンセルがいつにな...
-
エクセルでテーブルの最終行が...
-
SI Object Browserのテーブルス...
-
コンボボックスで入力したもの...
-
ユニオンクエリの結果をテーブ...
-
UNIONなどで複数のテーブルから...
-
AccessでOracleのテーブルをリ...
-
VIEWしか読み取れないユーザの...
-
あるテーブルのデータを追加、...
-
位置を指定してフィールドを追...
-
ADOでSeekメッソッドが使えませ...
-
SQLスクリプトを自動生成する方法
-
テーブル作成クエリで新テーブ...
-
SQLサーバーのテーブルの値...
-
Access のリレーションシップで...
-
レプリケーションしているテー...
-
重複するレコードに対しフラグ...
-
PL/SQLでFROM句に変数を使いたい
-
アクセスのテーブル作成クエリ...
おすすめ情報