;~ 编写一个程序,其中的 main() 调用一个用户自定义函数(以摄氏度值为参数,并返回相应的华
;~ 氏度值)。改程序按下面的格式要求用户输入摄氏温度值,并显示结果:
;~ Please enter a celsius value:20
;~ 20 degrees celsius is 38 degrees Fahrenheit.
;~ 洗面是转换公式:
;~ 华氏温度 = 1.8 * 摄氏温度+32.0
;~ 这个没看懂是什么意思,请各位帮看看是什么。谢谢。。
$Form1 = GUICreate("练习",200,150,-1,-1)
GUICtrlCreateLabel("摄氏温度:",5,2)
$input = GUICtrlCreateInput("",65,2,80,15)
$button = GUICtrlCreateButton("确定",60,40,30,20)
GUISetState()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $button
main()
EndSwitch
wend
Func main()
wendu()
endfunc
Func wendu()
$ma = '华氏温度:'
$ma &= 1.8*GUICtrlRead($input)+32.0
MsgBox(0,0,$ma)
endfunc
|