主题：foxtable 菜单变化原理

1、不用控制就可以的。系统菜单，当不够地方显示的时候，就会显示成下拉的方式。

2、参考

http://www.foxtable.com/webhelp/scr/0348.htm

所有属性，如下

    public static ulong AvailablePhysicalMemory { get; }
    public static string ChineseScript { get; }
    public static string ComputerName { get; }
    public static string ConnectName { get; }
    public static string ConnectType { get; }
    public static string ConvertScript { get; }
    public static string FileIdentify { get; }
    public static string FormatCode { get; }
    public static string ImportsStrings { get; }
    public static string OSFullName { get; }
    public static string OSVersion { get; }
    public static string PublishFiles { get; }
    public static string referFiles { get; }
    public static float ScreenDpiX { get; }
    public static float ScreenDpiY { get; }
    public static long ScreenHeight { get; }
    public static long ScreenWidth { get; }
    public static string SourceString10 { get; }
    public static string SourceString4 { get; }
    public static string spaceNames { get; }
    public static ulong TotalPhysicalMemory { get; }
    public static string UserName { get; }
    public static long WorkingAreaHeight { get; }
    public static long WorkingAreaWidth { get; }

比如

Dim s = SysInfo.ComputerName
msgbox(s)

自己output看看，看哪些是自己需要的

output.show(sysinfo.AvailablePhysicalMemory)
output.show(sysinfo.ChineseScript )
output.show(sysinfo. ComputerName )
output.show(sysinfo. ConnectName )
output.show(sysinfo. ConnectType )
output.show(sysinfo. ConvertScript)
output.show(sysinfo. FileIdentify )
output.show(sysinfo. FormatCode )
output.show(sysinfo. ImportsStrings)
output.show(sysinfo. OSFullName )
output.show(sysinfo. OSVersion )
output.show(sysinfo. PublishFiles)
output.show(sysinfo. referFiles )
output.show(sysinfo. ScreenDpiX )
output.show(sysinfo. ScreenDpiY )
output.show(sysinfo.ScreenHeight )
output.show(sysinfo. ScreenWidth )
output.show(sysinfo. SourceString10)
output.show(sysinfo. SourceString4 )
output.show(sysinfo. spaceNames )
output.show(sysinfo.TotalPhysicalMemory )
output.show(sysinfo. UserName )
output.show(sysinfo. WorkingAreaHeight )
output.show(sysinfo.WorkingAreaWidth )

用代码visible=false隐藏起来的菜单，你无法再点击。

如果是因为窗口变小，自动隐藏到下拉那里的菜单，可以正常点击运行。

如果你不想设置visible=false，你可以删除那些代码。