初心者な質問で申し訳ありませんが、教えてください。
VB6を使用してプログラムを勉強しているのですが、AddNewメソッドで
データを追加しようとすると、なぜか一番初めのデータを上書きして
一番最後には空白のデータを追加してしまいます。
Private Sub Command1_Click()
Me.Data1.Recordset.AddNew
Me.Data1.Recordset("氏名") = Me.Txt_Name
Me.Data1.Recordset.Update
End Sub
そのようになる原因としてはどんな事が考えられるのでしょうか?
教えていただけるととても助かります。お願いします。
AddNewの直後にRequery してみてください。
Requery メソッドの前に、データアクセスオブジェクトの追加プロパティを
見直してみてください。
ツイート | ![]() |