wdjh.net
当前位置:首页 >> 关于 vB 6.0 IF thEn ElsE 的 >>

关于 vB 6.0 IF thEn ElsE 的

配对情况如下:

在最后加上 end if 就行了 如果不行,仔细核对每一个if,看看有没有与其配对的end if if 和 end if 的数量必须配对

三种改法: 第一种: Private Sub Command1_Click() Dim x As Single, y As Single x = Val(Text1.Text) If x > 0 Then 'Then后面不能有除注释外的其他语句! y = x + 1 Else y = 5 * x End IfEnd Sub第二种: Private Sub Command1_Click() Dim...

你是说后面要写两条语句吧.可以用冒号分隔开两个语句,也可以写成块式写法,比如: If a>b Then a=1 : b=2 或 If a>b Then a=1 b=2 End If

if 条件 then 语句1 else 语句2 end if if 条件 then 语句1 else end if '这样也是允许的 可以为空 跟以下语句相同 既同一个功能 if 条件 then 语句1 end if

对的啊! 有什么问题?

else的意思是"否则"else后面的语句跟then后面的语句是互斥的执行了then后面的语句就不会执行else后面的语句反之亦然

这是一种条件分支结构。 一般格式为: IfThen end if 说明:如果为真,执行‘Then后面的,如果条件为假,不执行Then后面的语句块,而执行End If后的语句。 其中条件是逻辑表达式(比如(A>B)等)。

If d = 3 Or 4 Or 5 Or 6 Then zhi = 1 不能这样判断 这样判断等效于: If (d = 3) Or 4 Or 5 Or 6 Then zhi = 1 =>If 0 Or 4 Or 5 Or 6 Then zhi = 1 =>If 4 Or 5 Or 6 Then zhi=1 =>If 7 Then zhi=1 =>If True Then zhi=1 =>zhi=1(即恒成立) ...

if 条件为真 then 执行语句 end if(判断结束) if a=3 then if b=2 then if c=7 then if d=8 then 以上条件都成立的时候执行下边一段话 .....执行代码并结束这个判断 (假如d=5,则执行下边的代码) else ...........执行代码 end if (这里是结束...

网站首页 | 网站地图
All rights reserved Powered by www.wdjh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com