VB.net MenuStrip控件通过数据库生成多级动态菜单并添加单击事件

VB.net MenuStrip控件通过数据库生成多级动态菜单并添加单击事件

个人小白，一个多月前想通过 MenuStrip控件调用数据库数据生成多级联动下拉菜单，结果网上的资料都只是部分代码可用。经过一个月的东拼西凑终于能实现功能了。。。欢迎各位大神指正不足之处

思路很重要

MenuStrip控件制作多级联动下拉菜单需要分一级目录、二级目录。。。以二级目录为例。一级目录的一行值包括一组二级目录。也就是说每读取完一行一级目录，需要将相关联的二级目录全部提取出来。一级目录为大循环，二级目录为小循环。

数据库调用连接

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Dim G As String = Application.StartupPath & "\XXXX .xlsx" ’数据库路径+数据源，我用的Excel表格做的
    Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" + G + "';Extended Properties='Excel 12.0;HDR=Yes;IMEX=2;'")
    Dim cmd As OleDbCommand = New OleDbCommand
    cmd.CommandText = "Select First From [Sheet1$]"
    ReadData(conn, cmd)
End Sub

数据调用至Men