怎么改成 单机通知区域图标的话, 系统会最大化呢?
AddHandler nfi.DoubleClick, AddressOf Icon_DoubleClick '为通知区域图标添加双击事件
Dim tsmi1 As new System.Windows.Forms.ToolStripMenuItem("菜单一",GetImage(projectpath & "\BrowseMode.ico")) '定义一个菜单选项(带图标)
AddHandler tsmi1 .Click, AddressOf Menu1_Click '为这个菜单选项添加点击事件
nfi.ContextMenuStrip = cms
nfi.Text = "家具库存更新系统" '鼠标移上去显示的文本
nfi.Icon = new Icon(ProjectPath & "\Images\shozaioh_favicon.ico") '图标地址
nfi.Visible = True '设置为显示
forms("窗口1").show
原帖:
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=34553
加好友 
发短信
Post By：2015/1/9 11:01:00 [只看该作者]
