Dim tb As WinForm.TextBox = e.Form.Controls("TextBox2") Dim r As Row = Tables("窗口3_Table1").Current If _UserName = r("送审_审批人员") Then 如果这里是 if _UserName = "张三" then 就能编辑 tb.ReadOnly = BooleanEnum.False '允许编辑 Else tb.ReadOnly = BooleanEnum.True '禁止编辑 End If