此主题相关图片如下:qq图片20131013125148.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2013-10/2013101312553810049.jpg)
对应的代码:
Dim drs As List(of DataRow) = DataTables("报名表").Select("竞赛名称 = '" & mc.text & "' And 区 = '" & dq & "' and 项目 not like '*集体*'")
Dim tb As new prt.RenderTable
For i As Integer = 0 To drs.count -1 Step 5 '每行五个队员
For n As Integer = i To math.Min(drs.count -1,i + 4) '打印这五个队员
tb.cells(n \ 5, (n Mod 5) * 2).text = drs(n)("编号")
tb.cells(n \ 5, (n Mod 5) * 2 + 1).text = drs(n)("姓名")
tb.Style.FontSize = 10.5
tb.Style.Spacing.Bottom = 1
Next
Next
要解决的问题: 如何调整学生名单的行与行之间的距离,把距离稍微调大一点,效果会更好。
请专家指教!!!