以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  无法后退的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193756)

--  作者：hfapplehao --  发布时间：2024/10/10 20:13:00 --  无法后退的问题 老师您好，写了这么个命令，用于选定一个区域，单击这个命令就可以用用第一行的数据往下填充。结果发现命令运行完毕后，没法回退。怎么改进啊 Dim tb As Table = CurrentTable If tb IsNot Nothing Then         For i As Integer = tb.LeftCol To tb.RightCol             For j As Integer = tb.TopRow+1 To tb.BottomRow                 \'If tb.Rows(i).locked = 0 Then \'只有当前表没有被锁定和当前行没有被锁定才进行如下操作                     tb.Value(j,i) = tb.value(tb.Toprow,i)                 \'End If             Next         Next End If

--  作者：有点蓝 --  发布时间：2024/10/10 20:17:00 --   参考：http://www.foxtable.com/webhelp/topics/1538.htm