In the onclick event of your unbound textbox launch your Medical History form with the following code:
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmMedicalHistory"
stLinkCriteria = "[PatientID]=" & "'" & Me![PatientID] & "'"
DoCmd.OpenForm stDocName, , ...