| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 如何在窗体中，实现动态菜单 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=16935) |
| -- 作者：kevin -- 发布时间：2012/2/28 3:20:00 -- 如何在窗体中，实现动态菜单 看了“动态菜单 “却不知道如何在窗体中实现这样的功能， 通过‘ComboBox,只指定到；D：\\Foxtable\\... |
| -- 作者：狐狸爸爸 -- 发布时间：2012/2/28 7:48:00 -- 不明白你的意思 |
| -- 作者：blackzhu -- 发布时间：2012/2/28 8:13:00 -- Dim FiName As String
我估计是要这个. |
| -- 作者：kevin -- 发布时间：2012/2/28 12:55:00 -- 如：在窗体中，通过点击ComboBox下拉列，找到D:\\文件夹\\目录下的所有文件；应该如何实现？ |
| -- 作者：狐狸爸爸 -- 发布时间：2012/2/28 14:02:00 -- 还是不明白你的意思，不能具体一点吗？ |
| -- 作者：blackzhu -- 发布时间：2012/2/28 15:02:00 -- Dim FiName As String For Each dir As String In FileSys.GetDirectories("d:\\") For Each File As String In FileSys.GetFiles(dir) FiName=FiName & "|" & File Next Next e.Sender.ComboList = FiName |
| -- 作者：飞 -- 发布时间：2012/2/28 15:05:00 -- 窗体的AfterLoad事件 Dim Cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1") |