Access VBA質問箱 IV

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

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


801 / 2272 ツリー ←次へ | 前へ→

【10041】数値データを常に決まった桁数で表示 ねこ 07/11/30(金) 13:26 質問[未読]
【10042】Re:数値データを常に決まった桁数で表示 VBWASURETA 07/11/30(金) 14:42 回答[未読]
【10043】Re:数値データを常に決まった桁数で表示 ねこ 07/11/30(金) 16:33 お礼[未読]
【10044】Re:数値データを常に決まった桁数で表示 hatena 07/11/30(金) 22:18 回答[未読]
【10053】Re:数値データを常に決まった桁数で表示 ねこ 07/12/4(火) 9:30 お礼[未読]

【10041】数値データを常に決まった桁数で表示
質問  ねこ  - 07/11/30(金) 13:26 -

引用なし
パスワード
   VBA以前の初歩的なアクセスの質問です。

金額の桁数を常に決まった桁数を表示させる方法はありますか?

1,000円を000,001,000円のように表示させたいのです。
商品コードと数値データを常に決まった桁数で表示させた金額を
つなげて1個のデータにして、不一致クエリで抽出をするためです。

たとえば、商品コードが9999、金額1,000円だったとしたら
9999000001000というデータにして、不一致クエリ作成の時に
関連付けるフィールドとして使いたいと考えています。

わかる人がいたら、教えてください。
宜しくお願い致します。

【10042】Re:数値データを常に決まった桁数で表示
回答  VBWASURETA  - 07/11/30(金) 14:42 -

引用なし
パスワード
   ▼ねこ さん:

こんにちは。

テキストの定型入力でもできるような気がしますが、
Format関数でもできます。

例:

Sub main()
  Dim strwk As String
  'strwkに結果が入る
  strwk = "9999" & CStr(Format(1000, "00000000"))  
End Sub

ご参考までに。

【10043】Re:数値データを常に決まった桁数で表示
お礼  ねこ  - 07/11/30(金) 16:33 -

引用なし
パスワード
   VBWASURETAさん

Format関数で、出来ました。
ありがとうございました。

【10044】Re:数値データを常に決まった桁数で表示
回答  hatena  - 07/11/30(金) 22:18 -

引用なし
パスワード
   >たとえば、商品コードが9999、金額1,000円だったとしたら
>9999000001000というデータにして、不一致クエリ作成の時に
>関連付けるフィールドとして使いたいと考えています。

不一致クエリで関連付けるのが目的なら、
2つのフィールド同士で関連付ければいいだけでは。
その方がインデックスを利用できるのは、高速ですし。

ウィザードでは関連フィールドは一つしか指定できませんが、
ウィザードで作成した不一致クエリのデザインビューで
別のフィールドも連結すればいいだけです。

【10053】Re:数値データを常に決まった桁数で表示
お礼  ねこ  - 07/12/4(火) 9:30 -

引用なし
パスワード
   hatena さん、ありがとうございました。

不一致クエリは、ひとつしか関連フィールドを選べないと
思っていました。
参考になりました。

不一致クエリを使って、考えていたデータの抽出が
できるようになりました!!

801 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078201
(SS)C-BOARD v3.8 is Free