将子文件夹名称按相反的顺序添加到 Combobox

问：

我有遍历文件夹并将所有文件夹名称添加到组合框的代码。

Dim fsoFile As FileSystemObject: Set fsoFile = New FileSystemObject
Dim fldFile As Object: Set fldFile = fsoFile.GetFolder(NonRPARenewalPath)
    
Dim subFolder As Object: For Each subFolder In fldFile.SubFolders
    Me.cobFolderDate.AddItem subFolder.Name
Next subFolder

该代码运行良好，但现在我想改进它。我希望以相反的顺序添加文件夹（因为它们被命名为上传日期，例如 20231103），我只需要最新的 20 个文件夹。我可以弄清楚如何将其限制为最后 20 个子文件夹以及如何进行反向循环，但是如何将子文件夹名称添加到组合框中。这是我尝试过的：

Dim i As Integer: For i = UBound(fldFile.SubFolders) To (UBound(fldFile.SubFolders) - 20) Step -1
    Me.cobFolderDate.AddItem fldFile.subFolder(1).Name
Next i