重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在程序中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