以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教窗口控件内容不自动重绘的奇怪问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73722)

--  作者:蓝色理想
--  发布时间: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





--  作者:大红袍
--  发布时间:2015/8/25 14:05:00
--  

看看这里

 

http://www.foxtable.com/help/topics/1476.htm

 


--  作者:蓝色理想
--  发布时间:2015/8/25 15:07:00
--  
搞定,超版V5
灰常感谢!!!!!!