@@@@@@ 旷世难题:VB6中无法实现嵌套循环显示的效果? @@@@@@@@@@@@@@@@@@@@@@的
每组3行.每组10列.每页10组这样显示,并且分页显示.
在ASP中网页列出这个东西非常容易:
<%for g=0 to 9%><table><%for i=0 to 2%><tr><%for j=0 to 9%><td><%if j=0 then %><font=red><%end if%><%response.write(g&i&j)%></font></td><%next%></tr><%next%></table><%next%>......加上分页程序就行.
Option ExplicitPrivate Sub Command1_Click() Dim g%, i%, j% For g = 0 To 9 For i = 0 To 2 For j = 0 To 9 If j = 0 Then Me.ForeColor = vbRed Print g, i, j Me.ForeColor = vbBlack Else Print g, i, j End If Next Next Print Print NextEnd Sub
[解决办法]
内嵌Excel也行
[解决办法]
排队看高手
[解决办法]
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP