Case statement to Loop

[CoachBarker]

This is the last item I need for my internship project before I am done. I need to somehow change this case statement into a loop that points to the folder that is displayed in the picture. I thought the way I did it in case 0 was correct from what I have read in the forums, but it doesn't work. The original path was from the C drive, but now the folder is included with the app.

Private Sub cbowmv9profile_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbowmv9profile.SelectedIndexChanged
        Select Case cbowmv9profile.SelectedIndex
            Case 0
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = (Application.StartupPath & "\Profiles\Orange_Cast_Custom_Profile.prx")
            Case 1
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = "C:\Program Files\VideoCap Pro ActiveX Control\Profiles\Window_Media_VideoAudio_9_for_1024x768.prx"
            Case 2
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = "C:\Program Files\VideoCap Pro ActiveX Control\Profiles\Window_Media_VideoAudio_9_for_1280x1024.prx"
            Case 3
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = "C:\Program Files\VideoCap Pro ActiveX Control\Profiles\Window_Media_VideoAudio_9_for_320x240.prx"
            Case 4
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = "C:\Program Files\VideoCap Pro ActiveX Control\Profiles\Window_Media_VideoAudio_9_for_640x480.prx"
            Case 5
                frmMain.AddVideo.AxVideoCap1.WMVCustomFileName = "C:\Program Files\VideoCap Pro ActiveX Control\Profiles\Window_Media_VideoAudio_9_for_800x600.prx"
        End Select
    End Sub

Any help would be greatly appreciated, both by me and my employer

Thanks
CoachBarker

 

[cjard]

ps; one liner AND it closes hte file handle when its done. Yours doesnt

 

[CoachBarker]

Again thank you for all your help. I've got one week left on my internship and unless they come up with any more changes the app is done. I won't be around for the big deployment, but then If it blows up I won't be there to take the heat

I will keep plugging away at learning and implementing 2.0, if I am lucky where I am going to school will wise up and start teaching it and I can go back and grab a class.

Thanks again
CoachBarker