laifangsong's blog

取长补短，精益求精。 (打个广告,想做手机网站和asp/asp.net网站的可以跟我联系.QQ:25313644)
posts - 51, comments - 188, trackbacks - 0, articles - 0
  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理

递归输出3个数字结合

Posted on 2006-10-23 12:58 laifangsong 阅读(64) 评论(0)  编辑 收藏 所属分类: 算法


<%

OutputJoin "", 1


'递归输出3个数字结合
Sub OutputJoin(s, count) 
    If count > 3 Then
        Exit Sub
    End If

    Dim i, t
    For i = 1 To 9
        t = s '将值保存
        
        s = s & i
        If count = 3 Then
            Response.Write s & "<br>"
        End If
        OutputJoin s, count+1

        s = t '还原值
    Next
End Sub

%>

标题  
姓名  
主页
Email (只有博主才能看到) 
验证码 *  看不清,换一张 [登录][注册]
内容(请不要发表任何与政治相关的内容)  
  登录  使用高级评论  新用户注册  返回页首  恢复上次提交      


相关链接:

最新IT新闻:
微软4.86亿美元收购Greenfield
苹果已然取代微软地位成行业众矢之的
Intel 收购 Poky Linux ,为 MID 注入新的动力
雅虎将关闭社交网站Mash
中国互联网战争局势图
博客园新闻频道  博客园首页  社区