You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

如何在Visual Basic中通过右键子菜单打开新Windows Form

实现右键红色文本控件弹出子菜单并打开新窗体的方法

步骤1:添加上下文菜单控件

在主窗体设计界面,从工具箱拖入ContextMenuStrip控件,命名为cmsRed。在这个菜单里添加一个ToolStripMenuItem,设置文本为“打开”,命名为tsmiOpenRed。

步骤2:绑定右键菜单到txtRed控件

选中txtRed控件,在属性窗口找到ContextMenuStrip属性,选择刚才创建的cmsRed。这样右键点击txtRed时就会弹出该菜单。

步骤3:编写“打开”菜单项的点击事件

双击tsmiOpenRed菜单项,进入事件处理代码,添加以下逻辑:

Private Sub tsmiOpenRed_Click(sender As Object, e As EventArgs) Handles tsmiOpenRed.Click
    ' 创建新窗体并设置基本属性
    Dim redForm As New Form()
    redForm.Text = "红色内容窗口"
    redForm.Size = New Size(300, 200)
    
    ' 创建Label控件显示指定文本
    Dim contentLabel As New Label()
    contentLabel.Text = "this is red"
    contentLabel.AutoSize = True
    contentLabel.Location = New Point(60, 70)
    
    ' 将Label添加到新窗体并显示
    redForm.Controls.Add(contentLabel)
    redForm.Show()
End Sub

补充说明

  • 如果你已经提前创建了固定的目标窗体(比如命名为frmRedDetail),可以直接实例化并传递内容:
    Dim detailForm As New frmRedDetail()
    ' 假设frmRedDetail里有一个名为lblInfo的Label控件
    detailForm.lblInfo.Text = "this is red"
    detailForm.Show()
    
  • 注意确保代码中控件名称和你项目里的实际命名一致,比如txtRed、cmsRed等。

内容的提问来源于stack exchange,提问作者user4138475

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.06.20 19:37:03