batman

用vbs吧：

input = InputBox ("请输入本金")
lx = Round (input*1.39*7/360 ,2)
If Left (lx, 1) = "." Then lx = "0" & lx
msgBox lx & "元", 0, "利息为："
复制代码