C# と VB.NET の質問掲示板

■No29564 (iSyouta さん) に返信
> 下記のエラーがでてしまいます。
とりあえず修正案。

★案1: C# 側は変更せず、VBScript 側を値渡しにする ★
'Call objCom.mtdReturn(objComDataBean)
Call objCom.mtdReturn((objComDataBean))


★案2: VBScript 側は変更せず、C# 側で MarshalAs(IDispatch) 属性を付加 ★
// public int mtdReturn( property_DataBean prpDb)
public int mtdReturn([MarshalAs(UnmanagedType.IDispatch)] property_DataBean prpDb)


> で、COM内のmtdReturnの引数を「object prpdb」に変えれば通るのですが、
> それだと、ASP側で代入した値が使用できずで困っています。

★案3: object で受け、それを C# 側でキャストする★

public void mtdReturn(object /* property_DataBean */ prpDb)
{
    /*
    if (prpDb == null)
    {
        throw new ArgumentNullException();
    }
    else if (!(prpDb is property_DataBean))
    {
        throw new InvalidOleVariantTypeException();
    }
    */
    property_DataBean p = (property_DataBean)prpDb;
    p.intNUM3 = p.intNUM1 + p.intNUM2;
}



> 以下がソースになります。
以下、細かいツッコミ。


> 	Set objComDataBean = Server.CreateObject("ClassLibrary.property_DataBean")
> 	Set objCom 	= CreateObject("ClassLibrary.Method")
後者の記述は利用しないでください。
http://support.microsoft.com/kb/414599/ja

> %>
> Response.Write(objcomDataBean.intNum3)
スクリプトが、<%〜%>の外に書かれています。

それと上記の記述だと、
  Call Response.Write((objcomDataBean.intNum3))
という意味になってしまいます。この場合は
  Response.Write objcomDataBean.intNum3
あるいは
  Call Response.Write(objcomDataBean.intNum3)
と記述してください。


> 		private int mintNUM1;
> 		private int mintNUM2;
> 
mintNUM3 が抜けています。


> 		public int mtdReturn( property_DataBean prpDb)
> 		{
> 			 prpDb.intNUM3 = prpDb.intNUM1 + prpDb.intNUM2;
> 		}
return がありません。または、戻り値を void にすべきかと。

■No29592 (iSyouta さん) に返信
>>'Call objCom.mtdReturn(objComDataBean)
>>Call objCom.mtdReturn((objComDataBean))
> ２重括弧で値渡しとなるんですね。勉強不足でした。。。。
# 2 重括弧と表現してしまうと語弊があるかも。

括弧を付けるのは、「変数」を「式」に変えるためです。

たとえば、整数を参照渡しするメソッドがあったとして、
　Foo.ByRefMethod(a)
によって、変数 a の中身が書き換わる事はあっても、
　Foo.ByRefMethod(a + 1)
や
　Foo.ByRefMethod(123)
と指定した場合は、メソッド側で引数を書き換えたとしても、
数式 a + 1 や、リテラル 123 まで書き換わるわけではありません。

動作的には、値渡しというよりは C# 的でいうところの
　Foo.Method(ref x);
というコードを、
　work = (x);
　Foo.Method(ref work);
　// x = work;  //書き戻さない…
に修正した状態に近い状態になります。


おまけ。
http://support.microsoft.com/kb/197956/ja
http://support.microsoft.com/kb/243548/ja


>>> Response.Write(objcomDataBean.intNum3)
>>それと上記の記述だと、
> Call Response.Write((objcomDataBean.intNum3))
>>という意味になってしまいます。この場合は.....
> 処理の意味が変わってしまうという事でしょうか？？

元コードにあった括弧は、メソッド呼び出しの括弧を意味しているわけではありません。
非.NET な Visual Basic 系言語においては、
　『メソッドの呼び出しに括弧は使わない。括弧を付けたいなら Call を併用。』
という仕様になっています。

特に、複数の引数を持つメソッドの呼び出しにおいては、
　Foo.Method("aaa", "bbb", "ccc")
という記述にすると、そもそも文法違反となりますので、
　Foo.Method "aaa", "bbb", "ccc"
もしくは
　Call Foo.Method("aaa", "bbb", "ccc")
と記述する事が求められます。

今回は引数の数が 1 個だけだったので、それが「式」としての括弧として
扱われるため、文法的には　一応　通ってしまっていたというだけです。

ちなみに引数 0 個の場合は、というと、
　Call Foo     '…VB6 = ○, VBS = ○　'これでも一応OK
　Call Foo()   '…VB6 = ◎, VBS = ◎　'これが正しい
　Foo          '…VB6 = ◎, VBS = ◎　'これが正しい
　Foo()        '…VB6 = ×, VBS = ○
のように、VB6 と VBS とで文法判定が微妙に異なっていたりします。