用ParamArray接收任意个参数

核心提示：->PublicSubFillList(ListControlAsListBox,ParamArrayItems())DimiAsVariantWithListControl.ClearForEachiInItems.AddItemiNextEndWithEndSubPRivateSubCommand1_Click()

->PublicSubFillList(ListControlAsListBox,ParamArrayItems())
DimiAsVariant
WithListControl
.Clear
ForEachiInItems
.AddItemi
Next
EndWith
EndSub

PRivateSubCommand1_Click()
FillListList1,"TiffanyT","MikeS","RochesterNY"
EndSub->->