#SingleInstance Force
#NoEnv
SetWorkingDir %A_ScriptDir%
SetBatchLines -1
Gui Font, s13
Gui Add, Text, x5 y2 w50 h30, 时:
Gui Add, Text, x75 y2 w50 h30, 分:
Gui Add, Text, x145 y2 w50 h30, 秒:
Gui Add, Text, x5 y25 w50 h30 , 数量:
Gui Add, Text, x5 y50 w50 h30 , 效率:
Gui Add, Edit, x35 y2 w30 h21 vA1
Gui Add, Edit, x105 y2 w30 h21 vA2
Gui Add, Edit, x175 y2 w30 h21 vA3
Gui Add, Edit, x55 y25 w100 h21 vB
Gui Add, Edit, x55 y50 w100 h21 vC
Gui Add, Button, x160 y25 w46 h48, 计算
GuiControl,, A1, 0
GuiControl,, A2, 0
GuiControl,, A3, 0
Gui Show, x527 y491 w210 h75, 效率计算器
Return
Button计算:
GuiControlGet, a1 ,, A1
GuiControlGet, a2 ,, A2
GuiControlGet, a3 ,, A3
GuiControlGet, b1 ,, B,
q := Format("{:.4f}", 480/((a1*60+a2+a3/60)/b1))
GuiControl,, C, %q%
return
GuiEscape:
GuiClose:
ExitApp
暂无讨论,说说你的看法吧