本文整理匯總了VB.NET中System.Windows.Forms.Control.ContextMenuStrip屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET Control.ContextMenuStrip屬性的具體用法?VB.NET Control.ContextMenuStrip怎麽用?VB.NET Control.ContextMenuStrip使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。
在下文中一共展示了Control.ContextMenuStrip屬性的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Form1
' 導入命名空間
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Text
Imports System.Windows.Forms
Public Class Form1
Inherits Form
Private contextMenuStrip1 As ContextMenuStrip
Private toolStripMenuItem1 As ToolStripMenuItem
Private toolStripMenuItem2 As ToolStripMenuItem
Private toolStripMenuItem3 As ToolStripMenuItem
Private components As IContainer
Public Sub New()
InitializeComponent()
End Sub
<STAThread()> _
Shared Sub Main()
Application.EnableVisualStyles()
Application.SetCompatibleTextRenderingDefault(False)
Application.Run(New Form1())
End Sub
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Me.contextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.toolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.toolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
Me.toolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
Me.contextMenuStrip1.SuspendLayout()
Me.SuspendLayout()
'
' contextMenuStrip1
'
Me.contextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStripMenuItem1, Me.toolStripMenuItem2, Me.toolStripMenuItem3})
Me.contextMenuStrip1.Name = "contextMenuStrip1"
Me.contextMenuStrip1.Size = New System.Drawing.Size(180, 70)
'
' toolStripMenuItem1
'
Me.toolStripMenuItem1.Name = "toolStripMenuItem1"
Me.toolStripMenuItem1.Size = New System.Drawing.Size(179, 22)
Me.toolStripMenuItem1.Text = "toolStripMenuItem1"
'
' toolStripMenuItem2
'
Me.toolStripMenuItem2.Name = "toolStripMenuItem2"
Me.toolStripMenuItem2.Size = New System.Drawing.Size(179, 22)
Me.toolStripMenuItem2.Text = "toolStripMenuItem2"
'
' toolStripMenuItem3
'
Me.toolStripMenuItem3.Name = "toolStripMenuItem3"
Me.toolStripMenuItem3.Size = New System.Drawing.Size(179, 22)
Me.toolStripMenuItem3.Text = "toolStripMenuItem3"
'
' Form1
'
Me.ClientSize = New System.Drawing.Size(292, 273)
Me.ContextMenuStrip = Me.contextMenuStrip1
Me.Name = "Form1"
Me.contextMenuStrip1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
End Class