CM = Control.ContextMenu
 
' Mein eigenes MenuItem
CMI = New System.Windows.Forms.MenuItem
CMI.OwnerDraw = True
CMI.Text = "Test"
 
' Ein schon bestehendes MenuItem
CMI2 = CM.MenuItems(0)
 
 
' Handler
AddHandler CMI.MeasureItem, AddressOf MeasureMenuItem
AddHandler CMI.DrawItem, AddressOf DrawMenuItem
 
 
' Und die Subs
Private Sub MeasureMenuItem(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.MeasureItemEventArgs)
 
' Im Prinzip muss hier sowas hin
' RaiseEvent CMI2.MeasureItem(sender,e)
' Aber das funzt nicht
 
End Sub
 
Private Sub DrawMenuItem(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.DrawItemEventArgs)
 
' Im Prinzip muss hier sowas hin
' RaiseEvent CMI2.DrawItem(sender,e)
' Aber das funzt nicht
 
End Sub