在 Visual Basic 中将数组元素转换为字符串

Question

我用 Visual basic 编写了这段代码：

    Dim directory As String = Application.StartupPath()
    Dim dirinfo As New DirectoryInfo(directory)
    Dim filesnatt As String() = dirinfo.GetFiles("*.nat")
    Dim filenatt As String
    For Each filenatt In filesnatt
        Dim filenat As String = Str(filenatt)
        Using re As StreamReader = New StreamReader(filenat)
            Dim val As String = re.ReadLine()
            If val.Contains(TextBox2.Text) Then
                Dim a1 As String = filenat
                a1 = a1.Remove(".nat")
                ComboBox2.Items.Add(a1)
            End If
        End Using
    Next

但我收到此错误：“1 - System.IO.FileInfo 的维数组”的值无法转换为“1 - 字符串的维数组”，因为“System.IO.FileInfo”不是从“String”派生的.

如何解决？

Answer 1

那是因为 GetFiles 返回 FileInfo 而不是 String 更改

Dim filesnatt as String() to Dim filesnatt as FileInfo()

和

Dim filenatt as String to Dim filenatt as FileInfo

并在For Each 循环中使用

Dim filenat as String = filenatt.FullName