主题：[求助]代码开发者有效，发布后无反应

请问下列代码开发者登陆有效能弹窗，但其它用户登陆点击按钮无反应是什么原因？

If user.Group <> "经理" Then
    If Tables("费用报销").Current("报销") = True Then
        MessageBox.show("该报销单已打印,只有老板有重复打印权限","错误", MessageBoxButtons.ok, MessageBoxIcon.Error)
        e.Cancel = True  
    Else
        Dim Result As DialogResult
        Result = MessageBox.Show("确定打印该报销单,是否取消?" , "警告", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning)
        If result = DialogResult.ok Then
            Tables("费用报销").Current("报销") = True
      
        End If
    End If
End If