以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]_SystemIdle相关的报错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178048) |
-- 作者:chnfo -- 发布时间:2022/6/15 22:51:00 -- [求助]_SystemIdle相关的报错 较早前的一个项目,在启动时报出错误 编译错误:“Forms”不是“Windows”的成员。 错误代码:If Windows.Forms.Control.MouseButtons <> Windows.Forms.MouseButtons.None OrElse Windows.Forms.Control.ModifierKeys <> Windows.Forms.Keys.None Then 导出代码以后,发现是在_SystemIdle里,这个从来没改过什么东西啊 另外,用了navibar做菜单导航,运行时也报错 编译错误:未定义类型“Windows.Forms.Padding”。 错误代码:.Padding = New Windows.Forms.Padding(4) 查代码,位置是在 Navi_AfterLoad
\'\'\' Dim tpb As
WinForm.TopicBar = e.Form.Controls("TopicBar1") With
Ctype(tpb.BaseControl, C1Command.C1TopicBar) If
System.Environment.OSVersion.Version.Major < 6 Then .VisualStyle =
C1Command.VisualStyle.WindowsXP Else .VisualStyle =
C1Command.VisualStyle.Office2010Blue End If .Padding = New Windows.Forms.Padding(4) End With
e.Form.StopRedraw() For Each pg As
WinForm.TopicPage In tpb.Pages pg.Collapsed = True Next
If tpb.Pages.Count
> 0 Then tpb.Pages(0).Collapsed = False End If e.Form.ResumeRedraw() 这个也是用的原来的代码啊 [此贴子已经被作者于2022/6/15 22:53:04编辑过]
|
-- 作者:有点蓝 -- 发布时间:2022/6/16 8:56:00 -- Windows.Forms 改为 system.Windows.Forms
|