Feedback

VB - Füllen von Comboboxen aus einem Textfile

Veröffentlicht von am 04.05.2011
(0 Bewertungen)
Mit Hilfe dieser Subroutine werden Comboboxen mit dem Inhalt externer Textdateien gefüllt
Imports System.IO

Module modFillCombos

    Public Sub FillCombos(ByVal cmbBox As ComboBox, ByVal ConfigFile As String)

        Dim StmReader As StreamReader = File.OpenText(ConfigFile)

        While (StmReader.Peek() <> -1)
            cmbBox.Items.Add(StmReader.ReadLine())
        End While

        StmReader.Close()

        cmbBox.SelectedIndex = 0


    End Sub

End Module
Abgelegt unter ComboBox, Form.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!