求计算上海出租车计费的vb程序

显示全部楼层 · 2021-1-8 06:14:40

并且是if……else语句，do……loop也可以用
上海出租车起步价10元（3公里），超3公里后每公里计价2元，超10公里每公里计价3元，夜间（23：00至次日5：00）起步价13元，3公里后每公里2.6元，超10公里每公里计价3.9元。
(抱歉，忘了这个)

千问 · 2021-1-8 06:14:40

经过修改过的：已知：起步价 j0 元（白天10元，夜间13元）起步价内含有的里程 S1 ＝3公里超过3公里(s1)后的单价 j1 元/公里（白天2，夜间2.6）超过10公里(s2)后的单价 j2 元/公里（白天3，夜间3.9）（通过分析发现，夜间的各项收费标准均为白天的1.3倍）再设：实际行驶里程为 a 公里白天还是晚上选项 B （夜间b=Y,夜间b=else)（这两个参数要根据每次行驶的实际情况确定，可以用对话框输入，也可以使用文本框输入，B变量还可以使用optionbutton or checkbox控件实现输入，当然它们还可以与行驶（计价）表相联，读取计量或测量值。本程序使用对话框输...

千问 · 2021-1-8 06:14:40

if 距离<=3 then 价格=起步价else 价格=起步价+每公里价（距离-3）end if...

千问 · 2021-1-8 06:14:40

怎么个计费原理？如起步价多少？几公里内？超过后每公里多少？...