データベースへのinfoの入力
こんにちは、いつもお世話になっています。早速ですが、いま、VBの練習で、Microsoft Access のデーターベースを使ったプログラムを作っています。
ひとつのフォームにADODC と DataGrid を使って、アクセスのデーターを表示させ、下のFrameの中にVB作成のテキストボックスを作り、そこのテキストボックスに何かインフォメーションをいれ、”Add"コマンド(cmdAdd)をクリックするとそれらインフォメーションが新しいレコードとしてアクセスのデーターベースに記録されるようにしたいと思っています。 いまのところ、それらインフォメーションがアクセスのデーターベースに表示されるところまでは、できたのですが、上書き表示になってしまい、新しいレコードとしては、表示されません。もし、どなたか、解決方法を知っている方がいらっしゃいましたら、おしえてください。
一応、下に対象フォームのソースコードの一部を記入しておきます。まったく違っていたらどうか気になさらずにずばっと言ってくれたら幸いです。
Private Sub cmdAdd_Click()
Dim intID As Integer, strFName As String, strLName As String, vntAddress As Variant,
intID = Val(txtCustomerID.Text)
strFName = txtFname.Text
strLName = txtLname.Text
vntAddress = txtAddress.Text
adoCustomer.Recordset.Fields.Item(0).Value = intID
adoCustomer.Recordset.Fields.Item(1).Value = strFName
adoCustomer.Recordset.Fields.Item(2).Value = strLName
adoCustomer.Recordset.Fields.Item(3).Value = vntAddress
End Sub
お礼
ありがとうございます 参考にさせていただきます