[求助] 我的模式窗口怎么没有状态栏 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 我的模式窗口怎么没有状态栏

共有2468人关注过本帖树形打印复制链接主题：[求助] 我的模式窗口怎么没有状态栏

15986720145

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：146 积分：1243 威望：0 精华：0 注册：2015/8/7 16:22:00

[求助] 我的模式窗口怎么没有状态栏 发帖心情

Post By：2015/8/26 21:24:00 [只看该作者]

我设计的模式窗口，请问如何实现状态栏。我在项目的SystemIdle事件里加入如下代码，不起作用。

StatusBar.Message1 = "Hello, " & user.name & " ! 登录时间:" & Date.Now

请大神赐教！

此主题相关图片如下：statusbar.png

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/8/26 21:27:00 [只看该作者]

你自己设计的窗口，没有状态栏。

你可以加入一个面板panel，然后加入label来模拟。

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/8/26 21:38:00 [只看该作者]

如果要加入也可以，afterLoad事件

Dim status As New System.Windows.Forms.StatusStrip()
Dim ToolStripStatusLabel1 As New System.Windows.Forms.ToolStripStatusLabel()

status.Items.Add(ToolStripStatusLabel1)
status.Name = "StatusStrip1"

ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
ToolStripStatusLabel1.Text = "状态栏"

e.form.panel.controls.add(status)

-------------

调用和赋值

Dim obj = e.form.panel.Controls("StatusStrip1")
obj.Items("ToolStripStatusLabel1").text = "12345"

15986720145

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：146 积分：1243 威望：0 精华：0 注册：2015/8/7 16:22:00

Post By：2015/8/26 21:48:00 [只看该作者]

谢谢，回去继续摸索！

主题：[求助] 我的模式窗口怎么没有状态栏