社区
控件
帖子详情
如何用代码设置VB报表里的 Label 控件的 Caption 属性???
dingdangy
2002-03-09 11:48:39
没有办法直接用这样的语句实现:DataReport1.Label1.Caption = "姓名"
不知道那位高手可以解决的。
...全文
439
9
打赏
收藏
如何用代码设置VB报表里的 Label 控件的 Caption 属性???
没有办法直接用这样的语句实现:DataReport1.Label1.Caption = "姓名" 不知道那位高手可以解决的。
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
wgku
2002-03-09
打赏
举报
回复
UP
wskshun
2002-03-09
打赏
举报
回复
你用什么做报表?
newchar
2002-03-09
打赏
举报
回复
dim ctl,sect as object
for each sect in datareport.sections
for o in sect.controls
select case typename(o)
case "rptLabel"
o.caption="your request"
case ...
end select
next
next sect
sunnycai
2002-03-09
打赏
举报
回复
StrSQL = "Select * from Table where ID= " & mRepID
Set rs3 = New ADODB.Recordset
rs3.Open StrSQL, cnnDB, adOpenKeyset, adLockOptimistic
Set Report.DataSource = rs3
Report.Orientation = rptOrientLandscape '设报表的方向为横向
Report.Sections("Sections1").Controls("Label1").Caption = "姓名" '设报表的label1显示姓名。
royvb
2002-03-09
打赏
举报
回复
同意楼上的!
gump2000
2002-03-09
打赏
举报
回复
DataReport1.Sections("Title").Controls("TimeLbl").Caption = "测试"
只要知道Sections与Label的名称就可以控制了。
TechnoFantasy
2002-03-09
打赏
举报
回复
SammyXu(我编程,纯属无奈)
的思路是对的,好像是:
dim x
for each x in datareport1.sections
'判断x是否为label控件
'判断x的name属性是否是label1
'赋值
next x
SammyXu
2002-03-09
打赏
举报
回复
好象需要指定section,你自己试试
TechnoFantasy
2002-03-09
打赏
举报
回复
好像不能直接用你上面的代码,因改用遍历的方法访问报表里面的控件的标题。代码前面的帖子有,你可以找一下。
第二章,
Label
控件
[
Caption
(标题)
属性
][BorderStyle(边框)
属性
]
第二章,
Label
控件
[
Caption
(标题)
属性
][BorderStyle(边框)
属性
]
VB
Caption
属性
综合举例
VB
Caption
属性
综合举例.rar
VB
中的
控件
都是能用
LABEL
模仿出来
VB
中的
控件
都是能用
LABEL
模仿出来
VB
控件
教程
VB
控件
大全
VB
控件
详解
VB
控件
用法 所有
控件
介绍
VB
控件
教程
VB
控件
大全
VB
控件
详解
VB
控件
用法 所有
控件
介绍
VB
控件
属性
大全
VB
控件
属性
大全 查询
VB
当中
控件
的
属性
,便于编译时的方便!
控件
1,453
社区成员
41,355
社区内容
发帖
与我相关
我的任务
控件
VB 控件
复制链接
扫一扫
分享
社区描述
VB 控件
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章