关于vb.net弹出式菜单的信息

vb.net中的listview控件使用问题

可以按shuift或者ctrl多选，再右键选删除，也可单击单个item右键选择删除。

创新互联作为成都网站建设公司，专注成都网站建设公司、网站设计，有关成都定制网页设计方案、改版、费用等问题，行业涉及成都发电机回收等多个领域，已为上千家企业服务，得到了客户的尊重与认可。

如果附件代码有问题，试试下面这个，我没时间改了。

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

  With ListView1

      Dim i As Integer

      .Items.Clear()'清空

      .View = View.Details'用报表模式显示

      .FullRowSelect = True'整行选择

      .ContextMenuStrip = ContextMenuStrip1'指定右键菜单的控件

      .Columns.Add("ID", 100)'添加列头

      .Columns.Add("啦啦啦", 200)

'加入15个数据方便测试

      For i = 0 To 15

          .Items.Add("项目" i)

          .Items(i).SubItems.Add("我是第" i "个项目")

      Next

  End With

End Sub

'菜单中删除的click事件

Private Sub menu_del_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menu_del.Click

  If ListView1.SelectedItems.Count 1 Then

      '但选中的item数量不足一个

      MessageBox.Show("至少选择一个")

  Else

      '删除选中的那个item

      ListView1.SelectedItems(0).Remove()

  End If

End Sub

vb.net的弹出式菜单怎么做

工具箱里有ContextMenu（.NET2.0以后名字有点变化，大概差不多），你加入窗体后就可以像编辑普通菜单那样编辑。

编辑好后，选中你要添加菜单的控件。属性窗口里有个ContextMenu属性，在里面选你刚才建立的ContextMenu

vb.net2010 menustrip控件下拉菜单属性

这就是普通的菜单，向上弹出，还是向下弹出，是操作系统自动判断的（根据可视的空间区域大小）打勾，很简单，只要将菜单的CheckOnClick设为True就可以了

vb .net中怎么做出Excel中的弹出式菜单？请看附档图片，谢谢！

添加工具栏

添加弹出菜单

打上名称  如果想加上 下划线 快捷功能  以+字符  就可以了

eg 文件(F)

设置图标   完成

VB.NET命令窗口

Vb不是人机对话窗口，而是编程工具，可以编写代码进行调试执行或者生成可执行文件。

用Visual Studio .Net开发"Hello World!"程序：

我们知道"Hello World"一般是命令行程序，而这种程序在Visual Studio .Net中被称为"控制台程序"。下面是Visual Studio .Net编写控制台"Hello World！"程序的具体步骤：

（1）、启动Visual Studio .Net。

（2）、选择菜单【文件】|【新建】|【项目】后，弹出【新建项目】对话框。

（3）、将【项目类型】设置为【Visual Basic项目】。

（4）、将【模板】设置为【控制台应用程序】。

（5）、在【名称】文本框中输入【Hello World】。

（6）、在【位置】的文本框中输入【E:VS.NET项目】，然后单击【确定】按钮，则Visual Studio .Net会按照上面设定的参数创建一个控制台应用程序项目，具体如图01所示。

图01："Hello World"控制台程序的【新建项目】界面

（7）、在【解决方案资源管理器】窗口中，双击Module1.vb文件，进入Module1.vb文件的编辑界面。

（8）、Visual Studio .Net已经为产生Main()函数。在系统创建的Main()函数中加入下面一行代码就可以了：

Console.WriteLine ("Hello World!")

（9）、选择【文件】|【保存Module1.vb】菜单或者按快捷键Ctrl＋S，保存所做的修改。

（10）、此时单击快捷键Ctrl＋F5运行程序就可以得到图02所示运行界面：

在VB中调用弹出式菜单应使用什么方法

用MouseUp事件里的 Button参数 1表示左键 2表示右键

建一个菜单 vbFile 子菜单vbRight:

(右键点击窗体 就会弹出 vbFile下的几个子菜单了)

Private Sub Form_Load()

vbFile.Visible = False

End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Select Case Button

Case 1

Print "点击了左键"

Case 2

Print "点击了右键"

PopupMenu vbFile

End Select

End Sub

----------------------------

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then

PopupMenu color, 4 Or 0

End If

End Sub

是对的。 建议改成MouseUp事件，因为你看正常的弹出菜单 都是鼠标键弹起来出现的

才发现 你是想要把系统的右键弹出式菜单屏蔽吧

如下代码即可（把相应代码改成你想要的）

Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then

PopupMenu color, 0 Or 4'左键所触发的内容

End If

If Button = 2 Then'右键所触发的内容

Text1.Enabled = False

Text1.Enabled = True

PopupMenu color, 0 Or 4

End If

End Sub