为什么九九乘法表用VB打印出来是这样子，为什么没循环到九，还这么换行

俺这是特为你而作的哦，若满意，记得采纳下，谢谢

需要说明一下，Do 循环不是很好用，不如 For 简便

你的程序整体设计不合理，需待改进

本人之前没玩过这类拼字游戏，临时特为你试了试，结果很成功

一开始没加入 if 判断语句，输出的排列不是很整齐

加入一个 if 判断语句，用于判断每次的结果是否为单字符，若是但字符，就用空格补差

程序截图 以及 源码 如下

Private Sub Command1_Click() '按键

    Dim i As Integer, j As Integer   '建立两个数值变量

    Dim d As String, h As String     '建立两个字符变量

    Form1.Cls               '清空窗体显示的内容，多次点击按钮时，避免超出显示范围

    For i = 1 To 9          '第一次循环 列向

        For j = 1 To i      '第二次循环 行向

            If (j * i) < 10 Then h = " " Else h = "" '判断一些结果，主要用于输出对其

            d = d & j & "*" & i & "=" & (j * i) & "  " & h '合并字符串

        Next j

        Print d             '向窗体输出字符串内容

        d = ""              '清空字符串内容

    Next i

End Sub