VB.net九九乘法表 上三角和下三角

[每天至少八杯水i]

在学校，在vb中学习了九九乘法表，只学习了上三角，而下三角苦苦的在上机课，试了一节课才试出来，感觉自己很笨，都是还是要把代码分享出来。

上三角

dim se As String
 Label1.Text = Space(35) & "九九乘法表" & vbCrLf
 Label1.Text &= Space(35) & "------------" & vbCrLf
 For i = 1 To 9 
    For j = 1 To i 
        se = i & "x" & j & "=" & i * j
         Label1.Text &= se & Space(8 - Len(se)) 
    Next j 
Label1.Text &= vbCrLf 
Next i 

下三角

Dim se As String
Label1.Text = Space(35) & "九九乘法表" & vbCrLf 
Label1.Text &= Space(35) & "------------" & vbCrLf 
For i = 1 To 9 
    For j = i To 9 
    se = i & "x" & j & "=" & i * j
     Label1.Text &= se & Space(8 - Len(se)) 
    Next j
     Label1.Text &= vbCrLf &space(8*i) 
Next i 

根据书本上写的，写的很简单。