コンパイルエラーをなくすには？ (ID:122267)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 VB6を最近始めました田村といいます。 本当に初歩的なことだと思うのですが、 教えて頂けないでしょうか？ データフォームウィザードから、Aceessを選択して、MDBを選択して、 レコードソースを本を選んで、使用できるフィールドを選択して、 データフォームを作成しましたが、エラーになります。 コンパイルエラー プロシージャの宣言が、イベントまたはプロシージャの定義と 一致していません。 というエラーが出ます。 Private Sub datPrimaryRS_MoveComplete _ (ByVal adReason As ADODB.EventReasonEnum, _ ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, _ ByVal pRecordset As ADODB.Recordset) '↑の行でエラーがでます。 'このレコードセットの現在のレコード位置を表示します。 datPrimaryRS.Caption = "Record: " & CStr(datPrimaryRS.Recordset.AbsolutePosition) End Sub どこがわるいのでしょうか？ 宜しくお願いします。