realmente de esto no se mucho jejeje
una pregunta... que hace esta linea?
ahora el error creo que es esta linea
For i = 0 To Len(List(i))
lstAwards.AddItem List(i), i
Next
estás leyendo el largo de list(i)
asumiendo que i es 0 originalmente, List(i) contendrá hasta donde creo "0" que tiene 1 de largo (creo que vb no cuenta el fin de cadena)... así que al evaluar sería de 0 a 1...
si ese es el error te recomiendo dormir unos 90 minutos, levantarte con un café y continuar