現在、ACTIVE REPORTSを使用して帳票の印刷を行っているのですが、
下記のような関数がありまして、複数回同時にこの関数をCallすると
1回目はうまく印刷するのですが、2回目以降はUnload Objが影響してエラーとなります。
そもそも同時実行する必要がないので、修正することは容易なのですが、
Unloadは他のスレッドに影響を及ぼすものなのでしょうか?
また、OSによって異なったりするものでしょうか?
何か情報をお持ちの方がいらっしゃいましたら、アドバイスをお願いします。
[OSのVER]:Windows2000
[VBのVER]:VB6
Private Sub cmd_Click()
Dim Obj As Object
Obj = aaaOut
CALL Obj.Printer.PrintDialog
(省略してますがここで印刷を行ってます)
DoEvents ← この関数を複数回呼ぶことが可能になってます
If Not ObjArvRpt Is Nothing Then
Unload Obj
Set Obj = Nothing
End If
End Sub
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
問題は2つあります。
まず数値ですけど-が抜けてますね。これを16進数にすると0x80010007となり、
「警告」「RPC機能」「既にそのブロックは破壊されています。」になります。
要するに使用できたメモリ領域が何らかの理由で破壊されていて使用できない状態になっているのでしょう。
メモリ領域を破壊する個所は、一番最後の
Set Obj = Nothing
でしょうね。
次にDoEventsの使い方が間違ってます。
DoEventsは、他の処理へ制御をまわすためのものであり、
関数を複数回呼び出すことを可能にするものではありません。
DoEventsを使用して同じ関数を複数回呼び出しを可能にしていることが問題です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) ユーザーフォームに2つのコンボボックス銀行名「ConboBox1」支店名を「ConboBox2」とし 4 2022/08/03 17:34
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Excel(エクセル) エクセルの自動更新のタイミングについて 1 2022/07/20 16:12
- Visual Basic(VBA) 数式が消える 1 2023/03/19 16:55
- Visual Basic(VBA) vba Sleep関数について教えてください 1 2023/01/18 10:18
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBscriptでPDFファイルを直接印...
-
プリンターエラーの判定
-
VBでExcel印刷する時のプリンタ...
-
印刷要求順番と印刷出力順番が...
-
クリレポのプリンタ設定について
-
ACCESSで設定した帳票の用紙サ...
-
VBからのプリンタ制御について
-
Accessフォームで全レコードを...
-
VB6の印刷でメモリリーク
-
B4で手差しトレイから印刷(V...
-
VBAで印刷の成功判定
-
サーバーで作成したPDFを直接印...
-
印刷ダイアログを表示させたくない
-
MSAccessのVBAで印刷時の並べ替...
-
閲覧してるページを自動で印刷...
-
VBAでエクセルからワードへの差...
-
vba 時間の引き算 例えば 15:00...
-
Designer.vbは直接コードをいじ...
-
C#ソースをCSCファイルにてコン...
-
Visual Studio 「AnyCpu」について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
印刷ダイアログを表示させない方法
-
印刷要求順番と印刷出力順番が...
-
プリンターを指定して印刷するには
-
vbaでPDFファイルが印刷されない
-
VBAで印刷スプール終了の判定を...
-
PDFファイルを印刷し終了するには
-
VBからプリンタに出力する時に...
-
ACCESSで設定した帳票の用紙サ...
-
印刷ダイアログを表示させたくない
-
VBscriptでPDFファイルを直接印...
-
ActiveReportsを使って[印刷ダ...
-
VBAで印刷の成功判定
-
Accessフォームで全レコードを...
-
VB.NET+ActiveReports で印刷...
-
A4の2枚をA3の1枚にする編集方法?
-
Eclipseを使ってソースを印刷し...
-
EXCELファイルの複数ダウンロー...
-
VBAにて指定したセルをプルダウ...
-
VBでExcel印刷する時のプリンタ...
-
Javaから直接プリンターへ印刷...
おすすめ情報