If e.Table.Current IsNot Nothing Then e.Table.Cols("附件").OpenWindow() Dim fl As WinForm.FileManager = e.Table.Cols("附件").FileManager If user.Name = e.Table.Current("归档人") andalso fl isnot nothing then fl.AddCommand.Visible = True Else fl.AddCommand.Visible = False End If End If