<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 
可以看到全部內容
