主题：这个错误怎么回事

Select Case e.DataCol.Name
    Case "收款方式"
    If E.DataCol.Expression ="货到付款单" Then
      Forms("货到付款输入明细窗口").Open()
    Else
        e.Cancel=True
    End If
End Select
e.Cancel=True

不知道该怎么回答你的问题？

你的代码设置在哪里，目的是什么，出现了什么错误？