1、直接判断如
If e.Form.Controls("TextBox1").Text = "" Then
msgbox("姓名不能为空")
return
End If
If e.Form.Controls("TextBox6").Text = "" Then
msgbox("客户意向不能为空")
return
End If
2、
If e.Form.Controls("TextBox3").Text > "" Then
Dim fdr As DataRow = DataTables("表A").Find("电话 = '" & e.Form.Controls("TextBox3").Text & "'")
If fdr IsNot Then
msgbox("找到了")
End If
End If