How do I pass a default parameter to a CR XI report in VB6?

 

For example I have a parameter list of years from 2000 to 2020 and I want to pass on the result of str(Year(Now)) so that the user automatically sees the current calendar year as his/her default option - but can choose another year from the drop down list - if wished.

 

"AddDefaultValue" seems to have no effect at all (probably because the current year already exists in the parameter list)

 

"AddCurrentValue" removes the parameter altogether and the report defaults to the current year.

 

Any suggestions?

 

Thanks in advance!

 

Peter Tyler