<% For r =9 To 1 Step -1 For c = 1 To r Dim step1,step2,step3,step4 step1=c & "*" & r & "=" & c*r & "|" step2=CStr(step1) Response.Write step2 step3=Split(step2,"|") 'Response.Write step3(0) For Each s In step3 Next Next Next %> 问题补充:这个我做的是一个乘法口诀表,我想把每一个口诀都放到一个二维数组中,我用Split它应该是以"|"分界的把每个元素放到数组中的..如果要放到数组中应该怎么做?