Foxtable(狐表)用户栏目专家坐堂 → 请教窗口控件内容不自动重绘的奇怪问题


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

主题:请教窗口控件内容不自动重绘的奇怪问题

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


加好友 发短信
等级:二尾狐 帖子:561 积分:4284 威望:0 精华:0 注册:2014/6/12 19:15:00
请教窗口控件内容不自动重绘的奇怪问题  发帖心情 Post By:2015/8/25 13:41:00 [只看该作者]

问题描述:
          遍历系统中所有的表,并重新加载,加载前启动一个Form,将From中的Text控件内容修改为“正在更新****表!”。
          遍历过程中,发现启动的Form中的Text内容不自动刷新,始终如下图(用messagebox调试发现实质text控件已被正确赋值)。
          请高手指点一下

图片点击可在新窗口打开查看此主题相关图片如下:图像 1.png
图片点击可在新窗口打开查看



Forms("更新提示窗口").open
Dim UpDateLable As WinForm.Label = Forms("更新提示窗口").Controls("Label1")
For Each t As Table In Tables
    If t.Name = "原始合同汇总表" Or t.Name="一拆合同汇总表" Or t.Name = "二拆合同汇总表" Then
        '啥也别做
    Else '隐藏 + 禁止编辑
        
        UpDateLable.text = "正在更新表:《" & t.Name & "》!"
        'MessageBox.Show(t.Name)
        t.DataTable.Load
    End If
Next
Forms("更新提示窗口").Close





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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/25 14:05:00 [只看该作者]


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


加好友 发短信
等级:二尾狐 帖子:561 积分:4284 威望:0 精华:0 注册:2014/6/12 19:15:00
  发帖心情 Post By:2015/8/25 15:07:00 [只看该作者]

搞定,超版V5
灰常感谢!!!!!!

 回到顶部