Foxtable(狐表)用户栏目专家坐堂 → 关于Ctrl+D的BUG


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

主题:关于Ctrl+D的BUG

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


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
关于Ctrl+D的BUG  发帖心情 Post By:2014/12/5 15:27:00 [显示全部帖子]

在窗口为模式窗口下,Ctrl+D的向下填充居然失效了,版本为0930版本,以前的版本好像没有问题。
不知道现在版本怎么样了?

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


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
  发帖心情 Post By:2014/12/5 17:07:00 [显示全部帖子]

要用keyDown事件才行,而且不能使用Ctrl+D,必须更改下才行,代码如下
            If e.Control AndAlso e.KeyCode = Keys.E Then
                With e.Table
                    Dim r As Row = .Rows(.TopRow)
                    If r.IsNull(.LeftCol) = False Then
                        For intA As Integer = .TopRow To .BottomRow
                            .Rows(intA)(.LeftCol) = r(.LeftCol)
                        Next
                    End If
                End With
            End If

 回到顶部