vb_format函数