<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<title>股票计算盈亏程式</title>
<script language="vbscript">
Sub gogo()
'设定spri1为买进价格、张数
spri1 = document.sform.spri1.value
sheets1 = document.sform.sheets1.value
'设定spri2为卖出价格、张数
spri2 = document.sform.spri2.value
sheets2 = document.sform.sheets2.value
'手续费率
rat1 = document.sform.rat1.value
'证交税率
rat2 = document.sform.rat2.value
getins = round( spri1 * sheets1 * 1000 * (1 + rat1) , 0)
getouts = round(spri2 * s ..
访客只能看到部份内容,免费 加入会员 或由脸书 Google 可以看到全部内容