首页 > 解决方案 > 使用计算机中的每个文件类型填充 ComboBox

问题描述

我想将计算机中的每个文件扩展名中的一个显示到组合框。我的编码如下。

Dim comboBox1 As New ComboBox()
    Dim caminho As String = "C:\Users\User1\Desktop\Test\"
    Dim dir As DirectoryInfo = New DirectoryInfo(caminho)
    Dim extensions as string = dir.GetFiles().[Select](Function(fi) fi.Extension).OrderBy(Function(ext) ext, StringComparer.CurrentCulture).Distinct(StringComparer.CurrentCultureIgnoreCase).ToArray()
    comboBox1.Items.AddRange(extensions)

我发现错误 Expression Expected 在Function 为什么我收到该错误附近。

我正在使用 VB2005 并且我还添加了 System.Collections 命名空间。

标签: vb.net

解决方案


推荐阅读