@@@@@@ 旷世难题:VB6中无法实现嵌套循环显示的效果? @@@@@@@@@@@@@@@@@@@@@@的解决方法

@@@@@@ 旷世难题:VB6中无法实现嵌套循环显示的效果? @@@@@@@@@@@@@@@@@@@@@@的
每组3行.每组10列.每页10组这样显示,并且分页显示.

在ASP中网页列出这个东西非常容易:

VB code


<%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%>
......加上分页程序就行.

但是在VB如何达到这样的效果呢?用什么控件,如何实现?
求最详细答案,谢谢

------解决方案--------------------
帮顶....
------解决方案--------------------
建议楼主在vb窗体中放个webbrowser控件，然后把你这Asp代码改成vbscript的放在网页中执行
------解决方案--------------------
在VB中要达到楼主这种效果除了用内嵌Html外，只有自己做控件了
------解决方案--------------------

VB code

Option Explicit

Private 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
    Next
End Sub

------解决方案--------------------
内嵌Excel也行

------解决方案--------------------
排队看高手

------解决方案--------------------
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP

@@@@@@ 旷世难题:VB6中无法实现嵌套循环显示的效果? @@@@@@@@@@@@@@@@@@@@@@的解决方法

相关推荐