Office中国论坛/Access中国论坛

标题: 错在哪里? [打印本页]

作者: on2008    时间: 2003-10-28 20:02
标题: 错在哪里?
我在报表中有一个文本框(未绑定)—— 登记证类别
旅行社主窗口/分支机构 子窗体

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


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    时间: 2003-10-28 21:09
是這不這樣
"[L-F][J-G][J]"
作者: on2008    时间: 2003-10-28 21:35
L-FJ-GJ00001    是国际旅行社编号,
L-FJ-GN00001   是国内旅行社编号。

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


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


作者: ADAM    时间: 2003-10-28 22:45
這樣看不出來
你用MSGBOX調試一下先...
看是那一句出錯...
作者: on2008    时间: 2003-10-28 23:54
怎样用MSGBOX調試?
我没用过,请指点一下。
作者: on2008    时间: 2003-10-29 00:36
知道使用MSGBOX調試。
发现
    Me!登记证类别 = "国际旅行社分社" 不能执行。
我把上面的条件LIKE前的控件名称也加上.value ,下面的Me!登记证类别改成Me!登记证类别.value = "国际旅行社分社"也不行。如何是好?


作者: ADAM    时间: 2003-10-29 01:16
呵呵..教你調試
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    时间: 2003-10-29 06:58
您的调试办法很详细,我要试一试。
我将这段代码写在报表打开事件时无法打开报表,去掉所有条件和代码,只留“Me!登记证类别 = "国际旅行社分社" ”一句,也是无法打开报表。如果将代码放在主窗口的打印单击事件则可以打开报表,但需要显示的报表中的“登记证类别”显示为空白。怎办?
作者: on2008    时间: 2003-10-30 06:00
似乎不能在报表的文本框用代码赋值,以往常用在报表的文本框中直接使用“=<表达式>”的办法赋值,但这一方法祖能附加使用条件。

如能在报表的文本框中用代码赋值,还请DX指教。
作者: ADAM    时间: 2003-10-30 15:22
不要連接數據源...
作者: on2008    时间: 2003-10-30 17:54
该文本框未绑定。

一般情况下,比如要向报表的A文本框(未绑定)通过代码进行赋值,如何处理,在哪里处理?即在报表的哪个事件设置为好。
作者: on2008    时间: 2003-10-31 18:06
诸位,咋办呢?

退一步,如果在一个没有数据源的空白报表中,如何给一个文本框直接赋值呢?
作者: ADAM    时间: 2003-10-31 18:44
換個方向,試試標簽
作者: on2008    时间: 2003-11-1 01:23
是否本来这一想法就是做不到的。




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3