Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Private Sub cboProductID_AfterUpdate()
Me.Price = DLookup("Price", "tblStock", "ProductID = '" & Me.cboProductID & "'")
End Sub