.版本 2
.程序集 窗口程序集_啟動窗口
.子程序 _計算按鈕_被單擊
.局部變量 公里, 雙精度小數(shù)型
.局部變量 油量, 雙精度小數(shù)型
.局部變量 油價, 雙精度小數(shù)型
.局部變量 每公路價格, 雙精度小數(shù)型
.局部變量 百公里油耗, 雙精度小數(shù)型
.局部變量 每公升油路程, 雙精度小數(shù)型
.如果真 (編輯框_公里.內(nèi)容 ＝ “” 或 編輯框_油箱.內(nèi)容 ＝ “” 或 編輯框_油價.內(nèi)容 ＝ “”)
  信息框 (“信息不全”, 0, , )
  返回 ()
.如果真結(jié)束
公里 ＝ 到數(shù)值 (編輯框_公里.內(nèi)容)
油量 ＝ 到數(shù)值 (編輯框_油箱.內(nèi)容)
油價 ＝ 到數(shù)值 (編輯框_油價.內(nèi)容)
每公路價格 ＝ 油量 × 油價 ÷ 公里
百公里油耗 ＝ 油量 ÷ 公里 × 100
每公升油路程 ＝ 公里 ÷ 百公里油耗 ÷ 2
信息框 (“每公里的油錢是：” ＋ 到文本 (四舍五入 (每公路價格, 4)) ＋ “ 元” ＋ #換行符 ＋ “每跑100公里需用：” ＋ 到文本 (四舍五入 (百公里油耗, 4)) ＋ “ 公升” ＋ #換行符 ＋ “每公升油可以行駛：” ＋ 到文本 (四舍五入 (每公升油路程, 4)) ＋ “ 公里”, 0, , )

運行結(jié)果：