主题：空值如何返回行号

用FindRow比较方便：

 

With Tables("表B")
    Dim r As Integer
    r = .FindRow("产品 Is Null",0,False) '反回空值行行号
    If r > - 1 Then '如果找到符合条件的行
        .Rows(r)("产品") = "1988" '则向该行产品列写入"1988"
    End If
End With

 

关于FindRow，可以看看:

 

http://help.foxtable.com/topics/0553.htm

 

哈哈，其实错误提示非常清晰啊：
 
System.Data.EvaluateException: Cannot find column [系统数据].
 
建议你安装一个中文版语言包，这样错误提示就是中文的了

看这个：

 

http://www.microsoft.com/downloads/zh-cn/details.aspx?FamilyID=39C8B63B-F64B-4B68-A774-B64ED0C32AE7&displaylang=zh-cn