关于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


网页名称:关于vb.net弹出式菜单的信息
标题来源:http://azwzsj.com/article/hpojhp.html