组合框随设置变换列表项？该如何解决

组合框随设置变换列表项？
我想实现如下功能：
两个组合框，一个显示类别，一个显示商品名称，当选择第一个框的类别后，第二个组合框能显示出属于该类别的所有商品名称，请问应该怎么实现？谢谢！

[解决办法]
从我的测试程序上拷过来时还丢几句:

Private Sub Form_Load()
Combo1.AddItem "电器"
Combo1.AddItem "纺织品"
Combo1.AddItem "日用品"
End Sub