[OSのVer]：WindowsXp　　　　[VBのVer]：VB.NET Professional 2003 MSDN Deluxe Edition

ACCESSのテーブルにデータを追加しようと思いまして以下のような
プログラムを書いてみたのですが、フィールドに値を受け渡すところで
"プロパティ'Fields'は'ReadOnly'です。"とエラーになってしまいます。
参照の追加で何か必要なものがあるのでしょうか？
ご存知の方がいらっしゃいましたら、よろしくお願いします。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
        Dim cnn As New ADODB.Connection
        Dim rst As New ADODB.Recordset

        cnn.Open("Provider=Microsoft.jet.OLEDB.4.0;Data Source=c:\TEST\SAMPLE.mdb"
;)

        rst.Open("SELECT * FROM t_顧客", _  
        cnn,ADODB.CursorTypeEnum.adOpenKeyset,ADODB.LockTypeEnum.adLockOptimistic)
        rst.AddNew()

        rst!ID = 5
　　　　rst!NAME = "TEST"
        rst.Update()

        rst.Close()
    End Sub　　

>         rst!ID = 5
> 　　　　rst!NAME = "TEST"

確認していませんが、上記は、
  rst.Collect("ID") = 5
  rst.Collect("NAME") = "TEST"
もしくは、
  rst.Fields("ID").Value = 5
  rst.Fields("NAME").Value = "TEST"
などと記述する事になるのでは。

その通りでした。
ありがとうございました。
今後ともどうぞよろしくお願いします。

[OSのVer]：Windows　　　　[VBのVer]：VB.NET　　
> >         rst!ID = 5
> > 　　　　rst!NAME = "TEST"
>
> 確認していませんが、上記は、
>   rst.Collect("ID") = 5
>   rst.Collect("NAME") = "TEST"
> もしくは、
>   rst.Fields("ID").Value = 5
>   rst.Fields("NAME").Value = "TEST"
> などと記述する事になるのでは。