I would also like to know how to do this. I have already made a query. How
do I display the values within the query into text boxes on a form?
Here is the existing code I have:
Private Sub BC_Search_AfterUpdate() ' The Code for the 'Search By BarCode'
option
Dim ThisDb As Database, Thisrec As Recordset
Set ThisDb = CodeDb() ' Current MDB
Set Thisrec = ThisDb.OpenRecordset("Select * From [Computer Query] Where
[BarCodeData] ='" & Me.BC_Search & "'")
If [Computer Query] = criteria Then
Me.Service_Tag = Thisrec.Computer_ID
Me.Brand = Thisrec.PC_Brand
Me.cboPCType = Thisrec.Type_Name
Me.Model = Thisrec.PC_Model
Me.Date_Issued = Thisrec.Date_Issued
Me.Lease_Date = Thisrec.Lease_Exp_Date
Me.Image_Version = Thisrec.Image_Version
Me.cboStatType = Thisrec.Status
Me.SCIF_Barcode = Thisrec.BarCodeData
End If
End Sub
Instead of using the query fields to assign the values to be displayed in
the text boxes, would it be similar to using the call to a "Column" of a
combo box? If not, how would I call the values/fields from a query?
Please help...