I need to count a string how many times $i is in it

[kcd-clan 0]

I need to count a var for a string and see how many times its in it

like how many times | is in $function

like $function=1|2|3|4

and return the number of times| is in string

I know iv seen it befor i jsut cant rember it.

[SmOke_N 193]

I need to count a var for a string and see how many times its in it

like how many times | is in $function

like $function=1|2|3|4

and return the number of times| is in string

I know iv seen it befor i jsut cant rember it.

Look at StringSplit()

[MHz 71]

Use StringReplace and read @extended

$function = '1|2|3|4'
StringReplace($function, '|', '')
MsgBox(0, '', @extended)

[kcd-clan 0]

I need this to work?

and thanks mhz you achtoly help.

$list=StringSplit($list,'|')
    $lista=0
    $listb=0
    $i=0
    For $i=0 To 50 Step 1
    $listb=$listb+24
    If $list[$i] ="" Then ExitLoop
$a[1]=GUICtrlCreateLabel($list[$i],$lista,$listb,200,200)
    Next

Edited July 3, 2006 by kcd-clan

[SmOke_N 193]

I need this to work?

$list=StringSplit($list,'|')
    $lista=0
    $listb=0
    $i=0
    For $i=0 To 50 Step 1
    $listb=$listb+24
    If $list[$i] ="" Then ExitLoop
$a[1]=GUICtrlCreateLabel($list[$i],$lista,$listb,200,200)
    Next

With a request like that and an example like that, I'm sure you do need it to work.

[MHz 71]

Perhaps this might do

$list=StringSplit($list,'|')
    If Not @error Then
        Global $a[ $list[0] + 1]
        $lista = 0
        $listb = 0
        For $i = 1 To $list[0]
            $listb=$listb + 24
            $a[$i]=GUICtrlCreateLabel($list[$i], $lista, $listb, 200, 200)
        Next
    EndIf

Edit:

Changed For count to start from 1 rather then 0.

Edited July 3, 2006 by MHz

[kcd-clan 0]

I kinda figured that out cause i was like :/

[Xenobiologist 33]

Hi,

MsgBox(0,'Count',_StringCount('1|2|3|4', '|'))

Func _StringCount($sString, $vDelimeter, $iEntireString = 1)
    If Not StringInStr($sString, $vDelimeter) Then
        SetError(1)
        Return 0
    EndIf
    Return UBound(StringSplit($sString, $vDelimeter, $iEntireString)) - 2
EndFunc

So long,

Mega