三大结构之选择----IF

Posted 2020-07-01 丁中文

现实世界中，根据面临的特定情形，不断调整我们应对的方式，是每一个智慧生命体具有的典型特征。在VB的世界里，也具有这样的特征；VB提供了一个结构，让我们告诉程序，当前条件下，需要采取这种办法，就VB的书写语法格式，是这样滴：

If     条件   Then
             语句块
End If

例子：

 If a < b Then
            Print "a真小于b"
        End If

在上面的例子中，如果条件不成立，我们什么也不做，选择了忽略，如果我们不想忽略，也就是条件成立，我们采取A计划应对，如果不成立，我们启动B计划应对，此时的VB书写格式是这样滴：

If     条件   Then
        语句块1

Else

语句块2
End If

---------------------------------------

If     条件   Then
        A计划

Else

B计划
End If

例子：

 If a < b Then
        Print "a真小于b"

Else

Print "a真的不小于b"
End If

上机练习操作如下：

在窗体上添加一个CommandButton按钮,默认名字为Command1，修改为cmdSort，并将Caption属性值修改为：排序了。

修改后的图如下：

双击“排序了”按钮，进入EditCode代码编辑界面。

在光标闪烁的地方，按下Tap键，并写上如下的代码：

    Dim a As Integer
    Dim b As Integer
    
    a = Int(Rnd * 1000)
    b = Int(Rnd * 1000)
    
    If a < b Then
        Print "a真滴小于b"
    Else
        Print "a真的不小于b"
    End If

或如下图：

编译，并运行如下图：

显示界面如下：

点击排序了按钮，在窗体上显示如下：