我想问一下VB中多个判断语句IF的使用方法

比如我要判断变量a
如果a>0 并且a<501 那么b =a+5
如果a>501 并且a<1001 那么b =a+10
Private Sub Command1_Click()
Dim a As String
If a > 0 And a < 501 Then
b = a + 5
enf
If a > 501 And a < 1001 Then
b = a + 10
enf
If a > 1001 And a < 1501 Then
b = a + 15
enf
If a > 2001 And a < 2501 Then
b = a + 20
End If
Print b
End Sub
还是报错啊,看下是哪里的问题

第1个回答  2008-06-19
if a>0 and a<501 then
b=a+5
enf if
if a>501 and a<1001 then
b=a+10
end if

你那enf改为end if
第2个回答  2008-06-19
dim a as string
dim b as string
if a > 0 and a < 501 then
b = a + 5
elseif a > 501 and a < 1001 then
b = a + 10
elseif a > 1001 and a < 1501 then
b = a + 15
elseif a > 2001 and a < 2501 then
b = a + 20
else
b = a + 25
end if
print b
这里的最后一个条件那记得要用ELSE

或者这么写也可以
Dim a As String
dim b as string
If a > 0 And a < 501 Then
b = a + 5
end if
If a > 501 And a < 1001 Then
b = a + 10
end if
If a > 1001 And a < 1501 Then
b = a + 15
end if
If a > 2001 And a < 2501 Then
b = a + 20
End If
Print b
第3个回答  2008-06-19
如果非要用if语句的话可以这样判断:
if a>0 and a<501 then
b=a+5
elseif a>501 and a<1001 then
b=a+10
end if
第4个回答  2008-06-19
if a>0 and a<501 then b=a+5
if a>501 and a<1001 then b=a+10
第5个回答  2008-06-19
Private Sub Command1_Click()
b = a + Abs(Int(-a / 500)) * 5
Print b
End Sub

或者enf改成end if
或者用elseif本回答被提问者采纳

我想问一下VB中多个判断语句IF的使用方法
if a>0 and a<501 then b=a+5 enf if if a>501 and a<1001 then b=a+10 end if 你那enf改为end if

VB中IF判断
If语句的用法如下: If <条件> Then 语句组 End If 当 <条件>的值为True,执行“语句组”,否则就不执行“语句组”。if语句的一种格式如下: 例1: x = 100 If x > 5 Then '这里你要理解因为x=100,所以对于 x > 5的判断结果为True Print "Ok" End If 这个代码结果,输出"Ok"。 ...

vb判断语句的使用方法是什么?
else ' 执行另一些代码,当x不大于10时 end if 在实际编程中,可能会遇到更复杂的条件判断,例如:if x = 5 then ' 执行某些特定操作,当x等于5时 else if x > 5 then ' 执行另一种操作,当x大于5时 else ' 如果条件都不满足,则执行默认操作 end if 在使用if...then...else...结构...

关于VB的IF语句的写法
如果condition为Null,会被默认为False。例如,你可以使用`TypeOf objectname Is objecttype`的形式来判断对象类型,如果objectname是objecttype类型的,表达式为True,否则为False。在IF语句中,执行的代码块(statements)是可选的,但在单行IF语句且没有Else子句时,它是必需的。如果你需要为不同条件设置...

请问一下vb中的if语句的用法
1、首先,鼠标双击进入代码窗口,如下图所示。2、然后按下单引号即可开始注释。3、这时可以看到被注释的语句是绿色的文字。4、也可以打开编辑窗口,在下拉菜单中,找到并点击此按钮即可多行注释。5、也可以点击这个取消多行注释。

if()语句的用法是什么?
若x=10,则执行语句if x Then x=1 Else x=-1后,x的值是1。x=10时,X为真,所以Else没有执行,执行的是Then后面的x=1。在VB语言中,做逻辑运算时数字0表示假,其他数字表示真。

vb用IF 判断
if语句的用法 例1:If a=0 Then Print "a=0"例2:IF a=0 Then Print "a=0"Else Print "a<>0"End If 例3:If a>0 Then Print "a>0"Else If a=0 Then Print "a=0"Else Print "a<0"End If 例4:If a<10 And a>5 Then Print "5<a<10"End IF 例5:If a>0 And a...

vb判断语句的使用方法是什么?
判断语句在编程中扮演着重要角色,VB语言中的条件语句使用方式主要包括了`if`与`else`结构。当翻译类似`if x = 0 then ... else ...`这样的条件语句时,需要特别注意`else`部分的代码位置。在尚未得知`else`部分确切位置的情况下,程序会暂时跳过`else`部分的代码,直至其位置被确定。具体的实现...

VB的if语法运用
vb的if语法的基本结构是:If ...(条件) Then ...(如果条件吻合则执行的语句)Else ...(如果条件不吻合则执行的语句)End if 举个例子,如果1=1则弹出对话框显示a,如果1≠1,则弹出对话框显示b。If 1 = 1 Then MsgBox ("a")Else MsgBox ("b")End If 运行结果如图 希望对你有所帮助...

excel 中VB关于if的用法
excel 中VB关于if的用法如下:if语句的含义 if语句字面意思就是如果的意思,如果条件为真,那么就执行if语句里面的程序,这个程序,一般指then后面的,一个if语句可以没有end if ,但绝对不能没有then,这一点是要注意的,if……then……结构 该结构一般用于比较简单的判断语句执行,下面以一段实例...

相似回答