Board logo

标题: [基础] 乘數表生成器 [打印本页]

作者: napa6101    时间: 2009-2-7 19:38     标题: 乘數表生成器

我廢才,又來問



要寫一個像上圖的乘數表
一定要用For/next

這是我寫的,
        Dim i, j As Integer
        For i = 1 To 3
            For j = i To 3
                output.Text = i & " × " & j & " = " & Str(i * j)
                i += i
            Next j
            j += j
        Next i


請高人指點!

[ 本帖最后由 napa6101 于 2009-2-7 19:44 编辑 ]

图片附件: 1.JPG (2009-2-7 19:38, 19.33 KB) / 该附件被下载次数 352
http://bbs.lihuasoft.net/attachment.php?aid=1680


作者: Nothing    时间: 2009-2-9 22:17

Dim i, j As Integer
For i = 1 To 3
     For j = i To 3
          output.Text =output.Text &" " & i & " × " & j & " = " & Str(i * j)
     Next j
Next i





欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/) Powered by Discuz! 6.0.0