Access VBA質問箱 IV

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

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


708 / 9994 ←次へ | 前へ→

【12595】データーの型について
質問  いーぐる428  - 14/8/14(木) 8:16 -

引用なし
パスワード
   お世話になります。

部品情報が含まれているテーブル「部品マスター」は
プレフィックス  (短いテキスト)
部品番号     (短いテキスト)
サフィックス   (短いテキスト) 
部品名、     (短いテキスト) 
等のフィールドでできています。

今、部品番号を自動的に採番するために以下のような例を参照しました。

Private Sub Forom_BeforeInsert(Cancel As Integer)
 If Dcount("*","部品マスタ")= 0 then
   Me.部品番号 = "0000001"
 Else
   Me.部品番号 = Format(DMax("部品番号","部品マスタ") + 1,"0000000")
 End if
End Sub

ただし、テーブル定義では部品番号は短いテキスト型になっています。テーブルの部品番号の型を数値型にすれば問題ないのですが、型を変更できないとき、どのようにすればよいでしょうか。

また、プレフィックス、部品番号、スァフィックスの組で重複は許されません。
プレフィックス、部品番号、サフィックスが入力された時点で重複レコードがないかチェックし、あればアラーム、なければ続いて部品名等を入力したいです。

上記2点、ご指導の程よろしくお願いもうしあげます。
151 hits

【12595】データーの型について いーぐる428 14/8/14(木) 8:16 質問[未読]
【12596】Re:データーの型について かるびの 14/8/16(土) 1:38 回答[未読]
【12597】Re:データーの型について いーぐる428 14/8/16(土) 4:21 お礼[未読]
【12598】Re:データーの型について いーぐる428 14/8/17(日) 17:46 質問[未読]
【12599】Re:データーの型について かるびの 14/8/18(月) 2:13 回答[未読]
【12600】Re:データーの型について いーぐる428 14/8/18(月) 4:30 質問[未読]
【12602】Re:データーの型について かるびの 14/8/19(火) 0:48 回答[未読]
【12603】Re:データーの型について いーぐる428 14/8/19(火) 5:25 お礼[未読]

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