各位老师前辈，请教一下，像下面的这段代码，有没有办法简化写法，希望能指点一下，多谢了？
Dim t As Table = Tables(e.form.name & "_Table1")
t.Cols("审批状态").TextAlign = TextAlignEnum.Center
t.Cols("单据状态").TextAlign = TextAlignEnum.Center
t.Cols("预约通知").TextAlign = TextAlignEnum.Center
t.Cols("预约状态").TextAlign = TextAlignEnum.Center
t.Cols("赴约状态").TextAlign = TextAlignEnum.Center
t.Cols("预约次数").TextAlign = TextAlignEnum.Center
t.Cols("面试结果告知").TextAlign = TextAlignEnum.Center
t.Cols("面试进度").TextAlign = TextAlignEnum.Center
t.Cols("面试评级").TextAlign = TextAlignEnum.Center
t.Cols("试用建议").TextAlign = TextAlignEnum.Center
t.Cols("面试次数").TextAlign = TextAlignEnum.Center
[此贴子已经被作者于2018/11/24 17:17:18编辑过]
加好友 
发短信
Post By：2018/11/23 14:41:00 [只看该作者]
