Cls #39清除窗体的内容 Width = 9000 #39以免窗口太小 Height = 6000 Dim i As Integer， j As Integer For i = 1 To 9 For j = 1 To i Print vbTab i quot×quot j quot=quot...