主题：[求助]如何判断出某一行数据中的空值，即：未填项。

Dim r As Row = Tables("人力资源库").Current

For Each cl As As Col In Tables("人力资源库").cols

    If r.Isnull(cl.name) Then

        Dim Result As DialogResult

        Result = MessageBox.show("您有未填写的项目,确定放弃吗?","提示",MessageBoxButtons.YesNo, MessageBoxIcon.Question)

        If Result = DialogResult.Yes Then

            r.Delete

            Forms("人力资源界面主窗口").open()

            forms("人力资源详细内容窗口").close()

            Exit For

        End If

    End If

Next