组合框：提供所显示的文件类型。 Private Sub Form Load() Item="所有文件(*.*)” Combo1.AddItem Item +Space(20-Len(Item))+"*.*" Item="窗体文件(*.fim)" Combo1.AddItem Item+Space(20-Len(Item))+"*.frm" Item="位图文件(*.bmp)" Combol.AddItem Item+Space(20-Len(Item))+"*.bmp" Combol.ListIndex =2 End Sub 11 11 Private Sub Form_Load() Item = "所有文件(*.*)" Combo1.AddItem Item + Space(20 - Len(Item)) + "*.*" Item = "窗体文件(*.frm)" Combo1.AddItem Item + Space(20 - Len(Item)) + "*.frm" Item = "位图文件(*.bmp)" Combo1.AddItem Item + Space(20 - Len(Item)) + "*.bmp" Combo1.ListIndex = 2 End Sub 组合框：提供所显示的文件类型