主题：[求助]剪切粘贴发现错误

1、Tables("ysmx").Position=p  晒选后p值可能隐藏了，Tables("ysmx").Position也许找不到原来的p值了，用output.show(Tables("ysmx").Position )测试两次的p值就知道了。
用这个来确定位置：不知道是不是你要确定刚录入行的位置？
Dim t As Table = Tables("ysmx")
For i As Integer = 0 To t.Rows.Count -1
    If t.Rows(i)("kh") = "" Then
        Tables("ysmx").Position = i-1
        Exit For
    End If
Next

2、既然：If e.NewValue isnot nothing Then 就没有筛选中的 or [kh] Is Null ，奇怪的是，既是如此筛选的结果还是会有空值的行和kh]= '"& e.DataRow("kh")  &"'的行并存的情况，也就是说fox可以同时筛选出两种条件的结果。
3、虽然提示错误了（见1楼）但是筛选并没有受影响。感觉foxtable有bug
4、剪切、粘贴空值没有任何反映。粘贴这个（前后无空格） kh]= '"& e.DataR  ，不会有反映。而粘贴这个：Filter = "[kh]= 或其他的代码部分，则会彻底崩溃！～？？？？
班门弄斧了。。。。呵呵 

2  是我理解错了？ 要保留空值的行，即便输入用～  

kylin兄：
1、我刚又测试了你的代码，如果是先筛选 kh 列后，再开始 录入 或 复制粘贴 都没有问题；
2、我的代码没问题呀，可以 回到 刚才录入行的位置啊～

此主题相关图片如下：hw1.gif