以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自动刷新  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=170344)

--  作者:透明人生
--  发布时间:2021/7/22 16:15:00
--  自动刷新

提示未声明“Args”,问题在哪儿?


Dim t As Table = Args(0)

Dim flt As String = t.Filter       \'获取过滤条件

Dim Int As Integer = t.Position    \'获取行位置

Dim p As point = t.ScrollPosition  \'获取行在屏幕中位置

t.StopRedraw

t.DataTable.Load(False)

t.Filter = flt

t.Position = Int

t.ScrollPosition = p

t.ResumeRedraw


--  作者:有点蓝
--  发布时间:2021/7/22 17:02:00
--  
自定义函数里才有Args