Question

我有一行文字A; B; C; D;在文本文件中。我想要实现的是填充组合框，使其如下所示一个乙 C d

使用; char作为定义新组合框条目的方法。

它可以与以下代码结合使用...

        For Each line As String In IO.File.ReadAllLines("C:\TEST.txt")
        If line.StartsWith("+dep+") Then
            ComboBox1.Text = line.Substring(5)
        End If

从具有多种存储数据的文件中选择一个标签（在这种情况下是+ dep +标签并使用它来填充组合框）...

剂量anyboy知道怎么样？

我正在使用vb.net

Answer 1

所以你想在<dep>之后收听文字并将其拆分为;？然后用所有部分包装一个组合框：

Dim lineParts = From line In File.ReadLines(path)
                Let depIndex = line.IndexOf("<dep>")
                Where depIndex >= 0
                Select line.Substring(depIndex + 5).Split({";"c}, StringSplitOptions.RemoveEmptyEntries)
Dim allParts = lineParts.SelectMany(Function(p) p)
Dim bs = new BindingSource()
bs.DataSource = allParts 
ComboBox1.DataSource = bs

如果您只想添加唯一商品，则只需添加Distinct：

Dim allParts = lineParts.SelectMany(Function(p) p).Distinct()

使用单行文本文件中的项目填充组合框

1 个答案: