已解决：打印报表时，如何进行对字段的条件判断，不满足的，将提示原因

luodream

问题解决，感谢cuxun、Victor_Duane。谢谢了。

小宜

学习中......，谢谢了。

feigao186

kkkkkkkkkkkkkk

feigao186

hhhhhhhhhhhhh

luodream

Dim TempMsgbox As VbMsgBoxStyle
    TempMsgbox = MsgBox("确认要打印该条记录吗？按是则打印，否则浏览记录。", vbQuestion + vbYesNoCancel, "打印提示")
    If TempMsgbox = vbYes Then
        DoCmd.OpenReport "报表1", acViewNormal, , "编号=" & Me.编号, , acWindowNormal
    ElseIf TempMsgbox = vbNo Then
        DoCmd.OpenReport "报表1", acViewPreview, , "编号=" & Me.编号, , acWindowNormal

上述语句中： "编号=" & Me.编号，怎么理解

我照此写了这么一句：
    Dim TempMsgbox As VbMsgBoxStyle
    TempMsgbox = MsgBox("确认要打印该条记录吗？按是则打印，否则浏览记录。", vbQuestion + vbYesNoCancel, "打印提示")
    If TempMsgbox = vbYes Then
        DoCmd.OpenReport "意见-归档B", acViewNormal, , "编号=" & Me.编号, , acWindowNormal
    ElseIf TempMsgbox = vbNo Then
        DoCmd.OpenReport "意见-归档B", acViewPreview, , "编号=" & Me.编号, , acWindowNormal
    End If

怎么会出现附件中的提示呢？还要输入编号。

REORX

学习中ING.......

luodream

原帖由 cuxun 于 2007-12-18 14:19 发表
报表:意见-归档B的数据来源应该是查询吧,看看那个查询

不是的，数据源取是个表。我直接打开报表“意见-归档B”，显示的是所有记录。
是怎么回事呢？

luodream

经查，数据源、报表均有“编号”这个字段。

luodream

原帖由 cuxun 于 2007-12-22 10:49 发表
已加你了,要验证....

重新加我，不用验证了。

wangwang

值得学习。