5001
社区成员
VBA修改Access报表标题[求助]
想请教
想在Access报表VBA里实现
当前报表Caption等于当前记录的特定字段值。
于是写了以下代码但是无法实现。求解。
Private Sub Report_Open(Cancel As Integer)
.
.
.
Me.Caption = CStr(Me!特定字段值)
.
.
.
想在Access报表VBA里实现
当前报表Caption等于当前记录的特定字段值。
于是写了以下代码但是无法实现。求解。
Private Sub Report_Open(Cancel As Integer)
.
.
.
Me.Caption = CStr(Me!特定字段值)
.
.
.
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
dsd999 2012-03-31
谢谢楼主分享答案。
liswood 2012-03-31
噢……找到答案了……
应该放在Report_Load()而不是Report_Open()里面
Private Sub Report_Load()
Me.Caption = Me.[TransNo].Value
End Sub
就可以了
应该放在Report_Load()而不是Report_Open()里面
Private Sub Report_Load()
Me.Caption = Me.[TransNo].Value
End Sub
就可以了
liswood 2012-03-30
fsk_wyf同学……你确定你是在回复这个帖子么……
liswood 2012-03-30
补充说明一下前半段代码如下
Private Sub Report_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
' Split OpenArgs data into separate fields
Dim argsRec() As String
argsRec() = Split(OpenArgs, "|", , vbTextCompare)
strSubName = argsRec(0)
linkMF = argsRec(1)
linkCF = argsRec(2)
fileCate = argsRec(3)
SPCate = argsRec(4)
End If
If SPCate = "S" Then
Me.RecordSource = "Print_SI"
ElseIf SPCate = "P" Then
Me.RecordSource = "Print_PI"
End If
Me.Caption = CStr(Me!TransNo)
.
.
.
Private Sub Report_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
' Split OpenArgs data into separate fields
Dim argsRec() As String
argsRec() = Split(OpenArgs, "|", , vbTextCompare)
strSubName = argsRec(0)
linkMF = argsRec(1)
linkCF = argsRec(2)
fileCate = argsRec(3)
SPCate = argsRec(4)
End If
If SPCate = "S" Then
Me.RecordSource = "Print_SI"
ElseIf SPCate = "P" Then
Me.RecordSource = "Print_PI"
End If
Me.Caption = CStr(Me!TransNo)
.
.
.
access数据库：常见的VBA问题，ＦＱＡ一。 先在VBA中引用"Microsoft Office 10.0 Object Library"以上的版本.只用ado列出所有的表:Public Function listalltable() Dim rstSchema As ADODB.Recordset Dim strCnn As String Set cnn2 = CurrentProject.Conn
VB+ADO+Access如何修改数据 我把用adodc1绑定了表Case，并在窗体中用几个Text跟表Case中的对应字段相绑定，我现在想直接通过修改Text(i).text来修改数据库表Case中的记录，问该如何修改，大侠们可否提供一下建议，并帮忙看看我的问题出在哪儿 ...
彻底解决水晶报表中登陆的错误 对于这个问题，斑竹我花了整整一天的时间研究水晶报表的帮助文件，终于得到解决方案。 我不是一个保守的人，我相信有很多的网友正和我一样在花费精力在研究这个问题，我不愿意大家再和我一样白白的花费精力。 下面...
vb/vb.net开发精粹(4) 各位帮忙 找一个w70n5msg.dll 文件 ＶＢ中如何使用insert语句，插入一条纪录 分布式组件状态问题 在VB6.0中 使用SQLDMO.SQLServer 显示数据库名称出错啦, 请大家指点...在VB控制水晶报表中，用不固定的数据源，运行
vb/vb.net开发精粹(15) 新手求助 vb 的listview 有字数限制吗 串口通信校验字如何计算? 串口接收高速率数据问题 一个变态的木马，在pe系统下xt都不能杀，貌似过所以主防 求个屏蔽Windows7下ALT+CTRL+DEL的方法 如何在vb中...
vb/vb.net开发精粹(14) VBA如何获取控件句柄？ 各位大侠看看我这程序 求解 小白向各位请教下VB过滤广告的问题 关于回调函数的问题 新手请教ocx文件创建的问题 如何用vb自动填写、选择下拉框选项并提交网页表单？？ 如何恢复最大化 ...
Modest的故事 以前接触过Access，但从没用VBA写过一行代码，只能基于VFP6的编程思想继续苦学，进步还算很快。 2003年2月27日在奥体中心的“新一代技术大会”上见到了比尔盖茨，看到了这位崇拜已久的偶像。当天，8000多人的...
抱怨一声，离成功就又远离一米 以前接触过Access，但从没用VBA写过一行代码，只能基于VFP6的编程思想继续苦学，进步还算很快。 2003年2月27日在奥体中心的“新一代技术大会”上见到了比尔盖茨，看到了这位崇拜已久的偶像。当天，8000多人的场面...
VB如何只读取字符串中的数字部分?? [url=http://www.vbbaike.com/show.asp?id=101025]VB+ado+Access如何数据修改[/url] [url=http://www.vbbaike.com/show.asp?id=101024]VB怎样只读取字符串中的数字部分??[/url] [url=...
vb/vb.net原创文章精粹（3） [url=...请各位高手指教！[/url] [url=http://www.vbbaike.com/show.asp?id=101349]用VBA能否实现对WORD登陆密码的修改？[/url] [url=http://www.vbbaike.com/show.asp?...
vb/vb.net开发精粹(10) 请教AUTOCAD+vba问题——区域复制/镜像 vb中如何用api快速读取大于1G的txt数据啊 dll类中声明public变量在该dll添加的窗体中如何调用 VB6 类模块，再引用另一个类模块的问题 MsgBox a$, ,b$,c$为什么调试不通？ ...
vb/vb.net开发精粹(3) 用VBA能否实现对WORD登陆密码的修改？ 这两个字符串 为什么无法链接到一起？？？？ 去掉一位数组中包含的另一个数组的值 串口接受的数据如何处理？？？？？？？？？？？？？？ VB6 CELL控件的问题，CELL的
vb/vb.net原创文章精粹（2） [url=http://www.vbbaike.com/show.asp?id=101290]关于EXCEL转换成ACCESS库[/url] [url=http://www.vbbaike.com/show.asp?id=101289]关于vb生成exe后出现的问题，急！！！！[/url] [url=...
vb/vb.net开发精粹(16) listview能来竖排 数据库查询 只有几句代码，帮我看看那里错了， VB 如何添加 Excel 11 数字金字塔， 如何编写【下载论坛附件】的软件？...求VBA高手优化for循环代码 请问如何用时间数组控件在
CISCO技术(1.7万) A-CDMA|Asynchronous Code Division Multiple Access 异步码分多址\r\n ace|自动呼叫设备\r\n ACH|Access Channel接入信道\r\n ACI|Adjacent-Channel Interference 邻频干扰\r\n ACIR|Adjacent Channel ...
vb/vb.net开发精粹(21) Access中用VBA的问题，菜鸟虚心求教~~~ VB 调用API时出现“尝试读取或写入受保护的内存。这通常指示其他内存已损坏。”错误 这个怎么用？webservice 请教“求约束条件下N维极值优化”的解决方案 【求助...
vb/vb.net开发精粹(11) Excel VBA编程 vb 引用不了system.data.sqlite.dll 关于 VB6 调用C++ DLL 传参的问题 VB编程问题，如何调试，感激不尽！！！ 如何查询一条或多条记录,修改后批量更新到数据库 求VB代码，可以批量处理上标，...
实用!超强VC/MFC 常见问答收集(下) 问：如何在MDI环境下枚举所有打开的窗口？ 答：In MFC, each CMDIChildWnd createdby the framework is managed as a child window of the MDIClient window.This MDIClient window is a child of the mainframe ...
