CoolBar 中的 icon(編號：31922)

我建了一個 imagelist
還有一個 coolbar , 內有兩個 band
imagelist 內有三個icon
Private Sub MDIForm_Load()
CoolBar1.Bands(1).Caption = "One"
　　CoolBar1.Bands(2).Caption = "Two"
　　CoolBar1.Bands(3).Caption = "Three"

Set CoolBar1.ImageList = ICOMenu

CoolBar1.Bands(1).Image = 1
End Sub
但不知為何顯示不了icon 在 coolbar 上
請前輩赐教!!