[VB6] ListBox restituzione valori

[oregon]

Qualcosa del genere

    Dim i As Integer
    Dim v() As String
    Dim r1 As Integer
    Dim r2 As Integer
    
    For i = 0 To List1.ListCount - 1
        v = Split(List1.List(i), " ")
        r1 = Val(v(1))
        r2 = Val(v(2))
        Print r1, r2, r1 + r2
    Next i