请问这种报表该如何生成？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请问这种报表该如何生成？

共有3509人关注过本帖树形打印复制链接主题：请问这种报表该如何生成？

Bin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/6/8 9:57:00 [显示全部帖子]

Dim d3 As Integer

For i As Integer = 1 To 10

Dim d1 As Integer = (i - 1) * 2 + 1+d3

Dim d2 As Integer = i * 2+d3

If i <= 5 Then '总共5盒

If not (Cstr(d1).Contains("4") OrElse Cstr(d2).Contains("4")) Then

MessageBox.Show(d1 & "-" & d2)

Else If Cstr(d2).Contains("4") Then

d3=1

MessageBox.Show(d1 & "-" & (d2+1))

End If

主题：请问这种报表该如何生成？