Thanks,
Getting there, it now opens to a blank record, not the record I need to edit.
Have the following now:
Private Sub Purchase_Order_DblClick(Cancel As Integer)
Dim PONum As String
PONum = [PurchaseOrd]
DoCmd.OpenForm "tblpurchaseorder2", acFormDS, , [PurchaseOrd] =...