PrintForm

aasted> I would suggest that you use a report for doing this. I assume that the data you are entering is going into one table. Use the report wizard to create a report. you could also place a button on your form using the button wizard to print the report.

Det er min Form jeg skal have til at fylde en hel A4 side, kan jeg evnt. lave to form file og udskrive på et A4 papir......
Leif

Hej Terry.

Hvis jeg bruger flere table i en database, hvordan får jeg dem over på en datareport i VB.

jeg sender lidt code på hvordan jeg SELECTer de data som gerne skulle over på en datareport.

Private Sub lstStandard_Click()
    Dim dbLHDR As Database
    Dim strResult As String
    Dim rstResult As Recordset
    Dim strSQL As String
    Dim intID As Integer
   
    Set dbLHDR = OpenDatabase(App.Path & \"\\LHDR.mdb\", True)
        intID = lstStandard.ItemData(lstStandard.ListIndex)
        strSQL = \"SELECT FornavnID, Fornavn, Efternavn, Adresse, Postnr, Bynavn, Telefon, Notat FROM min WHERE FornavnID=\" & intID
    Set rstResult = dbLHDR.OpenRecordset(strSQL)
   
        List1.Clear
   
    While Not rstResult.EOF
     
        strResult = rstResult.Fields(1) & vbTab & rstResult.Fields(2) & vbTab & rstResult.Fields(3) & vbTab & vbTab & rstResult.Fields(4) & vbTab & rstResult.Fields(5) & vbTab & rstResult.Fields(6) & vbTab & rstResult.Fields(7) & vbTab & rstResult.Fields(8)

        List1.AddItem strResult
        rstResult.MoveNext
   
    Wend
       
        rstResult.Close
        dbLHDR.Close

Mvh. Leif