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


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

主题:无法后退的问题

帅哥哟,离线,有人找我吗?
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

 回到顶部