[求助]怎樣把窗體上文本框中的值直接傳遞給報表哪？

HG

[求助]怎樣把窗體上文本框中的值直接傳遞給報表哪？
比如：窗體frm_a上文本框的值為str_a,報表rtp_a上文本框怎樣取得frm_a窗體上str_a值.
一般我在兩個窗體之間可以用me.text = from_frm_a.str_a來取得
但現在在報表上運用出現錯誤。Your cant't assign a value to this object.
不明，請各位指教！多謝！[em22]

cg1

首先，报表中的值在打开后是不允许修改的，只有你在设计模式才能修改
所以你打开报表后是不能用 me.text = .... 来修改的

HG

cgl我是在報表的on open事件中寫這樣的語句的，現在該怎樣處理哪？請再指教。
整個報表都是末邦定的，沒有數據源的，我想通過上述情況來進行賦值

[em21]

[此贴子已经被HG于2002-10-7 8:49:53编辑过]

cg1

不允许在on open 里面的，一但报表打开就不能更改了，你要把你所要做的所有操作全部放到那个窗体中，窗体中哪个命令按钮是打开报表的，你就要把所有的操作代码写在这个按钮的click里面，第一句是以设计模式打开报表 ，然后是赋值，然后再以预览模式打开报表

HG

是這樣的嗎？
DoCmd.OpenReport my_rpt, acViewDesign, , , acHidden
Report_rpt_rptname.text = me.str_a
DoCmd.Close acReport, my_rpt, acSaveYes
DoCmd.OpenReport my_rpt, acViewPreview

cg1

Private Sub Command0_Click()
    DoCmd.OpenReport "rpt_test1", acViewDesign
    Reports!rpt_test1.Label1.Caption = "ddddddd"
   
    DoCmd.OpenReport "rpt_test1", acViewPreview
End Sub

HG

多謝cgl我現在就去試一下，太多的數據要賦值了，等下搞不定再請教你啦。多謝！

HG

Reports!rpt_cheque_wage.stub_year.Value = Me.stub_year.Value
我是這樣比文本框賦值的，但還是出錯，this property isn't avaliable in design view

HG

怎麼搞，大家來給點辦法吧，沒有思路了。多謝！

cnwang

报表引用窗体值我也常用，直接在设计时将控件的数据=forms!form!ctl