Foxtable(狐表)用户栏目专家坐堂 → [求助]批量设置要显示的列及其列宽能否简化?


  共有2857人关注过本帖平板打印复制链接

主题:[求助]批量设置要显示的列及其列宽能否简化?

帅哥哟,离线,有人找我吗?
cqlpjks
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:407 积分:3194 威望:0 精华:0 注册:2011/2/28 11:57:00
[求助]批量设置要显示的列及其列宽能否简化?  发帖心情 Post By:2021/4/7 9:40:00 [只看该作者]

Dim mbs() As String = {"目标1","目标2","目标3","目标4","目标5","目标6","目标7","目标8"}
For Each mb As String In mbs
      Tables( "总分2021级目标").SetColVisibleWidth("单位|70|部别|50|年级|50|单位代码|44|目标1|50|目标2|50|目标3|50|目标4|50|目标9|50|目标10|50|目标5|50|目标6|50|目标7|50|目标8|50")
Next

因红色部分{"目标1","目标2","目标3","目标4","目标5","目标6","目标7","目标8"}列宽都是50,能否简化用“mb”代替?若能如何修改代码?请指教。谢谢!

或者:
For i As Integer = 1 To 8
"目标1","目标2","目标3","目标4","目标5","目标6","目标7","目标8" 变成 “目标” & i
[此贴子已经被作者于2021/4/7 9:42:26编辑过]

 回到顶部