| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 814 人关注过本帖
标题:关于VBSCRIPT的问题
只看楼主 加入收藏
janetding
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2006-4-11
结帖率:100%
收藏
 问题点数:0 回复次数:2 
关于VBSCRIPT的问题
asp初学者,在这段程序中,FOR...NEXT..语句看不太懂,高手帮忙讲解一下
谢谢啦
<%@ Language=VBScript %>
<html>
<title>
移动鼠标改变背景颜色
</title>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--
function MakeColor(ThisColor) {
document.bgColor = ThisColor;
}
//-->
</SCRIPT>
<center>
<table cellspacing=2 Border="0">
<tr>
<%
Dim I1, I2, I3 ' Looping variables for RGB Color
For I1 = 0 to 15 step 3
For I2 = 0 to 15 step 3
For I3 = 0 to 15 step 3
Color = Hex(I1) & Hex(I1) & Hex(I2) & Hex(I2) & Hex(I3) & Hex(I3)
%>
<td bgcolor="#<%=Color%>">
<a href="#" LANGUAGE=javascript OnMouseOver="return MakeColor('#<%=Color%>');">
<img src="clear.gif" width=10 height=10 border="0"></a>
</td>
<%
Next
Next
%>
</tr>
<tr>
<%
Next
%>

</tr>
</table>
</center>
</html>

[[it] 本帖最后由 janetding 于 2008-11-20 09:26 编辑 [/it]]
搜索更多相关主题的帖子: VBSCRIPT 
2008-11-20 09:25
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 
Dim I1, I2, I3        '定义颜色变量
For I1 = 0 to 15 step 3     ’从0到15循环,步长为3,即取值为0 3 6 9 12 15
For I2 = 0 to 15 step 3     
For I3 = 0 to 15 step 3
Color = Hex(I1) & Hex(I1) & Hex(I2) & Hex(I2) & Hex(I3) & Hex(I3)'转换为16进制
%>
2008-11-20 09:39
janetding
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2006-4-11
收藏
得分:0 
谢谢版主

2008-11-20 10:27
快速回复:关于VBSCRIPT的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015888 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved