大家都在搜：
扫描二维码安装房天下APP
手机浏览器访问房天下
> > 问题详情
VB中如何把从sql数据库中查询出来的数据显示到控件中
VB中如何把从sql数据库中查询出来的数据显示到控件中
浏览次数：0
需要你把控件和ADODC绑定
不知道下面这条知识能否帮助到您
房屋总价高,采用全款买房的人少之又少,大多数人还是采用贷款的方式买房。那么,采用贷款的方式买房,要注意什么呢?
贷款要注意什么?征信查询次数过多影响贷款
200579浏览
手机动态登录
请输入用户名/邮箱/手机号码！
请输入密码！
没有房天下通行证，
ask:2,asku:0,askr:37,askz:16,askd:5,RedisW:0askR:8,askD：63 mz:nohit,askU:0,askT:0askA:73
Copyright &
北京拓世宏业科技发展有限公司
Beijing Tuo Shi Hong Ye Science&Technology Development Co.,Ltd 版权所有
违法信息举报邮箱：> 问题详情
在VB 6.0中使用Adodc数据控件可以很方便地实现对数据库数据的插入、删除和修改操作。现假设用Adodc
悬赏：0&答案豆
提问人：匿名网友
发布时间：
在VB 6.0中使用Adodc数据控件可以很方便地实现对数据库数据的插入、删除和修改操作。现假设用Adodc 1数据控件删除其结果集当前行对应的数据库数据，下列实现方案中正确的是A．执行Adodc 1.Delete方法B．执行Adodc 1 .ReCOrdset.Delete方法C．先执行Adodc1.Delete方法，然后再执行Adodcl.Update方法D．先执行Adodc 1 .Recordset.Delete方法，然后再执行Adodc 1.Recordset.Update方法请帮忙给出正确答案和分析，谢谢！
为您推荐的考试题库
您可能感兴趣的试题
1设有某转储策略，用该策略对数据库中的某一数据文件f进行转储时，会将其跟上一次的转储文件采用一定机制进行比较，若发现f被修改或f为新文件时才转储该文件，则这种转储策略是A．完全转储B．增量转储C．差量转储D．增量加差量转储2设某系统中有商品销售表(商品号，商品类别，数量，单价，销售日期，销售时间)，该表数据量大，在工作时间会被频繁插入销售数据。用户需要经常查询每天各类别商品的销售总量。为了提高查询效率，下列措施中最为有效且合理的是A．在商品销售表上针对商品类别和销售日期属性建立索引B．建立商品分类别日销售汇总表(商品类别，销售总量，日期)，每产生一条新销售记录时实时更新该表，用户直接使用该表进行查询即可C．在商品销售表的商品号和销售日期属性上建立索引D．建立商品日销售汇总表(商品号，商品类别，销售总量，日期)，每产生一条新销售记录时实时更新该表，用户直接使用该表进行查询即可3统一建模语言(UML)是一种常用于数据库应用系统设计和开发的可视化建模语言。关于UML,下列说法错误的是A．UML中的视图是由一个或多个图组成的，一个图是系统模型中的某个侧面的展示B．用例图、顺序图和状态图都是UML的行为视图，用于描述系统的功能和活动C．类图和对象图都是UML的结构视图，用于描述系统在某个时间的静态结构D．在用例图中，与系统交互的人和其它实体都可以成为系统的角色4在SQL Server 2000中，如果己分配给某个数据库的空间大小远远大于存放该数据库数据需要的实际大小，则应该对该数据库进行收缩，以释放多余的空间。关于收缩数据库，下列说法错误的是A．收缩数据库中的某个文件时，收缩后的文件大小可以小于定义文件时的初始大小B．只能收缩数据库所包含的数据文件，不能收缩其日志文件C．收缩某个具体文件时，只要收缩后的文件空间大于该文件存放数据所需的实际空间，收缩操作即可进行D．按比例收缩数据库时，收缩后的数据库大小不能小于定义数据库时的初始大小
我有更好的答案
请先输入下方的验证码查看最佳答案
图形验证：
验证码提交中……
找答案会员
享三项特权
找答案会员
享三项特权
找答案会员
享三项特权
选择支付方式：
支付宝付款
郑重提醒：支付后，系统自动为您完成注册
请使用微信扫码支付(元)
支付后，系统自动为您完成注册
遇到问题请联系在线客服QQ：
请您不要关闭此页面,支付完成后点击支付完成按钮
遇到问题请联系在线客服QQ：
恭喜您！升级VIP会员成功
常用邮箱：
用于找回密码
确认密码：千里之行 始于足下
欢迎加入我们，一同切磋技术。 &
用户名： &&&
密　码： &
共有 2954 人关注过本帖
标题：如何在一个窗体中显示一个数据库中的多个表的内容？
等　级：新手上路
&&问题点数：0&&回复次数：3&&&
如何在一个窗体中显示一个数据库中的多个表的内容？
近期要做一课程设计，其中要考虑到将一个数据库中的几个表联系在一起，我想问一下怎样在一个窗体中用何控件进行访问几个表的信息，另外怎样作查询呢？
比如说我要建个学籍管理系统，其中表1为：学生信息（学号，姓名，班级），表2为：成绩表（学号，数据库成绩，VB成绩），我想在一个窗体中显示学号、姓名、数据库成绩的话应该怎么做呢？另外加个查询按钮的话，比如说输入学号查询该生的VB成绩怎么做呢？
在此谢过各位啦，如果有源程序更好，谢谢啦！！！
搜索更多相关主题的帖子:
&&&&&&&&&&
等　级：新手上路
在Sql or Access 里面把上面的两个表建立起关系，并把关系保存起来，就会产生一个虚拟表（view1），查询的时候例如：select 学号,成绩,姓名 from view1,就可以了！
等　级：版主
威　望：209
帖　子：12488
专家分：19042
也可以用adodb的技术来实现，也就是rs纪录集的方式。
等　级：版主
威　望：209
帖　子：12488
专家分：19042
SQL不必建立关系也可以用多表查询来实现
select vb成绩 from 成绩表 where 学号=(select 学号 from 学生信息表 where 学号=1）
这种就是多表查询的SQL语句，我写的是从学生信息表里查询学号为1号的学生的vb成绩。这种查询就不用建立关系。
版权所有，并保留所有权利。
Powered by , Processed in 0.200839 second(s), 7 queries.
Copyright&, BCCN.NET, All Rights ReservedVB编程、代码、技术问题解决方案
在VB6中，如何将DATAGRID控件显示的数据导出到EXCEL？
方案整理者：hxs1985 &&&&&& 发布时间：
赞助商广告
在VB6中，如何将DATAGRID控件显示的数据导出到EXCEL？又如何打印出来？
推荐解决方案
DataGrid&相关联的是一个Rs记录集
你用以下方法就可以导出到EXCEL文件
直接打印DATAGRID中的数据内容
可以循环行、列
写入Printer对象
其他解决方案
这儿有你要的答案：
'********************************************************
'作者：kiki
'函数：Function&ChangetoExcel(rst&As&ADODB.Recordset)
'功能：实现将一个记录集对象导出到EXCEL表。
'说明：函数需要1个参数，参数为ADODB.Recordset类型
'********************************************************
Public&Function&ChangetoExcel(rst&As&ADODB.Recordset)
&&&&Dim&excel_app&As&Object
&&&&Dim&excel_sheet&As&Object
'Dim&rst&As&ADODB.Recordset
'Dim&new_value&As&String
&&&&Dim&rerows&As&Integer
&&&&Dim&recols&As&Integer
&&&&rst.MoveFirst
&&&&Screen.MousePointer&=&vbHourglass
&&&&DoEvents
&&&&Set&excel_app&=&CreateObject(&Excel.Application&)
&&&&excel_app.Visible&=&True
&&&&excel_app.Workbooks.Open&filename:=App.Path&&&&\misexcel.xls&
&&&&If&Val(excel_app.Application.Version)&&=&8&Then
&&&&&&&&Set&excel_sheet&=&excel_app.ActiveSheet
&&&&&&&&Set&excel_sheet&=&excel_app
&&&&End&If
&&&&rerows&=&rst.RecordCount
&&&&recols&=&rst.Fields.Count
&&&&For&i&=&0&To&rerows&-&1
&&&&&For&j&=&0&To&recols&-&1
&&&&&&&&excel_sheet.Cells(i&+&1,&j&+&1)&=&rst.Fields(j)
&&&&&&&&&rst.MoveNext
&&&&&'excel_sheet.saveas&App.Path&&&&\misexcel.xls&
&&&&'excel_app.ActiveWorkbook.Close&False
&&&&'excel_app.Quit
&&&&Set&excel_sheet&=&Nothing
&&&&Set&excel_app&=&Nothing
&&&&Screen.MousePointer&=&vbDefault
&&&&'MsgBox&&Copied&&&&&Format$(rerows&-&1)&&&&&record.&
End&Function
'***************************************************
'问题：多次点击会打开多个EXCEL表
'***************************************************
Private&Declare&Function&FindWindow&Lib&&user32&&Alias&&FindWindowA&&(ByVal&lpClassName&As&String,&ByVal&lpWindowName&As&String)&As&Long
Dim&Cnn1&As&New&ADODB.Connection
Dim&rst1&As&New&ADODB.Recordset
Dim&StrSQL&As&String
Dim&TabName&As&String
Dim&Selection&As&String
Private&Sub&Command1_Click()
'设置第一个数据源的查询条件
TabName&=&&毕业学生&
Selection&=&&班级,姓名,工作单位&
Private&Sub&Command2_Click()
'设置第二个数据源的查询条件
TabName&=&&在校学生&
Selection&=&&*&
Private&Sub&ReqData()
'设置查询语句
StrSQL&=&&SELECT&&&&&Selection&&&&&FROM&&&&&TabName
'如果数据库已打开的则先关闭,防止出错
If&Cnn1.ConnectionString&&&&&&&Then&Cnn1.Close
'打开数据库
Cnn1.Open&&Provider=Microsoft.Jet.OLEDB.3.51;&Data&Source=&&&&App.Path&&&&\db1.&
'设置记录集的打开方式和锁的机制等
&&&&.CursorType&=&adOpenKeyset
&&&&.LockType&=&adLockOptimistic
&&&&.Open&StrSQL,&Cnn1,&,&,&adCmdText
'为DataGrid1设置数据源
Set&DataGrid1.DataSource&=&rst1
DataGrid1.Refresh
'为DataGrid1设置标题,并显示记录数
DataGrid1.Caption&=&&表[&&&&TabName&&&&]共&&&&rst1.RecordCount&&&&条记录&
Private&Sub&DataGrid1_RowColChange(LastRow&As&Variant,&ByVal&LastCol&As&Integer)
'为DataGrid1设置标题,并显示记录数,用此事件是防止操作员删除记录后记录数发生变化
DataGrid1.Caption&=&&表[&&&&TabName&&&&]共&&&&rst1.RecordCount&&&&条记录&
感谢UP!,我说的是如何把窗体中DATAGRID控件显示的内容导出到EXCEL文件?又如何直接打印DATAGRID中的数据内容?
赞助商广告}