DT.Rows.ToString未必是指结果集中的所有数据,也许只是一行中所有的,或是一列中所有的
10年积累的网站建设、网站制作经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站设计后付款的网站建设流程,更有福建免费网站建设让你可以放心的选择与我们合作。
保险起见,可以一格格枚举
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...Then...#Else 指令
根据条件编译选定的 Visual Basic 代码块,需要有#Const 配对,一般要先用#Const 定义条件编译器常量
'以下是例子
Module Module1
#Const i = 60
Sub Main()
#If i 30 Then
Console.WriteLine("???") '如果用#Const定义了i,该句语句才会执行,假如用的是private i as integer=60定义,该语句不会被执行
#End If
End Sub
End Module