求助 " 模块", 我写了多次不成功.

kelind

数据库的报表, 窗体上"公司名称", 是不确定的.  如一数据库分别被n个公司用,  A公司用就是"A公司管理数据库",  B公司用就得是"B公司管理数据库".......N公司用必然是"N公司管理数据库".

在设计时我是用标签将"公司名称"空白, 在标记上设定如:GSMC,  我想设计一模块, 使所有标记为GSMC的标签的标题统一为"公司名称表"中的" 公司名称"------表中唯一记录,我编程水平低, N次都没成功, 请高手帮一下.

Trynew

把标签改为文本框，在其中(数据源)输入:=DLookUp("公司名称","公司名称表")

kelind

每一个窗体\报表都写? 我需要的是模块, 以后只需在标签的标记作填上代号就行了.

chul72

我的方法rivate Sub Report_Open(Cancel As Integer)

    Label15.Caption = Form_公司名称表.combo54end sub

combo54的行来源是公司名称表的公司名称,在报表打印前选择公司名称