You are not logged in.

Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

niranjan

Beginner

  • "niranjan" started this thread

Posts: 2

Date of registration: Sep 8th 2010

  • Send private message

1

Wednesday, September 22nd 2010, 6:56pm

paramarray & array are not working in jabaco

Hi!!
Very recently i started using jabaco.Initially i felt jabaco is the best ide. Now i have problems with the built-in functions and sub-routines such as array(), paramarray etc.,,
Can some body help me.. :(
Kindly go through the following code snippet

Public Sub command1_Click()
Dim v, x%
v = Array(1.5,2.5,3.5)
Print "Now the values of the array are:";
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2);
Next
Print
v = Array(45, 34, 87, 56, 21)
Print "Now the values of the array are:";
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2);
Next
Print
v = Array("nir", "anjan", "tejas", "babji")
Print "Now the values of the array are:";
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2);
Next
Print
End Sub

OlimilO

Intermediate

  • "OlimilO" is male

Posts: 277

Date of registration: Jan 18th 2009

Location: Germany

Occupation: software engineer

  • Send private message

2

Thursday, September 23rd 2010, 2:05am

Hi,

Yes, Jabaco has some problems with this VB-kind of code, let's have a look at every single detail:

Jabaco does have the datatype Variant and it works pretty good even for Arrays!

Datatype Variant with array inside and initialisation with function Array:

(VB-Code) instead of

Jabaco Source

 
1

Dim v(): v() = Array(1, 2, 3)

(Jabaco-Code) just use

Jabaco Source

 
1

Dim v() = (1, 2, 3)


once initialised you can not redefine it again (like u could do in VB), because the initialisation and the definition of the array variable in Jabaco is coupled together in one line, but you can of course use a second array variable and assign it:

(VB-Code) instead of

Jabaco Source

 
1
2
3
4

Dim v()
v() = Array(1, 2, 3)
v() = Array("A", "B", "C")
Debug.Print v(0)

(Jabaco-Code) you could use

Jabaco Source

 
1
2
3
4

Dim v() = (1, 2, 3)
Dim v2() = ("A", "B", "C")
v = v2
Debug.Print v(0)


The Print-Command:

There is a Sub in the Form class called Print that takes a String and draws it onto the Form. But there is no possibility for the syntax with the ";"-char after the Print-Command, ( ; means let the next string begin after the old position in the old line)

the following code should work:

Jabaco Source

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

Public Sub Command1_Click()
Dim v() = (1.5, 2.5, 3.5)
Dim x%
Print "Now the values of the array are:",
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2)
Next
Print ""
Dim v2() = (45, 34, 87, 56, 21)
v = v2
Print "Now the values of the array are:"
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2)
Next
Print ""
Dim v3() = ("nir", "anjan", "tejas", "babji")
v = v3
Print "Now the values of the array are:"
For x = LBound(v) To UBound(v)
Print v(x) & Space$(2)
Next
Print ""
End Sub




regards

OlimilO

Similar threads

Rate this thread
WoltLab Burning Board