Private Sub Form_Click() Cls For i = 0 To 8 For j = 0 To 8 Print (i + j) Mod 9 + 1; Next j Print Next iEnd Sub
第17题,VB拜托。
Private Sub Form_Click() Cls For i = 0 To 8 For j = 0 To 8 Print (i + j) Mod 9 + 1; Next j Print Next iEnd Sub