窗体加载时，给复合框控件加项的代码

求助窗体加载时，给复合框控件加项的代码？
相当于VBA的
Private Sub UserForm_Initialize()
   ListBox1_源后缀.AddItem ".avi"
   ListBox1_源后缀.AddItem ".asf"
   ListBox1_源后缀.AddItem ".divx"
End Sub
谢谢！
[解决办法]
lz不是已经写出来了?