标题: 请问这几句是什么意思啊?? [打印本页] 作者: chunyi 时间: 2006-6-27 08:26 标题: 请问这几句是什么意思啊?? If Form.OpenArgs > "" Then
If Not Form.NewRecord Then
DoCmd.RunCommand acCmdRecordsGoToNew
End If
[客户] = Form.OpenArgs
End If
If Form.OpenArgs > "" Then '如果打开的窗体参数 OpenArgs 大于 ""
If Not Form.NewRecord Then '如果打开的窗体不处于新记录
DoCmd.RunCommand acCmdRecordsGoToNew '移动到新记录
End If
[客户] = Form.OpenArgs '字段 [客户] = 窗体参数 OpenArgs 。窗体参数 OpenArgs 是在打开窗体时加载的
End If
Response = acDataErrAdded '发生错误时的响应:直接添加