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
どこがわるいのでしょうか？
宜しくお願いします。
Visual Basci 6.0/Visual Studio 6.0 に対して、
最新の Service Pack を適用してみてください。
http://www.microsoft.com/japan/msdn/vstudio/downloads/sp/VS6SP6.asp
ついでに、このあたりも。
http://support.microsoft.com/kb/257714/JA/
http://support.microsoft.com/kb/222145/JA/
http://support.microsoft.com/kb/195049/JA/
魔界の仮面弁士さんレスありがとうございました。
SP6は当てています。念のため、もう一度SP6を当ててみて、
データフォームウィザードをやってみましたが、同じエラーでした。
プロジェクト→コンポーネントのコントロールは
Microsoft ADO Data Control 6.0(SP6)(OLEDB)
にチェックが入っていました。
プロジェクト→参照設定は、
Microsoft ActiveX Data Object 2.0 Library
にはチェックが入っていました。
その後、いじっているうちに、
再度データフォームウィザードをやりました。
そうしたら、参照設定が、変わっていました。
Microsoft ActiveX Data Object 2.5 Library
Microsoft Data Binding Collection VB 6.0 (SP4)
にチェックが入っていました。
コンパイルエラーが解消されました。
う〜ん。なぜだかわかりませんが、無事解決致しました。
魔界の仮面弁士さんありがとうございました。
今後とも宜しくお願い致します。