※ 引述《Sylph (炁+盆滿缽滿)》之銘言：
: 如圖，有上下兩個欄位，
: 我想要上欄改2時，下欄自動變60；
: 同理，下欄改30時，上欄自動變1。
: 請問撰寫思路應該是怎麼樣？
: https://i.imgur.com/V6Gjl2X.jpg
這板板主不做事 板上廢文充斥
最後一次幫忙解答 兩天後自刪 看到是緣分 沒看到我也沒辦法
global exchangeRate := {"NTD":1, "USD":27.66, "HKD":3.55
, "JPY":0.24, "AUD":19.83, "GBP":37.44}
Gui, 1:New
Gui, 1:Add, Text, x10 y10, 簡易匯率計算機，不對計算結果負任何責任
for k, v in exchangeRate {
Gui, 1:Add, Text, x10 y+10 w50, %k%
Gui, 1:Add, Edit, x+10 yp-3 gexchange w150 v%k%, 0
}
Gui, 1:Show, , exchange
return
exchange() {
GuicontrolGet, userinput, , % A_GuiControl
if userinput is not number
return
_NTD := 1 * exchangeRate[A_GuiControl] * userinput
for cur, FX in exchangeRate {
if (cur=A_GuiControl)
Continue
GuiControl, -g, % cur
calc := (cur="NTD") ? _NTD : _NTD / FX
GuiControl,, % cur, % FormatexchangeRate(calc)
GuiControl, +gexchange, % cur
}
}
FormatexchangeRate(number) {
effective := Round(number, 4)
comma := RegexReplace(effective, "(\d)(?=(?:\d{3})+(?:\.))", "$1,")
return RegexReplace(comma, "(\.\d+?)0+\b", "$1")
}
GuiClose(){
ExitApp
}