Question

关于vb中循环语句的问题

设有函数r=1（x>0)
r=2(x>=0)
则下列正确计算该函数值的语句是
A. If x<0 then r=1
Elseif x>=0 Then
r=2
End if

B. r=IIf(x<0,1,2)
这道题正确答案是B我想问一下,A为什么错了?

Answer 1

A就是错的！
它错在：if ....then....语句的结构上。vb中的if语句有两种格式，一种是换行的，一种是不换行的：
1、换行的格式：
if xxxx then(到这儿必须换行）
XXXXX
[elseif XXXX then(到这儿又必须换行）
xxxxx]
[else(到这儿又必须再换行）
xxxxx]
endif
这种格式中elseif ...和else...部分都可以省略，还可以再镶嵌若干层的if语句，但必须以单独占一行的endif语句结束。它常用在比较复杂的选择中。
2、不换行的格式：
if XXXX then XXXX [else XXXX]
这种格式是IF语句最原始的格式了，它可以省略else...部分，也可以镶嵌，但所有内容必须写在一行中，句末也不需要endif语句（也绝不能有，否则就是画蛇添足）。由于全写在一句中，不能写的太长，很乱很难懂，所以，现在这种格式只用在很简单的判断语句中了。

分析A的错误，就是两种格式混用了。要是正确写应该是这样的：
A. If x<0 then
r=1
Elseif x>=0 Then '这一句中可以换成else,因为这是x取值中除了x<0之处剩下的全部取值。
r=2
End if

可参考我在http://zhidao.baidu.com/question/89303782.html的回答。

Answer 2

A的写法不对，正确写法应该是：
If x<0 then
r=1
Elseif x>=0 Then
r=2
End if

Answer 3

首先说明这是选择语句的问题，而非循环。

If x<0 then r=1 此时if语句已经执行完毕
后面的Elseif会提示错误
应改为：
If x<0 then
r=1
Elseif ……