Access初心者です。
ネットでいろいろ調べながらやってます。
フォームを作成し、ボタンを押すとカウントするテキストボックスを作っています。
そしてイベントビルドで登録ボタンを作成し、次のレコードに移動してますが、
カウントされた数字が継承され困ってます。
ちなみにテキストボックスの規定値は0を設定しています。
ご教示いただけませんでしょうか。
Private Sub C_yuuko_Click()
Me!有効数 = Nz(DMax("有効数", "F_main", Criteria部), 0) + 1
Me.Recalc
End Sub
Private Sub C_muko_Click()
Me!無効数 = Nz(DMax("無効数", "F_main", Criteria部), 0) + 1
Me.Recalc
End Sub
Private Sub C_clear_Click()
Me!有効数 = "0"
Me!無効数 = "0"
End Sub
「有効数」「無効数」 は非連結のテキストボックスでしょうか。
でレコード移動時に、これらのテキストボックスの値を ０ にしたいということでしょうか。
もしそうならば、フォームのレコード移動時のイベントプロシージャを下記のように記述すればいいでしょう。
ありがとうございます。
次のレコードをマクロビルダーでやっていて、
レコード移動＞新しいレコード
にしてるので、追加のコードを入れてもうまくいかないです。。。
連結フォームの非連結テキストボックスならうまく行くはずです。
こちらのサンプルではうまくいってます。
どこか間違っているのか、情報として出されていない部分に原因があるのでしょう。
どうしてもわからなければ、ファイル送信フォームから現状のAccessファイルを送ってくれれば原因が分かるかもしれません。送信フォームは右カラムの下にあります。
ありがとうございます。
非連結になっていなかったので、テキストフォームのコントロールソースを消してみました。
・有効数、無効数ともに1しかカウントしなくなった（1から増えない）
・次のレコードは0スタートになった（前は0はセットするけどカウントボタンを押すと前回の続きの数値が入る）
といった状況です。。。