Just a quick response, as I have to shoot . . .
1.Can you check that the field [MEDRECNO] is used on the new form you open.
2. Can you check that the Control Name on your subform is "MEDRECNO" (will be the ControlSource too anyway).
If so, try this:
strLinkCriteria = "[MEDRECNO]= '" &...