绘制弹出菜单项的值为不可用,请教高手,谢谢!!!
Dim ContextMenunew As ContextMenu = New ContextMenuContextMenunew.MenuItems.Clear()Dim myMenuItem1 As New MenuItem()Dim myMenuItem2 As New MenuItem()myMenuItem1 = New MenuItem()myMenuItem1.Text = "添加"ContextMenunew.MenuItems.Add(myMenuItem1)AddHandler (myMenuItem1.Click), AddressOf MenuClickmyMenuItem2 = New MenuItem()myMenuItem2.Text = "删除"ContextMenunew.MenuItems.Add(myMenuItem2)AddHandler (myMenuItem2.Click), AddressOf MenuClick