关于报表的问题

billy014 2003-12-12 10:27:22
我是个vb新手,为了完成作业编了一个学生成绩管理系统,我想要将我编的查询结果用报表表示,因为接触的报表资料说明的全部都是静态的,无法达到我所需的要求,故此请各位大侠,指点一二...
资料也行,实例也行,教材也行.只要是动态的就成.我真的不想用几个查询就在DataEnvironment里设置几个command啊!



(分不够可补)
...全文
15 9 打赏 收藏 举报
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
zcm123 2003-12-13
有道理 我想楼主可能是不知道如何在报表显示记录罢了
With deTest.rscmdTest
If .state = 1 Then .Close
.Source = "select ..."
.Open
Set drpTest.DataSource = deTest.rscmdTest
drpTest.Show
drpTest.Refresh
End With
正好解决此问题
  • 打赏
  • 举报
回复
a3985656 2003-12-12
sql = "select * from 表1 where 姓名 = " & chr(34) & a & chr(34)


但是用了 command 的记录集后: 根本就不是 SQL = ????

而是直接的 select * from 表1 where 姓名 = 'xxx'

没有SQL的.就一条语句. 当程序运行时. 应该就是调用一个记录集如:
DATAMember = select * from 表1 where 姓名 = 'xxx'
所以.金兄弟所说的. sql = "select * from 表1 where 姓名 = " & chr(34) & a & chr(34)用不上啊.
  • 打赏
  • 举报
回复
sdlywt001 2003-12-12
不用数据环境,你可以查询完后,生成数据集帮定到报表上,报表中的字段在属性中绑定到字段上,当然没有,你自己打上就可以了!
  • 打赏
  • 举报
回复
LanceJin 2003-12-12
sql = "select * from 表1 where 姓名 = " & chr(34) & a & chr(34)
  • 打赏
  • 举报
回复
8Cloud8 2003-12-12
dataenvironment(DEV)中的command(cmdTest)的SQL语句是可以改变的。

With deTest.rscmdTest
If .state = 1 Then .Close
.Source = "select ..." '新的SQL语句
.Open
Set drpTest.DataSource = deTest.rscmdTest 'drpTest报表显示记录
drpTest.Show
drpTest.Refresh
End With
  • 打赏
  • 举报
回复
a3985656 2003-12-12
在窗体里用 text控件当然可以啊.

但是我是用 dataenvironment 生成的数据集.

现在我只有在窗体外附一个值给 A 这变量.

在 dataenvironment --->command 这一个记录集里如何引用这一个 a 的变量?

sql = select * from 表1 where 姓名= & a
这样不行!
  • 打赏
  • 举报
回复
LanceJin 2003-12-12
用个text控件用来输入姓名
if tirm(text1.text)="" then
msgbox "姓名不能为空,请输入"
else
sql = "select * from 表1 where 姓名 = " & chr(34) & text1.text & chr(34)
endif
  • 打赏
  • 举报
回复
a3985656 2003-12-12
UPUP...我也正是遇到这问题啊!

我想在把 dataenvironment 里的command 里面的确良 SQL语句改成动态的行不?

如:
sql = select * from 表1 where 姓名= '小明'

改成 sql = select * from 表1 where 姓名= ?动态的 我试过几次都不行.

请问怎么解决啊!
  • 打赏
  • 举报
回复
zcm123 2003-12-12
upupup ^^(分)
  • 打赏
  • 举报
回复
相关推荐
发帖
数据库(包含打印,安装,报表)
加入

1198

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2003-12-12 10:27
社区公告
暂无公告