#275 郵便番号からYahoo!の地図情報を表示させる方法(その1) フォーム、VBA

コマンドボタンコントロールには、クリックによって特定のWebページを表示する「ハイパーリンク」機能があります。VBAを使って"HyperlinkAddress/ハイパーリンクアドレス"プロパティの値を変えることで、動的にそのリンク先を変えることができます。

次の例では、テキストボックスに入力された郵便番号を、コマンドボタンの"ハイパーリンクアドレス"プロパティに設定します。その際、入力された郵便番号を、Yahoo!地図情報のアドレスの検索パラメータ(p)に渡します。この状態でこのボタンをクリック(クリック時イベントのコーディングは不要)すれば、IEが起動して、指定された郵便番号に関するYahoo!の地図情報が表示されます。
Private Sub 郵便番号_AfterUpdate()

  Me!表示.HyperlinkAddress = "http://map.yahoo.co.jp/postal?p=" & Me!郵便番号

End Sub

実行例:
郵便番号の入力フォーム

Yahoo!地図情報の呼び出し結果

※最近、.NETのWebサービスが話題ですが、こういった形でWebを利用するのもある意味"Webサービス"ではないでしょうか?
| Index | Prev | Next |



T'sFactory
Accessで動く生産管理DB
Ureru Express
Webで使う販売顧客管理
Access開発&アドバイス
DB開発やテクニカルアドバイス
Copyright © T'sWare All rights reserved