Filling Arrays dyanmically

[srinivas]

Hi Ankur , First let me thank u for maintaining such a helpful forum.
iam facing a problem with dynamic arrays
i wanna fill a array at run time
here ismy code

Code:

x=JavaWindow("Legal ").JavaList("Role(s)").GetROProperty("items count")

For i=0 to x-1
    rolei=javawindow("Legal ").JavaList("Role(s)").GetItem(i)
    msgbox i
[size=x-large]calypsoarray(i)=rolei[/size]
   msgbox rolei

Next

its giving me a type mismatch error

[somisays]

Dear Srinivas,

May i know why you are using x-1 ?

Use i = 0 to x and try...

[Rekha]

Dear Mr.Sridhar,

If 0 to x is taken, index will be beyond the range by 1 and may show an subscript error? is it not?

Rekha

[somisays]

Hi,
I think you forgot to declare array...

Dim calypsoarray(10)

You can choose the size depending upon the requirement..

[srinivas]

Hi i need an array dynamic , i dont want to mention the array size
array size should be dynamic by that i can fill the array with n number of elements

thanking you both rekha and somiyasis


Srinu

[somisays]

Dear Srinivas,

Please see the modified code using Dynamic Array...

Code:

Dim calypsoarray()

x=JavaWindow("Legal ").JavaList("Role(s)").GetROProperty("items count")

For i=0 to x-1
             Redim calypsoarray(x)
    rolei=javawindow("Legal ").JavaList("Role(s)").GetItem(i)
    msgbox i
[size=x-large]calypsoarray(i)=rolei[/size]
   msgbox rolei

Next

For Dynamic arrays you have to specify the size by using the Redim statement .


Hope this helps..

[srinivas]

Hi somisays

It worked ,the solution is cool

Thank u man