For Setting The Parameter In The Sub Report
VB Code:
  1. Report.Subreports("NameOfSubReport").SetParameterValue("ParameterName", "ParameterValue")