开vb,画个按钮,之后在按钮上写代码:Private Sub Command1_Click()For i = 1 To 3 For j = 1 To i For k = j To 3 Print "i="; i, "j="; j, "k="; k Next k Next jNext iEnd Sub运行就能得到答案了。 共得到14行3列的数据。