Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Dim strTabel As String
strTabel = "Prijzen Query"
strSQL = "Select * From " & strTabel & vbCrLf _
& "WHERE (([LeverancierID]=" & Me.Factuur_leverancier.Value & ") " _
& "And ([ProductID]= " & Me.Factuur_product.Value & ") " _
& "And ([Me.Hoeveelheid.Value=" & [Hoeveelheid] & "))"
Me.RecordSource = strSQL
Me.Requery
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.