Ошибка возникает из-за того, что вы пытаетесь преобразовать что-то в целое число, которое не может быть преобразовано, поэтому возникает исключение.
Существует два подхода, которые можно использовать для решения этой проблемы:
1) Оберните все это в блок try / catch
Dim sReaderList As String
sReaderList = New System.String(vbNullChar, 1024)
Try
Dim x As Integer = Convert.ToInt32(sReaderList)
Catch ex As Exception
End Try
2) используйте метод Tryparse
Dim i As Integer
Dim s As String = String.Empty
Dim result As Boolean
result = Integer.TryParse(s, i)
If (result) Then
'Code here
End If