JSRUN
Private Sub Command1_Click() For i = 1 To 5 For j = 1 To i Print Chr(Asc("A") + i); Next j Print Next i End Sub
使用此草稿 删除草稿