我 建了一個 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 上
請前輩赐教!!

全站熱搜

vbqa 發表在 痞客邦 留言(1) 人氣()