在程序中x=IIf(Int(x／5)=x／5，x+2，x)的意思是：
创新互联公司是一家集网站建设,霍州企业网站建设,霍州品牌网站建设,网站定制,霍州网站建设报价,网络营销,网络优化,霍州网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
如果Int(x／5)=x／5，即x能被5整除，那么执行x=x+2，否则执行x=x语句。
即当x是5 的倍数时，x就加2，否则就不加。
授人以鱼不如授人以渔
IIF（条件，值1，值2）
IIF语句的意思是，如果条件成立，则返回值1，否则返回值2
具体到你的代码，就是如果File1.Path 的最后一个字符是 ”\“ 就返回空，否则返回 ”\“
所以我想你的完整句子应该是这样的：
File1.Path = File1.Path IIf(Right(File1.Path, 1) = "\", "", "\")
根据表达式的值，来返回两部分中的其中一个。
语法： IIf(expr, truepart, falsepart)
参数：
expr，必要参数。用来判断真伪的表达式。
truepart，必要参数。如果 expr 为 True，则返回这部分的值或表达式。
falsepart，必要参数。如果expr为 False，则返回这部分的值或表达式。
举例：
a=iif(a=1,2,3)相当于：
Ifa=1Then
a=2
Else
a=3
EndIf
iif就是"If...Then...Else"结构的简写版本
Result=iif(条件,Ture部分,False部分)
Result是函数的返回值,当条件为真时,iif函数返回Ture部分,当条件为假时,返回False部分.
例如a=1,b=3,c=3*a-b
a=iif(ca,a-1,b)+1
此时，c确实小于a,所以执行a-1
if后的语句如果成立，则可执行Then
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