将目录信息转换为字符串

Convert the directoryinfo into string

我正在开发提取目录名称的代码。 objective是将每个文件夹的最后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

此致

一个

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

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

对于名称短于 2 个字符的目录,这显然会失败。