设计出租车计价程序

7.1 许卓涵

我一直对编程这件事很感兴趣，当看到计算器能一下算出答案，抖音的关注和爱心一点就亮······便觉得这是一件很有趣的事。我带着满心期待选择了“vb编程”这个选修课。

在vb选修课第一节课老师所讲的内容就让我震撼了，比尔盖茨、雷军、马化腾等商业大佬居然都学过程序并且水平很高。真所老师所说，学习编程并不是让我们一定成为程序员，而是训练我们的思维，提高解决问题的能力，做任何事情更容易成功。而Vb编程语方就是比尔盖茨所在微软公司出品的，它是一种可视化的面对对象的采用事件驱动机制的编程语言。虽然这句话看着很深奥，通过自已一步步的深入学习，了解vb，发现并不是那么难懂。

Vb的入门很简单，认真听根本不会存在“听不懂”这一个问题。

今天我就来介绍vb的其中一种：if语句。

If是如果的意思，IF语句，也叫条件语名、判断语句、分支语句。它的功能是根据条件来决定程序执行的方向。程序在从上到下的运行过程中如果遇到IF语句，就会根据IF语句中的条件来决定程序运行的位置。

第一种形式为基本形式：   if(表达式) 语句
其语义是：如果表达式的值为真，则执行其后的语句，否则不执行该语句。其过程可表示为图1。
第二种形式为: if-else
if(表达式) 
    语句1;
else 
    语句2;
其语义是：如果表达式的值为真，则执行语句1，否则执行语句2 。其执行过程可表示为图2。
     在if语言中，用于条件的比较运算符：＞、 ＜、=、＜＞、＜=、＞＝和数学的比较运算是一样的，，这样更使得if语言理解更容易也更有趣了。

了解了if语言，那么我们就来用它来编写实用程序：出租车计价器程序的设计，出租车收费的标准是，3 公里内收费7 元，超过 3 公里后，超过部分按 1.5 元/公里收费。出租车我们都坐过，坐车时我们时不时会瞄一瞄花多少钱，是不是觉得这个计价器很神奇啊！

分析：假设行驶里程为 a，应付费用为 b，

当 a 小于等于 3 时，b 等于 7；

当 a 大于 3 时，b 等于 7+(a-3)*1.5其实，计价器程序核心就是利用if语句来实现的。

       1、首先打开vb程序，设计计价器的界面。

2，设计核心代码，于是要双击“计算”键，然后输入以下代码：

Dim a,c as single

Let a=val(text1.text)

If a<=3 then

b=7

Else

b=7+(a-3)*1.5

End if

Text2.text=b

然而运行起来，你会发现退出按钮没有作用，所以在结束运行后再在代码的“end”

运行程序：输入里程分别2.5、7.4公里。显示结果如图

看了以上步骤之后，你是不是对vb编程有了很大的兴趣了呢？那就打开学习编程的大门学起来吧！毕竟vb编程的奥秘还有很多哟！