如何从子菜单打开新的窗口窗体

Question

我目前正在 Visual basic 上练习代码。基本上，我创建了一个窗口窗体，上面有很多文本。每个文本都是颜色的名称 txtRed、txtBlue 等

我正在尝试创建一个简单的操作，右键单击红色文本（在我的 Windows 窗体上），然后应该打开一个子菜单。 然后，当我单击子菜单中的“打开”时，应打开一个新的窗口窗体并显示文本“这是红色的”。

这至少是我想要达到的结果。关于如何实现这一目标有什么建议吗？我搞不清楚了。任何帮助将非常感激。预先感谢您。

Answer 1

添加上下文菜单：

从工具箱中拖动上下文菜单并将其放置在表单上。 将菜单项添加到上下文菜单并将其命名为“打开”。 将上下文菜单连接到文本框：

选择您的 txtRed 文本框。 将上下文菜单属性设置为您添加的上下文菜单。 管理菜单项点击事件：

双击“打开”菜单项创建事件处理程序。 打开新窗口：

在事件处理程序中，编写代码以打开新窗口。

Public Class Form1

    Private Sub OpenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OpenToolStripMenuItem.Click
        Dim redForm As New Form2
        redForm.Show()
    End Sub

End Class


Public Class Form2

    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Text = "Red Form"
        Dim lbl As New Label
        lbl.Text = "This is red"
        lbl.AutoSize = True
        lbl.Location = New Point(10, 10)
        Me.Controls.Add(lbl)
    End Sub

End Class