(相关资料图)

1、Private Sub Command1_Click()Dim i As Long, j As LongFor i = 1 To 9 For j = 1 To 9 Print j &"*"& i &"="& i * j, Next j PrintNext iPrint"==========================="For i = 1 To 9 For j = 1 To i Print j &"*"& i &"="& i * j, Next j PrintNext iEnd Sub。

本文就为大家分享到这里，希望小伙伴们会喜欢。