如何將小圖片放在組合框項目前面？

Question

我需要你一段時間來幫助我，我正在創建一個項目，我需要在組合框項目前面設置像32X32或16X16像素的小圖片。 在此先感謝。

Answer 1

此鏈接可以幫助你：http://www.codeproject.com/Articles/10670/Image-ComboBox-Control

編輯，這樣做在VB中，設置您的組合爲的OwnerDraw，然後：

protected Overrides Sub OnDrawItem(ByVal e As System.Windows.Forms.DrawItemEventArgs) 

    e.DrawBackground() 
    e.DrawFocusRectangle() 
    Dim item As New ComboBoxIconItem 
    Dim imageSize As New Size 
    imageSize = ListaImg1.ImageSize 
    Dim bounds As New Rectangle 
    bounds = e.Bounds 
    Try 
     item = Me.Items(e.Index) 
     If (item.ImageIndex <> -1) Then 
      Me.ImageList.Draw(e.Graphics, bounds.Left, _ 
       bounds.Top, item.ImageIndex) 
      e.Graphics.DrawString(item.Text, e.Font, _ 
       New SolidBrush(e.ForeColor), bounds.Left + _ 
       imageSize.Width, bounds.Top) 
     Else 
      e.Graphics.DrawString(item.Text, e.Font, _ 
       New SolidBrush(e.ForeColor), bounds.Left, _ 
       bounds.Top) 
     End If 
     Catch ex As Exception 
     If (e.Index <> -1) Then 
      e.Graphics.DrawString(Items(e.Index).ToString(), e.Font, _ 
       New SolidBrush(e.ForeColor), bounds.Left, bounds.Top) 
     Else 
      e.Graphics.DrawString(Text, e.Font, _ 
       New SolidBrush(e.ForeColor), bounds.Left, bounds.Top) 
     End If 
    End Try 
    MyBase.OnDrawItem(e) 
End Sub