AfterLoad事件
If User.Name = "张三" Then
e.Form.Controls("TextBox1").Visible = true
Else
e.Form.Controls("TextBox1").Visible = false
End If