Dim dr As Row = Tables("学员一览表").Current("姓名") If dr.IsNull("指纹1") AndAlso dr.IsNull("指纹2") Then e.Form.Controls("未登记").Visible = True e.Form.Controls("已登记").Visible = False Else e.Form.Controls("已登记").Visible = True e.Form.Controls("未登记").Visible = False End If