有时候我们需要在vbs中输入的字符实现对齐效果，那么就可以参考下面的代码了
运行效果：
代码（fOutput.vbs）：
代码如下:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_NetworkAdapterConfiguration",,48)
For Each objItem in colItems
Wscript.Echo objItem.Caption & fOutput(objItem.Caption) & "textinfo"
Next
Function fOutput(strName)
strLen = Len(strName)
Select Case True
Case strLen < 8
fOutput = chr(9) & chr(9) & chr(9) & chr(9) & chr(9)
Case strLen < 16
fOutput = chr(9) & chr(9) & chr(9) & chr(9)
Case strLen < 24
fOutput = chr(9) & chr(9) & chr(9)
Case strLen < 32
fOutput = chr(9) & chr(9)
Case strLen < 40
fOutput = chr(9)
Case Else
'超过40的只取前32位
For K = 1 To strLen - 32
fOutput = fOutput & chr(8)
Next
fOutput = fOutput & " ..." & chr(9)
End Select
End Function
- 2012年公开招聘茂名市直属学校教师和高州农校教职员笔试成绩公布及资格复审通知
- 2012年绵阳市游仙区公开招聘事业单位工作人员公告
- 2012年临沂市临沭县教育系统公开招聘中小学、幼儿园教师总成绩的通知
- 2012年青岛市胶州市事业单位公开招聘工作人员拟聘用人员公示
- 昆明市东川区住建局2012年事业单位招考总成绩及体检人员公示
- 2012年度临沂市临沭县教育系统公开招聘中小学、幼儿园教师总成绩
- 2012年青岛市胶州市事业单位招聘拟聘用人员公示名单
- 2012年青岛市胶州市事业单位公开招聘工作人员考察缺少材料情况公示
- 2012年广州市土地房产管理职业学校拟聘人员公示
- 云浮市中心体校2012年公开招聘工作人员总成绩排名及进入体检人选公告
- 云浮市2012年公开招聘工作人员总成绩排名及进入体检人选公告
- 2012年华南师范大学公开招聘教学辅助人员面试通知（第二批）
- 2012年广州市人防项目建设中心公开招聘工勤人员拟聘用公示
- 2012年广东省文化厅直属广东粤剧院公开招聘工作人员公示
- 2012年广州市干部疗养院/广州市第十一人民医院招聘拟聘人员公示（一）
- 绵阳市游仙区2012年公开招聘事业单位工作人员计划表
- 潍坊市寿光市2012年部分事业单位公开招聘人员考试专业类别目录
- 连云港市赣榆县2012年中小学教师招聘面试公告
- 2012年遵义市规划信息中心招考事业单位专业技术人员综合成绩公示
- 2012年遵义市花岗区取消应急特勤大队人员政审资格公示
- 考试华宁县的教师考试成绩什么时候出来？
- 资阳市安岳县2012年公开考试招聘教师资格复审公告
- 2012年枣庄市市直事业单位公开招聘工作人员简章
- 昆明市宜良县2012年卫生、计生系统事业单位招聘成绩公示
- 2012年枣庄市直事业单位公开招聘工作人员岗位汇总表
- fit as a fiddle
- fit for
- fit in
- fit in with
- fit out
- fit up
- fix on／upon
- fix up
- flame out
- flame up
- 凶相毕露
- 凶神恶煞
- 凶虐
- 凶蛮
- 凶讯
- 凶邪
- 凶险
- 凷
- 凸
- 凸出
- 全国粮食安全宣传周活动总结报告
- 读书活动情况总结
- 平安校园教育活动课总结
- 植树节志愿活动总结模板范文
- 教师节活动总结与心得1500字汇总
- 关于中小学生安全周主题总结最新
- 节能减排活动情况总结
- 五四青年节活动总结5篇范文
- 社区春节送春联活动工作总结
- 感恩节活动总结活动主题范文精选5篇