以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口菜单问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88158)

--  作者:mxko
--  发布时间:2016/7/28 8:26:00
--  窗口菜单问题
如题:如何用代码修改窗口菜单的图标?
请高手帮忙

--  作者:狐狸爸爸
--  发布时间:2016/7/28 9:58:00
--  
e.Form.Strips("工具栏1").Items("Print").baseControl.Image =  mit.Image = GetImage(图片文件名称)
[此贴子已经被作者于2016/7/28 9:58:55编辑过]

--  作者:Hyphen
--  发布时间:2016/7/28 10:02:00
--  
Dim sit As WinForm.StripItem = e.Form.Strips("主菜单").Items("项目1")
sit.BaseControl.image = getimage("F:\\Images\\Ico\\Add.ico")

--  作者:mxko
--  发布时间:2016/7/28 10:42:00
--  
非常感谢【狐狸爸爸】+【Hyphen