主题：Textbox指定用户输入

If e.Row("维修完成") = True
e.Cancel = True
Return
End If
Select Case e.Col.Name
Case "维修编号","收到时间","报修人","设备名称","设备编码","设备类型","用户故障描述","实际测试故障","设备照片"
If User.Name <> "A"
e.Cancel = True
End If
Case "维修时间","维修过程","维修照片"
If User.Name <> "b"
e.Cancel = True
End If
Case "维修完成","测试报告照片","验收时间"
If User.Name <> "c"
e.Cancel = True
End If

End Select