在VB6的数据环境报表DataReprot中,如何使LABEL的caption值动态改变

[xu]

在VB6的数据环境报表DataReprot中,可以增加Label控件,就象在FORM中一样，但是Data
Report的代码中不象from中可以引用：me.label1.caption="tip".如果要动态改变label1值，在DataReprot中如何做？

[Un1]

Sections(1).Controls(1).Caption = "tip"

[dongdong]

不错，但controls()中的1最好写成控件的名称，这样就不必去找你的LABEL是第几个控件了，如下:

DataReport1.Sections(3).Controls("LABEL1").CAPTION="GOOD LUCK"

[Chen_Lin]

Dim sect, ctl
For Each sect In DataReport1.Sections
For Each ctl In sect.Controls
select case ctl.Name
case "..."

end select
MsgBox ctl.Caption
Next ctl
Next sect

[Claud]

DataReport1.Section(1).Controls("Label1").Caption=Form1.Text
其中 Section(i) 中的 i 由 DataReport1 里的 Section 自上而下的位置
决定的,而不一定等于 Report Header (Section4) 中的 4

[yepo]

直接使用全局变量
DataReport1.Section(1).Controls("Label1").Caption=变量名