九九热九九I在线观看i国产女优视频i中文字幕人成高清i欧美亚洲日本一区二I久久久久acI伊人在线视频网站I久久久久IVI中文字幕永久有效I9爱在线观看一区I久久鲁一鲁I国产精品98I天天综合网7799I大香蕉资源站I真人高清无码

乘法表打印實現如下
Dim se As String
        Dim j As Integer
        Dim i As Integer
        For i = 1 To 9

            ' TextBox3.Text &= Space((i - 1) * 9)
            For j = 1 To 9
                se = i & " *" & j & "=" & i * j
                TextBox3.Text &= se & Space(8 - Len(se))
            Next j
            TextBox3.Text &= vbCrLf



        Next i