广告广告
  加入我的最爱 设为首页 风格修改
首页 首尾
 手机版   订阅   地图  繁体 
您是第 4172 个阅读者
 
发表文章 发表投票 回覆文章
  可列印版   加为IE收藏   收藏主题   上一主题 | 下一主题   
cluise987
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x13 鲜花 x86
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片
推文 x0
[Basic][范例] 股票盈亏计算程式.htm
<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 可以看到全部内容



[ 此文章被cluise987在2007-07-06 23:15重新编辑 ]



民主自由诚可贵;
大家一起来珍惜,
台湾将来自己走,
建立一个台湾国。

献花 x0 回到顶端 [楼 主] From:台湾TWNIC-TW | Posted:2007-07-06 22:48 |
overing 手机
个人文章 个人相簿 个人日记 个人地图
初露锋芒
级别: 初露锋芒 该用户目前不上站
推文 x0 鲜花 x55
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

这年头有人连VB跟VBScript都傻傻分不清楚了... 表情
虽然写法是大同小异...
不过VBScript并不能制成执行档...
还有在一般的分类上这两种也算是分开吧?
板主看到请增加个VBScript的项目吧!~


[ 此文章被overing在2007-07-08 13:42重新编辑 ]


Zippy G2 600W
Intel C2Q Q9550
Gigabyte GA-X48-DQ6
Gigabyte GV-NX96T512H-B
G-skill pi 1100MHz 2Gx4
ACARD ANS-9010 32GB (Windows7 10sec boot!!)
WD 150GB(WD1500ADFD)/640GB(6400AASK)
献花 x0 回到顶端 [1 楼] From:欧洲 | Posted:2007-07-07 09:20 |
cluise987
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x13 鲜花 x86
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

没有vbscript选项,只好暂时vb代替。


民主自由诚可贵;
大家一起来珍惜,
台湾将来自己走,
建立一个台湾国。

献花 x0 回到顶端 [2 楼] From:台湾TWNIC-TW | Posted:2007-07-07 17:40 |

首页  发表文章 发表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.025136 second(s),query:16 Gzip disabled
本站由 瀛睿律师事务所 担任常年法律顾问 | 免责声明 | 本网站已依台湾网站内容分级规定处理 | 连络我们 | 访客留言