String Parsing Question? [resolved]

Howdy all!

I'm trying to get some commands from a seperate application that i wrote. Here's the string i need to parse

LRK::5.5.5.5::KIF::VERS::GET

where the "::" are the seperators. Ok, i'm doing a Split command

temp_string = Split(Text1.Text, "::")

So now temp_string is an array. Now, my question is, is there a way to creat a function or something in a module that will split that up? is it possible to pass arrays in VB? don't think i've ever done it before...

if you need more detail just ask.. thanks!!

VB Code:

Private Sub Form_Load()
    
    Dim AnArray() As String
    Const A_STRING = "LRK::5.5.5.5::KIF::VERS::GET"
    AnArray = SplitString(A_STRING)
    
End Sub
 
Public Function SplitString(strInput As String) As String()
 
    SplitString = Split(strInput, "::")
 
End Function

You could generalize the function some more by passing the separator character.

You can pass arrays just fine, your argument in the sub/function declaration just is myArr() as string instead of myStr as string.

Thanks guys, I ended up doing this

VB Code:

Function SplitCmdStr(strCmdStr As String) As Variant
 
    If Len(strCmdStr) > 0 And InStr(strCmdStr, "::") > 0 Then
        SplitCmdStr = Split(strCmdStr, "::")
    Else
        SplitCmdStr = Empty
    End If
    
End Function

Works all good for me! :)

Why are you returning a variant? It would be better to return a String array as in my example. Also why set the return value to empty when there's nothing to split? I would think you'd want to return the input.