e.Form.Controls("label19").text="HHZY" & format(Date.Today,"yyyyMMdd")& Format(Date.now(),"HHmmss")
请参考:
http://www.foxtable.com/help/topics/0362.htm