将directoryinfo转换为字符串

Question

我正在开发一个提取目录名称的代码。 目标是将每个文件夹的最后2位数保存到数组中。 问题是无法将（直接）转换为字符串数组

我如何解决这个问题？

以下是我到目前为止的内容

Dim di As New IO.DirectoryInfo(path)
Dim a As Integer = Drs.Length
Dim Drs() As IO.DirectoryInfo = di.GetDirectories()
Dim Run As String()

                For n = 1 To a
                    Run = Mid(Drs(n), Len(Drs(n)) - 2, 2)
                Next

最好的问候

A

Answer 1

每个文件夹名称的最后两位数字或字符？如果是后者......

Dim Run As String() = Drs.Select(Function(d) d.Name.Substring(d.Name.Length - 2)).ToArray()

这显然因名称短于2个字符的目录而失败。