佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 1017|回复: 7

如何在vb Data Report 做特定的report??

[复制链接]
fishh 该用户已被删除
发表于 29-3-2006 11:05 PM | 显示全部楼层 |阅读模式
如何在vb Data Report 做特定的report??就好像说我如果search for 2000年的report,然后data report 只display 2000年的report...
因为我现在只能做出display全部在database(acess) 里面的data.
回复

使用道具 举报


ADVERTISEMENT

发表于 29-3-2006 11:23 PM | 显示全部楼层
用 SQL Command
回复

使用道具 举报

fishh 该用户已被删除
 楼主| 发表于 29-3-2006 11:34 PM | 显示全部楼层
可以具体的解释一下吗???只是应该在那里?和应该type什么command?
回复

使用道具 举报

发表于 30-3-2006 12:10 AM | 显示全部楼层
在 Print button 的 code

Private Sub cmdPrint_Click()
  sql = "SELECT * FROM tblSales WHERE Year(SalesDate)=" & iYear
  rs.Open sql
  rptReport.Show
End Sub


iYear 是由你的 Program assign

在 Data Report 的 code

Private Sub DataReport_Initialize()
  Set rptReport.DataSource = rs.DataSource
  rptReport.Sections(1).Controls.Item("lblAmount").Caption = rs(SalesAmount)
End Sub
回复

使用道具 举报

fishh 该用户已被删除
 楼主| 发表于 30-3-2006 12:44 AM | 显示全部楼层
谢谢!非常谢谢你。。。
回复

使用道具 举报

fishh 该用户已被删除
 楼主| 发表于 31-3-2006 03:16 PM | 显示全部楼层
WHERE Year(SalesDate)=" & iYear

Year 是什么??

(SalesDate) 是database 的field

& iYear 是我set 的txt..对吗??


Item("lblAmount").Caption = rs(SalesAmount)


("lblAmount")这个是什么??为什么是lbl??
(SalesAmount)是不是field 的name?

[ 本帖最后由 fishh 于 31-3-2006 03:20 PM 编辑 ]
回复

使用道具 举报

Follow Us
发表于 31-3-2006 05:47 PM | 显示全部楼层
Year 是 SQL syntax,例如 Year(01-01-2006) 将 return 2006

SalesDate 是 database 的 field

iYear 是 variable,由你去 assign

Item("lblAmount").Caption = rs(SalesAmount) - 这个呢是 Title,可以不用去理会

主要是你 DataReport 的 Detail Section 里要放 RptTextBox
RptTextBox 的 DataFiled 放 database 的 field name

记得要将 sql assign 成 Global Variable
回复

使用道具 举报

fishh 该用户已被删除
 楼主| 发表于 31-3-2006 11:03 PM | 显示全部楼层
哦!!原来如此。。难怪我做不到原来没有set global variable..我还以为做错了什么。。。谢谢,感激不尽啊!!!!!!!
回复

使用道具 举报


ADVERTISEMENT

您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 11-11-2024 04:52 PM , Processed in 0.438681 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表