日期格式yyyy:MM:dd 改为yyyy-MM-dd？

请问一下怎么用vb语言将日期格式yyyy:MM:dd   改为yyyy-MM-dd？

 

日期转换函数：format(日期,"yyyy-MM-dd")          日期为变量

 

例子：

dim   a   as   String   ,   b   as   string  
  a   =   Now  
  b   =   format(a,   "yyyy"   &   "-"   &   "MM"   &   "-"   &   "dd")  
  text1.text   =   b