vb对齐方式代码