type mismatch ved oprettelse af dynamiske control array

jeg prøver at opbygge et controlarray sådan her


    For i = 1 To frmMain.txtThreads.Text
   
        Load (frmMain.mainSock(i))
       
        Load (frmMain.strTimer(i))
       
        Load (frmMain.timeoutTimer(i))
   
    Next i

alle 3 har en kontrol indsat på min form med 0 som index

når jeg kører mit program får jeg type mismatch error

nogen der kan se hvad der er galt?