设有如下变量声明： Dim TestDate As．Date 为变量TestDate正确赋值的表达方式是______。

A．TestDate=#1/1/2002#

B．TestDate="1/1/2002"#

C．TestDate=date("1/1/2002")

D．TestDate=Form("m/d/yy","1/1/2002")

开放式基金的认购费和申购费可以在基金份额认购或者申购时收取，也可以在赎回时从赎回金额中扣除。 ( )