Minha aplicação tem o seguinte código de inicio:
BuscaDiretorioPastaOriginal("Diretorio") // isso seria uma função **recursiva** de diretorios
BuscaDiretorioPastaPath("Diretorio") // isso seria uma função **recursiva** de diretorios
Esta função lista em duas listBox
, ate ai tudo blz, mas suje o erro nesta função
Private Sub AnalisarNovoArquivo()
CTN.LSTNewAqui.Items.Add(CTN.LSTOG.SelectedItem.ToString)
CTN.LSTOG.Items.Remove(CTN.LSTOG.SelectedItem.ToString)
CTN.LSTNewAqui.SelectedIndex = 0
ListaArray(0) = CTN.LSTNewAqui.SelectedItem.ToString 'Adiciona ao Index 0 na lista de array
end sub
Esta parte da função acusa que o valor não é valido para selectedIndex
, o motivo seria pela parte de cima ai aonde tem CTN.Items.Remove(CTN.LSTOG.SelectedItem.ToString)
.
OBS: a função funciona corretamente se usada um Try
, mas como retorna esse erro?
Função que acusa o erro:
Try
For ItemsI = 0 To CTN.LSTOG.Items.Count - 1
CTN.LSTOG.SelectedIndex = ItemsI
CTN.LSTPath.SelectedIndex = ItemsI
If CTN.LSTOG.SelectedItem.ToString <> CTN.LSTPath.SelectedItem.ToString Then
Notificar("Existem novos arquivos a serem adicionados ao projeto.")
AnalisarNovoArquivo()
IniciarBuscaDeNovoArquivo()
SplitCaminho()
rem VerificarDiretorios()
CopiarNovoArquivo()
End If
Next
Catch ex As Exception
End Try
Try
, você esconde o erro com ele. Jamais UseCatch
sem fazer nada dentro dele. E só faça algo útil, algo que resolva o problema ou dê informações que ajudem resolver o problema. Caso contrário ele só prejudica. E quase sempre capturar umaException
é outro erro porque são raros os casos que que dá para fazer algo útil com uma exceção tão genérica. Para aprender sobre exceções comece (mas não pare neste post, siga os links) lendo essa resposta: pt.stackoverflow.com/questions/30124