Foxtable(狐表)用户栏目专家坐堂 → 无法后退的问题


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

主题:无法后退的问题

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


加好友 发短信
等级:童狐 帖子:215 积分:2149 威望:0 精华:0 注册:2018/3/30 19:56:00
无法后退的问题  发帖心情 Post By: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

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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/10/10 20:17:00 [只看该作者]


 回到顶部