以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]点击下一行,数据表不停的滚动  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96008)

--  作者:jyh7081
--  发布时间:2017/2/10 13:32:00
--  [求助]点击下一行,数据表不停的滚动
点击上一行/下一行,数据表不停的滚动,什么原因?

附件:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:滚动.table


--  作者:有点色
--  发布时间:2017/2/10 14:11:00
--  

PositionChanged事件

 

If Forms("录入窗口").Opened Then
    Dim ah As WinForm.ComboBox = Forms("录入窗口").Controls("ComboBox1")   \'定位及联动-表事件currentchanged
    \'ah.ComboList = DataTables("数据表").GetComboListString("案号")
    SystemReady = False
    ah.Text = Tables("数据表").Current("案号")
    SystemReady = True
End If