vb 9*9乘法表上半部分打印问题
Dim i As IntegerDim j As Integer
For i = 1 To 9
For j = 1 To i
se = i & "×" & j & "=" & i * j
Picture1.Print Tab((j - 1) * 9 + i); se;
Next j
Next i
怎么打印不出
1*1=1 1*2=2 1*3=3 .......
2*2=4 2*3=6 .......
3*3=9 .......
这样的效果。不明白 --------------------编程问答-------------------- Dim i As Integer
Dim j As Integer
For i = 1 To 9
For j = 1 To i
se = i & "×" & j & "=" & i * j
Picture1.Print Tab((j - 1) * 9 + i); se;
Next j
Picture1.Print
Next i
--------------------编程问答-------------------- 您好2楼的我想要的不是下半部分是上半部分,如果能给我做下tab函数的解释就好了 --------------------编程问答-------------------- tab是跳过多少空格的意思,现在没有vb,所以不能测试了
--------------------编程问答-------------------- 您这个是可以的我测试过的不过打印的是下半部分的,不是上半部分的 --------------------编程问答-------------------- For j = 1 To 9 - i + 1 --------------------编程问答-------------------- 先谢谢您帮我解答下,我想问下您给我的代码和先前j的循环for j=1 to i组成的半乘法表无法拼回一个完整的9*9乘法表。不是很明白 --------------------编程问答-------------------- 效果是
。。。。。。。。。。
。。。。。。。。。
。。。。。。。。
。。。。。。。
。。。。。。
。。。。。
。。。。
。。。
。。
。 --------------------编程问答-------------------- 不明白你要的是什么效果了,Tab里加i我就不太明白了,你话个图吧,对齐的准确一些 --------------------编程问答-------------------- 嗯好的加个Q吧1613128596我传个图给你 --------------------编程问答-------------------- 放到相册或者邮箱都可以,不用那玩意 --------------------编程问答-------------------- 嗯好的,您邮箱多少我发你一个 --------------------编程问答-------------------- 这个点我的头像不就可以看到么? --------------------编程问答--------------------
vb.net
Sub Main()
Dim i As Integer, j As Integer
For i = 1 To 9
For j = 9 To i Step -1
Console.Write(j & "*" & i & "=" & i * j & Space(2))
Next
Console.WriteLine()
Next
End Sub
--------------------编程问答-------------------- /upload/20131228/8025370_12877638986b4Z.png --------------------编程问答--------------------
补充:.NET技术 , VB.NET