选择项目动态添加到菜单项列表

Question

我用下面的循环来动态地添加在程序加载项的菜单项地带

For Each specs In My.Computer.FileSystem.GetFiles(My.Settings.SpecsLoc, FileIO.SearchOption.SearchTopLevelOnly, "*.pdf*") 
     SpecsToolStripMenuItem.DropDownItems.Add(IO.Path.GetFileName(specs)) 
    Next 

这将填充与菜单项，平均而言，20个项目。我一直在寻找如何打开列表中的文件。

感谢

Answer 1

构造也可以采取的事件处理程序，所以你可以添加这样的：

SpecsToolStripMenuItem.DropDownItems.Add(IO.Path.GetFileName(specs), _ 
             Nothing, _ 
             Sub() 
              Process.Start(specs) 
             End Sub)