- 1PS提示：因为图层已锁定，无法编辑图层的处理方法
- 2picacg苹果版怎么找不到|picacg ios版是不是下架了介绍
- 3Adobe Illustrator CS5 序列号大全
- 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本）
- 5Potato(土豆聊天)怎么换头像|Potato app更改头像方法介绍
- 6PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程
- 7Potato(马铃薯聊天)怎么注册不了|Potato不能注册处理方法介绍
- 8最新的Adobe Illustrator CS4序列号大全
- 9Intel i7-9700K性能跑分曝光：同代提升约12%
- 10XP系统怎么清除缓存？
- 11Intel Z390主板有望10月8日公布：8核9代酷睿随后登场
- 12qq邮件是否已读怎么看 QQ邮箱已经发出去的邮件怎么知道对方是否已经查看
[摘要]这是一个模拟股票滚屏的看板程序，程序将10个股票的价格和张跌幅信息以每次5组的方式显示，循环交替，不同以往滚屏尾部留有空白的情况。由于代码简单，这里就不对其多加注释了。<html><...
这是一个模拟股票滚屏的看板程序，程序将10个股票的价格和张跌幅信息以每次5组的方式显示，循环交替，不同以往滚屏尾部留有空白的情况。由于代码简单，这里就不对其多加注释了。<html>
<head>
<!-- sunboy008@sina.com.cn -->
<script LANGUAGE="VBScript">
<!--
dim j,arry1(10),arry2(10),arry3(10),arry4(10)
'分别定义滚动子段的数组
arry1(0)="数码科技"
arry1(1)="太子网络"
arry1(2)="小邦会社"
arry1(3)="正大集团"
arry1(4)="聚友网络"
arry1(5)="全向科技"
arry1(6)="清华紫光"
arry1(7)="同创科技"
arry1(8)="中关村"
arry1(9)="TCL电子"
arry2(0)="12.56"
arry2(1)="56.50"
arry2(2)="5.54"
arry2(3)="23.11"
arry2(4)="16.70"
arry2(5)="14.00"
arry2(6)="9.20"
arry2(7)="12.30"
arry2(8)="87.56"
arry2(9)="12.30"
arry3(0)="12.10"
arry3(1)="55.70"
arry3(2)="5.36"
arry3(3)="22.80"
arry3(4)="16.50"
arry3(5)="13.60"
arry3(6)="9.20"
arry3(7)="12.89"
arry3(8)="88.00"
arry3(9)="12.56"
arry4(0)="6.2%"
arry4(1)="-5%"
arry4(2)="1.2%"
arry4(3)="8%"
arry4(4)="-5.6%"
arry4(5)="3%"
arry4(6)="-3%"
arry4(7)="4%"
arry4(8)="-2.2%"
arry4(9)="-6.3%"
'滚动程序
Sub toplay()
j=j+1
for i=0 to 4
a(i).innerhtml=show1(j-1+i)
b(i).innerhtml=show2(j-1+i)
c(i).innerhtml=show3(j-1+i)
d(i).innerhtml=show4(j-1+i)
next
if j>9 then j=0
settimeout "toplay",2000
end sub
function show1(num)
if num=>10 then
show1=arry1(num-10)
else
show1=arry1(num)
end if
end function
function show2(num)
if num=>10 then
show2=arry2(num-10)
else
show2=arry2(num)
end if
end function
function show3(num)
if num=>10 then
show3=arry3(num-10)
else
show3=arry3(num)
end if
end function
function show4(num)
if num=>10 then
show4=arry4(num-10)
else
show4=arry4(num)
end if
end function
-->
</script>
<style>
<!--
td { font-size:9pt }
-->
</style>
</head>
<body onload="toplay()">
<table border="0" cellpadding="5" cellspacing="1">
<tr>
<td bgcolor="#FFCC66">证券名称</td>
<td bgcolor="#FFCC66">成交</td>
<td bgcolor="#FFCC66">开盘</td>
<td bgcolor="#FFCC66">涨跌</td>
</tr>
<%
for i=0 to 4
dim bg
bg="F0EDE6"
if i mod 2=0 then bg="D2E0F0"
%>
<tr>
<td id="a" bgcolor=<%=bg%> align="right"></td>
<td id="b" bgcolor=<%=bg%> align="right"></td>
<td id="c" bgcolor=<%=bg%> align="right"></td>
<td id="d" bgcolor=<%=bg%> align="right"></td>
</tr>
<%next%>
</table>
</body>
</html>
注：你可以更改其中的每组显示股票的行数，这里设置的是5个。
推荐资讯 总人气榜
最新教程 本月人气
- 1手机百度怎么调回白天模式 手机百度调回白天模式图文说明教程图解
- 2钱咖怎么提现 钱咖提现图文说明教程
- 3穿越火线出现Client file corruption detect怎么用驱动人生来处理
- 4qq主面板不显示头像怎么设置 qq面板不显示头像设置图文说明教程
- 5抱抱app怎么玩 抱抱app使用图文说明教程图
- 6百度翻译在线翻译怎么使用 百度翻译在线翻译英语使用图文说明教程
- 7百度翻译怎么 百度翻译好用吗【实用程度点评】
- 8支付宝越洋红包怎么用 支付宝越洋红包使用方法介绍
- 9apple watch应用有哪一些 苹果watch app介绍
- 10researchkit app有哪一些 researchkit app应用介绍
- 11微信摇一摇电视界面在什么地方里 微信摇一摇电视怎么看图文说明教程图解
- 12百度翻译手机app拍照翻译使用方法图文介绍
- 11500元左右的自动选择手机推荐2017 1500元左右自动选择手机排行榜
- 2小米5 plus怎么？小米5 plus设置评测
- 3小米5 plus参数设置：小米5 plus手机参数
- 4小米5 plus价格多少钱？小米5 plus报价
- 5小米note价格多少钱？小米note手机报价
- 6魅族mx2升级flyme4.1图文说明教程及注意事项(附flyme4.1固件官方版下载)
- 7魅族mx2 flyme4.1固件下载地址：flyme4.1 for 魅族mx2官方版下载
- 8魅族mx3 flyme4.1固件下载地址：flyme4.3 for 魅族mx3官方版下载
- 9小米4s跑分多少？小米4s手机跑分性能
- 10小米note参数设置 小米note手机参数
- 11小米note官网地址 小米note手机官方网址
- 12小米note公布会视频完整版 2015小米note公布会视频直播
