在Visual Basic中，彈出菜單通常是通過`ContextMenuStrip`控件實(shí)現(xiàn)的。以下是一個(gè)簡單的例子，展示如何在VB.NET WinForms應(yīng)用程序中創(chuàng)建并顯示一個(gè)彈出菜單。

你需要在你的窗體上添加一個(gè)`ContextMenuStrip`控件。這可以通過在設(shè)計(jì)視圖中直接拖放控件來實(shí)現(xiàn)，或者通過代碼創(chuàng)建。

以下是如何通過代碼創(chuàng)建和顯示彈出菜單的步驟：

1. 在你的窗體代碼中添加對(duì)`ContextMenuStrip`的引用。

```vb

Public Class MainForm

Private WithEvents contextMenuStrip1 As ContextMenuStrip

Private WithEvents menuItem1 As ToolStripMenuItem

Private WithEvents menuItem2 As ToolStripMenuItem

Public Sub New()

' 此調(diào)用是設(shè)計(jì)器所必需的。

InitializeComponent()

' 在此之下添加任何初始化。

InitializeContextMenu()

End Sub

Private Sub InitializeContextMenu()

' 創(chuàng)建菜單項(xiàng)

menuItem1 = New ToolStripMenuItem("Item 1")

menuItem2 = New ToolStripMenuItem("Item 2")

' 將菜單項(xiàng)添加到上下文菜單

contextMenuStrip1 = New ContextMenuStrip()

contextMenuStrip1.Items.Add(menuItem1)

contextMenuStrip1.Items.Add(menuItem2)

' 綁定上下文菜單到窗體或控件

' 例如，將上下文菜單綁定到某個(gè)按鈕的 ContextMenuStrip 屬性

' myButton.ContextMenuStrip = contextMenuStrip1

End Sub

' 當(dāng)菜單項(xiàng)被點(diǎn)擊時(shí)觸發(fā)的處理程序

Private Sub menuItem1_Click(sender As Object, e As EventArgs) Handles menuItem1.Click

MessageBox.Show("Item 1 clicked!")

End Sub

Private Sub menuItem2_Click(sender As Object, e As EventArgs) Handles menuItem2.Click

MessageBox.Show("Item 2 clicked!")

End Sub

End Class

```

在上面的代碼中，我們創(chuàng)建了一個(gè)名為`MainForm`的窗體類，其中包含一個(gè)`ContextMenuStrip`控件和兩個(gè)`ToolStripMenuItem`對(duì)象。我們通過`InitializeContextMenu`方法初始化上下文菜單，并將其綁定到窗體上的一個(gè)按鈕。當(dāng)用戶右鍵點(diǎn)擊按鈕并選擇菜單項(xiàng)時(shí)，相應(yīng)的點(diǎn)擊事件處理程序會(huì)被觸發(fā)。

要顯示這個(gè)彈出菜單，你可以右鍵點(diǎn)擊你想要顯示菜單的控件，例如按鈕，并觸發(fā)控件的`ContextMenuStrip`屬性。在上面的代碼中，我們已經(jīng)將上下文菜單綁定到了一個(gè)名為`myButton`的按鈕的`ContextMenuStrip`屬性上。

請(qǐng)根據(jù)你的具體需求調(diào)整控件名稱和事件處理程序。如果你需要在其他控件上顯示菜單，只需將`myButton`替換為相應(yīng)的控件名稱即可。