STRING ARGUMENTS HELP!!

Ask for help

Moderators: Murderator+, Murderator

Post Reply
xinxilas
Posts: 78
Joined: 2009-03-10 09:43:01

STRING ARGUMENTS HELP!!

Post by xinxilas »

Hellooooo!

123,456,789

How can i get the valour of the "FISRT,SECOND" (123456) arguments and "THIRD" (789) argument

tile = 123,456,789
i want:
fs = 123456
t = 789

Thanks to all!
Beyonder
Expert!
Posts: 388
Joined: 2005-04-23 10:19:43
Contact:

Re: STRING ARGUMENTS HELP!!

Post by Beyonder »

Something like this:

Code: Select all

sub test()
	var string="123,456,789"
	dim resArray[3]
	Split(string,",",resArray)
	var a = resArray[0]+resArray[1]
	var b = resArray[2]
endsub

Sub Split(string,delim,sArray)
	var LastAdd = 1
	var tempString = "";
	var i

	for i = 0 to Len(string)
	   If not string[i] == delim then
		  tempString = tempString + string[i]
	   End if
	   If string[i] == delim or Len(string) == i then
		  If not tempString == "" then
			 sArray[LastAdd] = tempString
			 tempString = "";
			 LastAdd = LastAdd + 1
		  End if
	   End if	   
	next
	sArray[0] = LastAdd - 1
	return sArray
End sub
Post Reply