Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


5075 / 9994 ←次へ | 前へ→

【8150】Re:レコード削除
発言  小僧  - 06/7/4(火) 10:01 -

引用なし
パスワード
   ▼Satsuki さんm855 さん:
おはようございます。

>位置テーブルのrs2![X1]がrs2.MoveNextで値が変わるので、
>単純に「X1」フィールドの上位5位では無理そうですね。

[データ]
ID    場所             X    Y
1    東京ディズニーランド    35.63    139.88
2    関西空港          34.43    135.25


[位置]
拠点名       X1     Y1
栃木県宇都宮市   36.33    139.53
群馬県前橋市    36.23    139.03
茨城県水戸市    36.22    140.28
埼玉県浦和市    35.51    139.38
東京都中央区    35.41    139.45
千葉県千葉市    35.36    140.06
神奈川県横浜市   35.26    139.38


の様なダミーデータを使って実験をしていたのですが、

>  Do Until rs2.EOF
>  rs3.AddNew
>  rs3![kyotenmei] = rs2![拠点名]
>  rs3![kyoriX] = rs2![X1] - rs1![x]
>  rs3![kyoriY] = rs2![Y1] - rs1![y]
>  rs3.Update
>  rs2.MoveNext
>  Loop

でしたら

X 35.63 が固定で
X1 が 36.33、36.23、…の様に変化するだけなので、
距離テーブルに入る上位5位は、
そのまま位置テーブルの上位5位になってしまうのかな、と。

これは Satsuki さんの仕様によるものなのでしょうけど、
もし X、Y にあたるものが緯度経度の様なものでしたら、
2地点の緯度経度から計算される距離のTop5を求めなければいけないのかな
と思った次第です。

(X、Yというフィールド名から緯度経度を想像しただけですので
まったくの勘違いでしたらすみません)
710 hits

【8127】レコード削除 Satsuki 06/7/3(月) 13:53 質問
【8137】Re:レコード削除 小僧 06/7/3(月) 16:52 発言
【8148】Re:レコード削除 855 06/7/3(月) 18:16 発言
【8150】Re:レコード削除 小僧 06/7/4(火) 10:01 発言
【8155】Re:レコード削除 Satsuki 06/7/4(火) 10:59 お礼
【8157】Re:レコード削除 Satsuki 06/7/4(火) 11:27 お礼
【8154】Re:レコード削除 Satsuki 06/7/4(火) 10:29 質問
【8159】Re:レコード削除 小僧 06/7/4(火) 11:47 回答
【8161】Re:レコード削除 855 06/7/4(火) 16:07 発言
【8163】Re:レコード削除 Satsuki 06/7/4(火) 17:10 お礼
【8162】Re:レコード削除 Satsuki 06/7/4(火) 17:06 お礼
【8165】Re:レコード削除 小僧 06/7/4(火) 17:24 回答
【8167】Re:レコード削除 Satsuki 06/7/4(火) 17:54 お礼

5075 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078228
(SS)C-BOARD v3.8 is Free