Code:
Private Sub Label5_Click()
Dim strsql
strsql = "SELECT tbl_ShipOrders.receiver_id, " & _
"Receiver.company AS Receiver_name, " & _
"FROM tbl_ShipOrders " & _
"INNER JOIN tbl_Customers AS Receiver " & _
"ON Receiver.custid = tbl_ShipOrders.Receiver_ID " & _
"Order By Receiver_Name"
End Sub
of course this will do nothing since you don't actually use the string.
This would be better in the Access forum