错在哪里？

on2008

我在报表中有一个文本框（未绑定）—— 登记证类别
旅行社主窗口/分支机构 子窗体

点击旅行社主窗口的打印按钮，调出打印报表，打开时执行下列事件：


If Forms!旅行社主窗口!许可证编号 Like "L-FJ-GJ*" Then
    If Forms!旅行社主窗口![分支机构 子窗体]!分支机构名称 Like "*分社" Or Forms!旅行社主窗口![分支机构 子窗体]!分支机构名称 Like "*分公司" Then
        Me!登记证类别 = "国际旅行社分社"
    Else
        Me!登记证类别 = "国际旅行社门市部"
    End If
   
Else
    If Forms!旅行社主窗口![分支机构 子窗体]!分支机构名称 Like "*分社" Or Forms!旅行社主窗口![分支机构 子窗体]!分支机构名称 Like "*分公司" Then
        Me!登记证类别 = "国内旅行社分社"
    Else
        Me!登记证类别 = "国内旅行社门市部"
    End If
End If



    报表不能打开，不知错在哪里？

   请指正。

ADAM

是這不這樣
"[L-F][J-G][J]"

on2008

L-FJ-GJ00001    是国际旅行社编号，
L-FJ-GN00001   是国内旅行社编号。

    我的意思是要在报表的一个文本框里自动赋值，赋值的条件是判断主窗口的“许可证编号”和子窗口的“分支机构全称”两个字段的值。最后打印报表。

[此贴子已经被作者于2003-10-28 13:41:37编辑过]

ADAM

這樣看不出來
你用MSGBOX調試一下先...
看是那一句出錯...

on2008

怎样用MSGBOX調試？
我没用过，请指点一下。

on2008

知道使用MSGBOX調試。
发现
    Me!登记证类别 = "国际旅行社分社" 不能执行。
我把上面的条件LIKE前的控件名称也加上.value ，下面的Me!登记证类别改成Me!登记证类别.value = "国际旅行社分社"也不行。如何是好？

ADAM

呵呵..教你調試
MSGBOX ERR.Description  '顯示空,表示上句沒錯
Me!登记证类别 = "国际旅行社分社"
MSGBOX ERR.Description  '如果上句有問題,顯示錯誤類型.
顯示錯誤類型..
一般代碼中最好加上
如On Error GoTo Err_Command2_Click
代碼明細...
Exit_Command2_Click:
    Exit Sub
Err_Command2_Click:
    MsgBox Err.Description
    Resume Exit_Command2_Click
不然,有時都不知怎死的..

on2008

您的调试办法很详细，我要试一试。
我将这段代码写在报表打开事件时无法打开报表，去掉所有条件和代码，只留“Me!登记证类别 = "国际旅行社分社" ”一句，也是无法打开报表。如果将代码放在主窗口的打印单击事件则可以打开报表，但需要显示的报表中的“登记证类别”显示为空白。怎办？

on2008

似乎不能在报表的文本框用代码赋值，以往常用在报表的文本框中直接使用“=<表达式>”的办法赋值，但这一方法祖能附加使用条件。

如能在报表的文本框中用代码赋值，还请DX指教。

ADAM

不要連接數據源...