C# / VB.NET - Lettura di un file di configurazione in vb.net

Prego !

Piccolo problemino, se non vado a toccare la risoluzione del programma, e la lascio invariata, il programma non scrive la prima linea

EDIT: Risolto inserendo questo source per ogni If nella pagina di Load_Form

Form5.ComboBox1.SelectedIndex = x

Dove X il numero corrispondente del combobox

ma che c'entra la risoluzione del programma?

La risoluzione c'entrava nelle opzioni delle If, era il problema che mi si poneva.
Ho inserito la lettura del file settings sia nell'avvio del form sia nell'avvio del form5, in questo modo non ho più problemi

Si, ma il codice può essere migliorato moltissimo. Tanto per fare un esempio, il primo ingombrante costrutto IF può essere sostituito da:

IO.File.WriteAllText("C:\MyLittlePlayer\settings.inf", combobox1.selectedindex.tostring & vbCrLf) 

Un'altro problema. Praticamente ho implementato un lettore di links che mi riproducono un determinato indirizzo su un controllo webbrowser, c'è solo 1 problema, la 1 volta che si apre il programma va, la seconda lo schermo resta nero.
Allego il source

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim S As New IO.StreamReader("C:\MyLittlePlayer\links.inf")
        Dim links(10) As String
        For Y As Byte = 0 To 10
            links(Y) = S.ReadLine
        Next Y
        If ComboBox1.SelectedIndex = 0 Then
            WebBrowser1.Navigate(links(0))

        ElseIf ComboBox1.SelectedIndex = 1 Then
            WebBrowser1.Navigate(links(1))

        ElseIf ComboBox1.SelectedIndex = 2 Then
            WebBrowser1.Navigate(links(2))

        ElseIf ComboBox1.SelectedIndex = 3 Then
            WebBrowser1.Navigate(links(3))

        ElseIf ComboBox1.SelectedIndex = 4 Then
            WebBrowser1.Navigate(links(4))

        ElseIf ComboBox1.SelectedIndex = 5 Then
            WebBrowser1.Navigate(links(5))

        ElseIf ComboBox1.SelectedIndex = 6 Then
            WebBrowser1.Navigate(links(6))

        ElseIf ComboBox1.SelectedIndex = 7 Then
            WebBrowser1.Navigate(links(7))

        ElseIf ComboBox1.SelectedIndex = 8 Then
            WebBrowser1.Navigate(links(8))

        ElseIf ComboBox1.SelectedIndex = 9 Then
            WebBrowser1.Navigate(links(9))

        ElseIf ComboBox1.SelectedIndex = 10 Then
            WebBrowser1.Navigate(links(10))

        End If
        S.Close()
    End Sub

dovresti postare un altro topic per questa domanda

Beh il problema è sempre la lettura