主题：主窗口实现登录提示

forms("主窗口").strips("主菜单").Items("QQopen").SmallImage = GetImage("online.ico")

forms("主窗口").strips("主菜单").Items("QQopen").Image = GetImage("online.ico")

在Disconnected中设置了如下代码：

forms("主窗口").strips("主菜单").Items("QQopen").Image = GetImage("offline.ico")

通过以上代码希望能够实现在线或离线后窗口菜单中相应图标的转换，但是实现不了，怎么修改？

没有提示任何错误，就是在离线的时候变不成灰色图标，这是我在主窗口中添加菜单的代码，以下代码在主窗口AfterLoad事件中

Dim mnu As Winform.Strip
Dim itm As WinForm.StripItem
mnu = e.Form.Strips.Add("主菜单",StripTypeEnum.MainMenu)
mnu.Items.Add("File","文件(&F)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Edit","编辑(&E)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("ShenHeShenPi","审核审批(&S)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("homepage","首页(&H)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("pageup","上页(&A)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("pagedown","下页(&P)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("lastpage","末页(&L)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("MuLuShu","打开目录(&M)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("GengXing","更新(&G)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Option","选项(&O)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Help","帮助(&H)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("QQopen","登录","",StripItemTypeEnum.MenuItem)