DT.Rows.ToString未必是指结果集中的所有数据，也许只是一行中所有的，或是一列中所有的
成都创新互联公司坚持“要么做到，要么别承诺”的工作理念，服务领域包括：网站制作、网站建设、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的建昌网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
保险起见，可以一格格枚举
dim a as boolean=true
Dim row As DataRow
For Each row In DT.Rows
Dim column As DataColumn
For Each column In DT.Columns
if row(column).contains("Agree") then a=false
Next column
Next row
if a then
Me.rblAgReject.Items(0).Enabled = False
else
Me.rblAgReject.Items(0).Enabled = True
end if
这个用if没办法判断，只能在update后，再读取这个值，看看是不是和你设置的值相同，相同再跳出提示好了，但一般update都是成功的，如果不成功，SQL执行会失败的。你只要判断update后没有错误产生，就可以提示成功了。
If Condition Then Statement[Else statement]
“If...Then”分支结构用于给程序添加逻辑控制能力。这里，“Condition”是个条件表达式，“Statement”是条件有效的Visual Basic语句。
例如：If Score=20 Then Label1.Text="You Win!"是个使用了下述条件表达式的分支结构：Score=20 根据这个表达式的值，程序决定是否把Label1对象的“Text”属性设置为“You Win!”。
如果“Score”变量的值大于等于20，Visual Basic设置该属性的值，否则，Visual Basic跳过这条赋值语句，然后执行事件过程中的下一行语句。这类比较运算的结果不是“True”就是“False”，条件表达式从来不会产生模棱两可的值。
扩展资料
if 判断语句基本语法在 Python 中，if 语句就是用来进行判断的，格式如下：if 要判断的条件:条件成立时，要做的事情。
注意：代码的缩进为一个 tab 键，或者 4 个空格 —— 建议使用空格在 Python 开发中，Tab 和空格不要混用！ 可以把整个 if 语句看成一个完整的代码块。
else 处理条件不满足的情况思考：在使用 if 判断时，只能做到满足条件时要做的事情。else，格式如下：if 要判断的条件:条件成立时，要做的事情??else:条件不成立时，要做的事情。注意：if 和 else 语句以及各自的缩进部分共同是一个 完整的代码块。
参考资料来源：
百度百科——if语句
if text1.text = "10" then
|-if text3.text = "11" then
| |text5.text = "正确"
| |else
| -if text6.text = "abc" then
| |text7.text = "bcd"
| |end if（3）
| |end if（2）
end if（1）
简单的树状图，
3对应if text6.text = "abc" then
2对应if text3.text = "11" then
1对应if text1.text = "10" then
else对应的应该是第二个if。
if多了可能导致混乱，可以考虑select case
如果要求检测到text1.text不等于10就立即运行if text6.text = "abc" then应该这样写
每一个if语句end if要清晰地写出
缩进也要空好，看得清楚（VB.NET就不错）
if text1.text = "10" then
if text3.text = "11" then
text5.text = "正确"
end if
else
if text6.text = "abc" then
text7.text = "bcd"
end if
end if
2L的多了一个end if
