VB2010でAccess2000のレポート表示 (ID:147677)

名前

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

本文 VB2010にてアクセス2000のレポートを以下の構文で表示させています。 Dim acc As Object = CreateObject("Access.Application") acc.Visible = True Dim de As Object = acc.DBEngine Dim db As Object = de.OpenDatabase(DataMdb, False, False, ";PWD=" & SPass) 'SPass=パスワード acc.OpencurrentDatabase(DataMdb) acc.DoCmd.RunCommand(10) ' ウィンドウの最大化 db.Close() System.Runtime.InteropServices.Marshal.ReleaseComObject(db) System.Runtime.InteropServices.Marshal.ReleaseComObject(de) Dim doCmd As Object = acc.DoCmd Const acViewPreview As Integer = 2 doCmd.OpenReport(RepName, acViewPreview) doCmd.Restore() doCmd.Maximize() 'レポートの最大化 System.Runtime.InteropServices.Marshal.ReleaseComObject(doCmd) System.Runtime.InteropServices.Marshal.ReleaseComObject(acc) 今までこれで、レポートのプレビュー画面を表示させていました。 ところが、アクセス側でレポートに日付（挿入→日付と時刻）を配置してあったのを削除したところ、VBからアクセスを起動しても、開いた直後に閉じてしまうようになりました。再度日付を配置すると、表示されるようになります。どうしても原因がわかりません。 詳しい方いましたら教えてください。よろしくお願いいたします。 なお、OSはXPです。