Excel VBA - UserForm ListBox未填充

Question

I have a listbox added to a userform. When I set a property, add an item, etc. via code, nothing appears in the listbox. I don't get an error, the listbox just remains blank. Here's a snippet. I reviewed the listbox properties and Enabled and Visible are true, Locked is false.

Private Sub Refresh_Click()
ListBox1.Clear
Dim wb As Workbook
UserForm1.ListBox1.BackColor = RGB(5, 5, 5) 'threw this in for testing; box not changed
For Each wb In Workbooks
   MsgBox wb.Name
   ListBox1.AddItem wb.Name 
   'this is what I'm trying to accomplish; 
   'wb.Name shows in the MsgBox but not in the listbox
Next wb
End Sub

Answer 1

代码没有错误并且有效，但我必须更改列表框的前景才能看到该项目