vb.net多级菜单 vb菜单子菜单

用vb.net来进行货物的分类的二级菜单的SQL语句怎么写？

select t.* ,substr(t.goods_code,-2) from codegoods t where substr(t.goods_code,0,2)='02' order by substr(t.goods_code,-2)

让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：域名注册、虚拟空间、营销软件、网站建设、临湘网站维护、网站推广。

这样就可以啦。用SUBSTR就可以实现这个功能

如何给vb工具条添加多级菜单

右键点窗口 用菜单编辑器添加

添加后

VB Form1.frm  用记事本打开能看到

Begin VB.Menu a

Caption         =   "312"

Begin VB.Menu b

Caption         =   "13131"

Begin VB.Menu c

Caption         =   "1"

End

Begin VB.Menu d

Caption         =   "2"

End

End

End

End

VB.net如何动态创建ContextMenuStrip控件，并写入三个菜单选项，每个选项菜

动态生成的控件： Private Sub UserControl1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load                 Dim myPicture = New System.Windows.Forms.PictureBox()                 Me.Panel3.Controls.Add(myPicture)                 myPicture.Size = New System.Drawing.Size(115, 160)                 myPicture.TabStop = False                 myPicture.Name = "p"                  myPicture.Cursor = Cursors.Hand                 AddHandler myPicture.Click, AddressOf mypic_Click '添加事件     End Sub   处理事件的过程： Private Sub mypic_Click() 'ByVal id As String         Dim bookInfo As New BookInfo         bookInfo.Show()         Me.Parent.Enabled = Fals