分享

1加到100

 asmoke 2006-06-28
<%
Dim I,J
J = 0
For I=1 To 100
 J = J+I
Next
Response.Write J
%>
 
<%
Dim I,J
J = 0
while i<= 100
J = J+I
wend
Response.Write J
%>

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多