split-problem[solved]

[vigge89]

i have the following code in one of my projects:

bg_dim() = Split(ReadINI("dimensions", "bg", skin), ",")
    frmMain.Width = bg_dim(0)
    frmMain.Height = bg_dim(1)

The thing is that something's making the function quit after the Split()-line, nothing below gets executed. Can anyone find something worng in the code?

[Buzby]

1. Have you tried stepping through the code in debug mode?

2. Try splitting the line out:

Dim tmpStr As String
tmpStr = ReadINI("dimensions", "bg", skin)
bg_dim() = Split(tmpStr, ",")

to see which part is causing the problem. It may be because the ReadINI is returning a NULL or something like that.

[vigge89]

tested this code:

Dim tmpStr As String
    tmpStr = ReadINI("dimensions", "bg", skin)
            MsgBox "BG-dimensions: '" & tmpStr & "'"
    bg_dim() = Split(tmpStr, ",")
        If bg_dim(0) = Null Then MsgBox "bg_dim(0) = NULL!"
        If bg_dim(1) = Null Then MsgBox "bg_dim(1) = NULL!"
    MsgBox "Split succeded!"
    frmMain.Width = bg_dim(0)
    frmMain.Height = bg_dim(1)

tmpStr gets loaded succesfully, returning "220,25", however, no messagebox containing "Split succeded" popped up, the code after doesn't get executed, it jumps straight out of the function, and i don't have any Error handling, so there aren't any errors.

[vigge89]

hmm, found a "On Error Resume Next" in the sub that executes that code, if i take it away, i get Type Missmatch on the line containing

bg_dim() = Split(tmpStr, ",")

anyone got a solution?

[vigge89]

found a solution, nevermind...