A Woozie Moment.

[Senoska]

Oh my god, I can't believe I can't figure this out. I have an array that I need to read two values right next to each other via a loop.

How do I do this?

so this is my problem in stupid terms:

I have something that is adding 1 every time it loops, and it needs to add the value directly next to it.

ex:

    For i = 0 To UBound(strCommand)
        MsgBox strCommand(i) & " :: " & strCommand(i + 1)
    Next i

So this obviously wont work because it would go 1-2, 2-3, etc. I need it to go 1-2, 3-4, 5-6

how I do dis.

fuck you because I know I've done this before but I'm totally brain farting and all that jazz.

[Shiroikage]

don't be a pedofag

[#686578]

Oh well nevermind then

[Senoska]

tried that numbers,
its not working though

    Replaced = Replace(strInput, "-", ";")
    strCommand = Split(Replaced, ";")
    
    For i = 0 To UBound(strCommand)
        str1 = strCommand(i)
        For j = 0 To UBound(strCommand) Step 2
            str2 = strCommand(j)
        Next j
        MsgBox str1 & " :: " & str2
    Next i

[Senoska]

Wait, you cant loop inside a loop D: HOW DO I DO DIS

[Blarg]

Do that thing where you add the characters to the code that makes it work.

[Senoska]

tell me char

[Senoska]

    Replaced = Replace(strInput, "-", ";")
    strCommand = Split(Replaced, ";")
    
    For i = 0 To UBound(strCommand) Step 2
        str1 = strCommand(i)
        j = i + 1
        str2 = strCommand(j)
        MsgBox str1 & " :: " & str2
    Next i

Fucking simple shit becoming hard is retarded.

[Senoska]

Non shit version of that...

Function InsertNewData(strInput As String, strTable As String)
Dim strCommand() As String
Dim Replaced As String
Dim i As Long

    Replaced = Replace(strInput, "-", ";")
    strCommand = Split(Replaced, ";")
    
    For i = 0 To UBound(strCommand) Step 2
        MsgBox strCommand(i) & " :: " & strCommand(i + 1)
    Next i
end function

just in debugging but its going to make shit a lot easier.