Interstage Application Server アプリケーション作成ガイド （CORBAサービス編）

J.1.5.4 配列

　配列は、Visual Basicの配列を使用します。ただし、配列が構造体、共用体、any型、オブジェクト、TypeCodeの場合には、CreateType関数またはCreateTypeById関数でインスタンスを作成し、その結果をObject型変数に格納します。配列のVisual Basicでの使用例を以下に示します。

IDL言語

  typedef long a[4][5]; 
  interface example8 {
     typedef struct STR {
         long a,b; 
     } Foo; 
     typedef Foo FooArr[3][4]; 
     ... 
  } ; 

Visual Basic

  Dim a(4,3) As long
  Dim FooArr(3,2) As Object 
  Dim factory As Object 
  Dim obj As Object 

  a(0,0) = 100
  a(1,0) = 101
  ... 
  a(4,3) = 119

  Set factory = CreateObject("CORBA.Factory") 
  Set obj = factory.GetObject("example8") 
  FooArr(0,0) = factory.CreateType(obj, "Foo")
  FooArr(1,0) = factory.CreateType(obj, "Foo")
  ...