printanje v VB6.0

Kako bi lahko sprintal z klikom na gumbek eno stran..

Npr: imam form..in tja gor dolocim kje naj kaj stoji na podlagi A4 formata..to so npr. comboboxi..te combi pa berejo iz mdbja..to ni vazno..

Samo kako naj jaz zdej dolocim da mi on sprinta to v taki poziciji na papirju..

Pa se to..stevilo vrstic se veca ali manjsa..odvisno koliko je zapisov v mdb..kako bi to realiziral..

Tnx

Ej, Zvonko.... da ne načnem nove teme.

A se da kje v nastavitvah VB nastavit, kaj bolj normalenega za dizajniranje DataReportov?
Vse zgleda precej enostavno, kot v Accessu... AMPAK kaj drugače velikosti in pozicijo textboxov kot z vpisovanje left, top, height.... je skoraj nemogoče!

Aja, kaj bo pa v txt boxih sem pa s kodo rešil:

Dim SQL As String

Dim cnRepEk As New ADODB.Connection
cnRepEk.Open "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=h:\BKts\BKts_97.mdb"

Dim RsRepEk As New ADODB.Recordset

SQL = "SELECT bla, bla, bla

Set RsRepEk = cnRepEk.Execute(SQL)

With DatRepEkipe
.DataMember = vbNullString
Set .DataSource = RsRepEk
.Caption = "Pregled treningov"

With .Sections("Section1").Controls
.Item("txtDatum").DataField = RsRepEk.Fields(0).Name
.Item("txtNaz").DataField = RsRepEk.Fields(1).Name
.Item("txtGastu").DataField = RsRepEk.Fields(2).Name
.Item("txtKrat").DataField = RsRepEk.Fields(3).Name
.Item("txtOsn").DataField = RsRepEk.Fields(4).Name
.Item("txtVPi").DataField = RsRepEk.Fields(5).Name
.Item("txtVIp").DataField = RsRepEk.Fields(6).Name
.Item("txtSPi").DataField = RsRepEk.Fields(7).Name
'.Item("txtSIp").DataField = RsRepEk.Fields(8).Name
End With
.Show
End With

End Sub

emm zvonko..jaz se s tvojim preim*rom ukvarjam ze neki casa pa mi se vseeno ni cisto nic jasno..ce se slucajno se kaj spomnis kako je kaj delalo..bi se ti ljubilo malo komentarjev notri nametati..

Crystal Report je odličen in enostaven program za izdelavo poročil. Lahko določiš bazo podatkov, tabele, povezave, pišeš formule in povežeš design programi kot so Visual Studio in Visual Object.