Foxtable(狐表)用户栏目专家坐堂 → [求助]如何通过“设置窗口”中输入内容实现对状态栏的更改


  共有3602人关注过本帖树形打印复制链接

主题:[求助]如何通过“设置窗口”中输入内容实现对状态栏的更改

帅哥哟,离线,有人找我吗?
aimanbao233
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:219 威望:0 精华:0 注册:2014/4/27 17:37:00
[求助]如何通过“设置窗口”中输入内容实现对状态栏的更改  发帖心情 Post By:2014/5/28 21:16:00 [显示全部帖子]

在菜单栏有“设置”按钮,点击打开设置窗口,通过对设置窗口中文本框输入内容,实现对状态栏的更改。
Dim tb As Winform.Control
tb = e.Form.Controls("TextBox1")
StatusBar.Message1=  tb.text & "生产经营管理软件!"
上述代码说是“text”不是“Winform.Control”的成员,请问如何修改?

 回到顶部
帅哥哟,离线,有人找我吗?
aimanbao233
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:219 威望:0 精华:0 注册:2014/4/27 17:37:00
  发帖心情 Post By:2014/5/29 17:18:00 [显示全部帖子]

在项目事件AfterOpenProject中写入如下代码:
StatusBar.Message1=  Forms("设置窗口").Controls("TextBox1").text   & "生产经营管理软件!"
ApplicationTitle= Forms("设置窗口").Controls("TextBox1").text   & "生产经营管理软件"

但提示出错“未将对象引用设置到对象的实例”,请问如何修改?

 回到顶部
帅哥哟,离线,有人找我吗?
aimanbao233
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:219 威望:0 精华:0 注册:2014/4/27 17:37:00
  发帖心情 Post By:2014/5/29 17:23:00 [显示全部帖子]

另请问如何实现以下功能?在项目加载的时候状态栏和标题栏显示预设的单位名称,当通过设置按钮对单位名称进行修改后,关闭软件再打开重新加载时显示修改后的单位名称,请问如何实现?

 回到顶部
帅哥哟,离线,有人找我吗?
aimanbao233
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:219 威望:0 精华:0 注册:2014/4/27 17:37:00
  发帖心情 Post By:2014/5/29 17:59:00 [显示全部帖子]

谢谢,已解决!

 回到顶部