|
▼爺 さん:
>>たぶん、、、、、
>>CurrentDbを使用する為の、DAO参照設定か、
参照設定で、「Microsoft DAO X.X Object Library」
にチェックは入っているますか?
あるいは、参照不可になっているところはありませんか?
>>rsの変数宣言がされていないところ。
提示されたコードでは、 Dim rs AS DAO.recordset の
宣言がありませんが、冒頭などで宣言しているのでしょうか?
(それとも、変数の宣言を強制してない?)
>別のフォームには、これと同じコードで問題なく動いているため
>何処に問題があるのか検討がつきません。
同じMDBの中の別のフォームということなのでしょうか?
同じMDB内でしたら、上記の参照設定は大丈夫だと思います。
違うMDBでしたら、参照設定を疑ってみてください。
ダメな場合は、
>Private Sub save_Click()
〜この間のコードをコピーして〜
>End Sub
一旦コード丸ごと削除します。
>Private Sub save_Click()
から
>End Sub
までです。
ボタン名を「Btn_save」に変更して、
クリック時のイベントのビルダボタンを押します。
Private Sub Btn_save_Click()
End Sub
この間に、ペーストしてみて下さい。
(名前の変更は、関係ないかもしれませんが、、、、)
それでもダメなら、、、、、フォームの作り直し!?
|
|