1: 2: 3:
Private Sub Report_Load() Me.KlantNaam.value = SELECT Klanten.naam FROM Klanten WHERE (((Klanten.ID)=[Forms]![Project]![Klantnummer])); End Sub