求救!!CrystalReportViewer显示SQL数据库的图片，怎样改变大小，怎样分页显示每条记录？？？

[Dave_net]

Dim ds As New DataSet

Dim varSQL As String
Dim con As New SqlConnection("Server=127.0.0.1;Database=northwind;uid=sa;pwd=")
ds.Reset()
varSQL = "select * from Photo"
Dim rda As New SqlClient.SqlDataAdapter(varSQL, con)
con.Open
rda.Fill(ds, "PhotoList")
con.Close()
Dim orpt As New CrystalReport1
orpt.SetDataSource(ds)
CrystalReportViewer1.ReportSource = orpt
图片能显示，但很小，还有它一页把每条记录的图片都显示出来了。
我想达到效果是:1.一页显示一张图片，图片大一点
2.一页显示四张图片（同一张），田字形分布。

[okyzx]

帮忙顶一下,希望有高手的到来

[SeeSunSet]

一页显示一条的话,在公式里面加句话就行了.
在详细资料上点格式化节，在后面页新建页打勾
公式中输入：
if onlastrecord then
formula = false
else
if RecordNumber mod 1 =0 then
formula =true
else
formula =false
end if
end if

[loveme855]

顶一下!!!!!

[wangchaocn]

mark