VB怎么把IF语句写成一行

如代码:
if a =1 then
if b=1 then
c=1
b=0
end if
else
b=0
end if
有没有办法把它写成一行显示???

VB怎么把IF语句写成一行的话就是在一行上完成整个IF语句。
通常有两种形式（含有或不含有 ELSE 子句）
例如：
If x>=60 Then Print "及格"
或者：
If x>=60 Then Print "及格" Eles Print "不及格”

sql="insert into [表](字段名1" sql=sql & ",字段名2" sql=sql & ",字段名3" ..... sql=sql & ",字段名42) " sql=sql & "values(值1" sql=sql & ",值2" sql=sql & ",值3" ... sql=sql & ",值42)" '上面的sql语句,在写值的时候,注意,如果是字符串的话,两边要加单引号 '如果是日期的话,两边要加# 如果是变量的话,可以这样 字符型变量的时候 : sql=sql & ",'" & 变量n & "'" 日期型变量的时候 sql=sql & ",#" & 变量n & "#" 其它的则用： sql=sql & ",'" & 变量n 另外，在写的时候，注意数目／类型／顺序的一致性

If a = 1 Then If b = 0 Then c = 1: b = 1 Else b = 0 用“:”（冒号）分隔每一行，if 语句写在一行不用 end if 结尾

要真正实现的话，需要用下面的语句。注意：中间“Else Else”的用途是耐人寻味的！ If a = 1 Then If b = 0 Then c = 1: b = 1 Else Else b = 0 如果改成 If a = 1 Then If b = 0 Then c = 1: b = 1 Else b = 0 则等同于 if a =1 then if b=0 then c=1 b=1 else b=0 end if end if