Jabaco Source

import VBA.*;

public class JabacoArrayTest {

  public static void main(String[] args) {

    int x,y;
    long myTime;

    for (int i=0; i<=5; i++) {

      myTime = System.currentTimeMillis();
      // initialize Java-Array
      int javaArrayInt[][] = new int[2000][3000];

      // fill Java-Array
      for (y=0; y<=2999; y++) {
        for (x=0; x<=1999; x++) {
          javaArrayInt[x][y] = x+y;
        }
      }
      System.out.println( i + ". turn with Java Array  : " + (System.currentTimeMillis() - myTime) ); // time in milliseconds, the Java Array needs


      try {
        myTime = System.currentTimeMillis();
        // initialize Jabaco-Array
        VBArrayInteger jabacoArrayInt = new VBArray();
        jabacoArrayInt.setBound(0, 2999, false);
        jabacoArrayInt.addDimension(0, 1999, false);

        // fill Jabaco-Array
        for (y=0; y<=2999; y++) {
          for (x=0; x<=1999; x++) {
             jabacoArrayInt.getFromDimension(y).setValueInt(x, x+y);
           }
        }
        System.out.println( i + ". turn with Jabaco Array: " + (System.currentTimeMillis() - myTime) ); // time in milliseconds, the Jabaco Array needs
      } catch (Exception e) {
        System.out.println(e);
      }

      System.out.println();

    }

  }

}