質問編集履歴
2
ソースコードを、コードの挿入で変更した。
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -19,6 +19,7 @@
|
|
|
19
19
|
|
|
20
20
|
### 該当のソースコード
|
|
21
21
|
データ受信用のプログラム
|
|
22
|
+
```ここに言語を入力
|
|
22
23
|
Sub Main()
|
|
23
24
|
（省略）
|
|
24
25
|
・・・・・
|
|
@@ -126,6 +127,7 @@
|
|
|
126
127
|
|
|
127
128
|
End While
|
|
128
129
|
End Sub
|
|
130
|
+
```
|
|
129
131
|
### 試したこと
|
|
130
132
|
同じDoWorkXMLをメインスレッドなどで起動して、動作確認しました。
|
|
131
133
|
|
1
省略した部分が分かりにくかったため
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -20,6 +20,8 @@
|
|
|
20
20
|
### 該当のソースコード
|
|
21
21
|
データ受信用のプログラム
|
|
22
22
|
Sub Main()
|
|
23
|
+
（省略）
|
|
24
|
+
・・・・・
|
|
23
25
|
Dim channel As New IpcServerChannel("Sample")
|
|
24
26
|
ChannelServices.RegisterChannel(channel, True)
|
|
25
27
|
RemotingServices.Marshal(RemoteObject, "Sample", GetType(PrintSpool.PrintSpool))
|