クラスモジュールでMScommを参照するには?

解決


どびん  2004-07-29 12:03:00  No: 115161  IP: [192.*.*.*]

VB6のクラスモジュールでMScommを使用したいのです。
以下のようなイメージなのですが、実行すると
『オブジェクトが必要です』エラーになってしまいます。
どのように記述したらよいのかわからないので宜しくお願いします。


//////// Class モジュール /////////////////

'オブジェクト宣言
Dim RS232 as MSComm

private sub initiaraiz()
set RS232 = me.controls.Add("MSCommLib.MSCom","RS232")
end sub

編集 削除
36NET  2004-07-29 14:43:38  No: 115162  IP: [192.*.*.*]

こうゆう事でしょうか?

Private WithEvents RS232 As MSCommLib.MSComm

Private Sub initiaraiz()
    Set RS232 = New MSCommLib.MSComm
End Sub

編集 削除
どびん  2004-07-29 15:26:48  No: 115163  IP: [192.*.*.*]

36NETさん、回答ありがとうございます。

>Private WithEvents RS232 As MSCommLib.MSComm
>
>Private Sub initiaraiz()
>    Set RS232 = New MSCommLib.MSComm
>End Sub

ですと、『NEWキーワードの使用法が違います』エラーになってしまいました。
もう少し、やってみます。
ありがとうございます。

編集 削除
36NET  2004-07-29 15:36:51  No: 115164  IP: [192.*.*.*]

上記ソースの場合は
コンポーネントで「Microsoft Comm Control *.*」を参照するのではなく
プロジェクト->参照設定で「MSCOMM32.OCX」を参照してください

編集 削除
どびん  2004-07-30 10:46:55  No: 115165  IP: [192.*.*.*]

出来ました。ありがとうございます。
『コンポーネントの追加』と『参照設定』のちがいがはっきりわかっていないようなので、勉強します。
ありがとうございました。

編集 削除
どびん  2004-07-30 10:47:35  No: 115166  IP: [192.*.*.*]

解決チェックするの忘れました。

編集 削除