列名不能以数字开头，也不能包含除下划线（_）之外的符号
你可以给列起名 列1_1 , 列1_2 , 列1_3 , 列2_1 ，列2_2 等
用户名分别叫 1， 2 。。。
这样你在项目事件 MainTableChanged 中写入以下代码即可实现你想要的功能
If CurrentTable.Name = "表A" Then
Select Case user.name
Case "1"
For Each c As Col In Tables("表A").Cols
If c.name.contains("列1_") Then
c.visible = True
Else
c.visible = False
End If
Next
Case "2"
For Each c As Col In Tables("表A").Cols
If c.name.contains("列2_") Then
c.visible = True
Else
c.visible = False
End If
Next
End Select
End If
加好友 
发短信
Post By：2016/3/13 0:12:00 [显示全部帖子]
