主题：[求助]

此主题相关图片如下：图片.jpg

Dim r As Row = Tables("表A").Current.Clone

r("第二列") = Nothing
r("第三列") = Nothing

 

谢谢版主，这个问题已解决，在明细表中按回车键增加行时克隆上一行代码应该怎么写！

 

去表属性编写keydown事件

If e.KeyCode = 13 Then
    Dim r As Row = e.Table.Current.Clone
   
    r("第二列") = Nothing
    r("第三列") = Nothing
End If

在明细表中（光标到 应收金额列时）按回车键增加行时克隆上一行代码应该怎么写                                             
此主题相关图片如下：1.jpg

If e.KeyCode = 13 AndAlso e.Table.Cols(e.Table.ColSel).name = "第五列"  Then
    Dim r As Row = e.Table.Current.Clone
   
    r("第二列") = Nothing
    r("第三列") = Nothing
End If