리스트에서 다음 곡이 건너뛰는 문제

```vb
On Error Resume Next
List1.ListIndex = List1.ListIndex + 1
WMP.URL = List2.Text
If List1.ListIndex = List1.ListCount - 1 Then
List1.ListIndex = 0
End If
```
재생 목록과 파일 경로는 준비했고, 각각 List1과 List2에 넣어 테스트도 했어요.
그런데 다음 곡 버튼을 눌러 순서대로 재생하려고 하면 네 번째 곡에서 다음 버튼을 눌렀을 때 다섯 번째 곡을 건너뛰어요.
어디가 문제일까요?