VB+access数据库查询问题,达人帮帮忙...........................

数据库内有三个表.三个表内各有3个字段
请问,我可以用一句SQL语句来查询三个表的第一个字段的内容吗?
如果不可以,那有没有别的方法比一个一个表的查询方法更好的?
给出代码,要是好的追50分.

表一:
姓名 性别 城市
… … …

表二:
姓名 性别 城市
… … …

表三:
姓名 性别 城市
… … …
那如果我想把三个表的第一个字段的内容读到LISTBOX控件上,SQL的语句怎么写?

select * from 这里怎么写?

那如果我想把三个表的第一个字段的内容读到LISTBOX控件上,SQL的语句怎么写?
Dim Rs As New ADODB.Recordset
Rs.Open "select * from 表一 ", yourCN, adOpenStatic, adLockOptimistic
do while rs.eof=false
list1.additem rs(0)
rs.movenext
loop
Do While Rs.EOF = False
List1.AddItem Rs(0)
Rs.MoveNext
Loop
If Rs.State <> adStateClosed Then Rs.Close
Rs.Open "select * from 表二", yourCN, adOpenForwardOnly, adLockOptimistic
Do While Rs.EOF = False
List1.AddItem Rs(0)
Rs.MoveNext
Loop
If Rs.State <> adStateClosed Then Rs.Close
Rs.Open "select * from 表三", yourCN, adOpenForwardOnly, adLockOptimistic
Do While Rs.EOF = False
List1.AddItem Rs(0)
Rs.MoveNext
Loop
If Rs.State <> adStateClosed Then Rs.Close
Set Rs = Nothing

把以上代码放到事件中就行了
温馨提示:内容为网友见解,仅供参考
第1个回答  2008-04-04
sql = "select 姓名,性别,城市
from (select 姓名,性别,城市 from 表一 union all select 姓名,性别,城市 from表二 union all select 姓名,性别,城市 from 表三)"
其实()里面的语句就是建立视图的语句。
第2个回答  2008-04-07
strSql=
"select 姓名,性别,城市 from 表一 union all select 姓名,性别,城市 from表二 union all select 姓名,性别,城市 from 表三"

vba如何调用Access的查询,并显示查询结果?
1、首先,在电脑中找到并打开Access数据库,如下图所示。2、然后点击“数据库工具”选项卡中的“Visual Basic”,如下图所示。3、在弹出的VBA界面中,先选择数据库,然后点击右键,选择“插入”,“模块”,不同于Excel中的VBA,Access中的VBA代码需要放置于模块中,如下图所示。4、在模块中输入VBA代...

请教:VB实现ACCESS数据库记录的查询,新增,删除,修改,保存
您还是使用VB自带的可视化数据管理器来解决问题吧 打开VB,新建一个标准工程 在外接程序,可视化数据管理器菜单上点一下打开.然后在新窗品中 文件-打开数据库-ACCESS 注意,这个由于开发的较早,只能打开早期版本的MDB文件,如您是ACCESS2000后的版本您要先转换一下,方法是在ACCESS中打开它,然后在菜单工具,...

用VB计算access的表里符合条件的个数
VB中连接 Access 数据库,直接用 Data 数据控件就可以了,其在设置上也比较简单.如:窗体中放置 Data1 数据控件 在 Form_Load()事件中初试化数据控件并连接数据源 With Data1 .DataName="数据文件路径及名称" 如:"C:\\zbc.mdb".RecordSource="SELECT * FROM AB".Refresh End With 就OK了 要想...

关于VB查询ACCESS数据库的问题
在编程中,我们需要处理和查询数据库以获取所需数据。对于查询ACCESS数据库并获取特定字段内容的问题,我们需要定义一个ADODB.Recordset对象来执行操作。这可通过以下代码实现:定义ADODB.Recordset对象:Public rs As New ADODB.Recordset 接下来,使用Open方法打开查询。这里,我们查询数据库中的wjy字段,相应...

VB & ACCESS ADODB搜索代码问题
冒似你的引号太多了。srhsql = "select * from tbl_company where com_name like '*" & (Text_Cname.Text) & "*'"是*还是%,会因为不同版本的ACCESS和ADO驱动而不同,我没有去总结过。如果%能查到就用%,如果*能查到就用*。ACCESS,一般用*。

VB编程如何实现ACCESS数据库记录的查询?
在VB编程中,实现ACCESS数据库记录的查询、新增、删除、修改等操作主要依赖于ADO(ActiveX Data Objects)组件。以下将具体介绍如何通过VB编程实现这些功能。一、查询数据库记录 要查询数据库中的记录,首先需要创建一个连接对象,并使用其执行SQL查询语句。具体步骤如下:创建ADO连接对象并建立与数据库的连接...

vb SQL多表联合查询问题(Access数据库表)
如果实在不希望改数据库,那么有这么两种办法:1.子查询:就像badkano 回答的。不过那个new_table 名称要你自己改的。不能原样不动。这个表你自己根据那几个表的结构建,你不是说那几个表完全一样吗。2.在程序代码中用循环语句分几次查询,最后把查询结果合到一块。3.用语句建立一个临时表,将...

VB+ Access 输入关键字查找
楼主问的是模糊查询吧 你的数据类型是文本的 只需要一条SQL语句就行了 sql = "select * from 数据表名称 where 表中关联此Text的字段名 like '%" & Trim(Text1.Text) & "%'"这样就可以了 两个通配符% 是指前后都模糊 比如你输入“计算机” 或是 “科学”都能查到表中这个学院的学生 ...

VB查询ACCESS数据库并返回查询结果。
As New ADODB.Connection Dim rs As New ADODB.Recordset 后添加:set cn =new adodb.connection set rs =new adodb.recordset 还有提供一个连接你看看:里面有一个音乐播放器,有数据库的操作,完整的源代码和设计时窗体:http:\/\/hi.baidu.com\/0512109051 你可以看看,我写的,可以互相交流。

VB与Access模糊查询问题
只要写SQL语句就可以了 select * from 表名 from 字段 like '%关键字%'是模糊的地方,如果只要往后模糊就在后面加%如果向前模糊就前面加%如果两方向模糊就都加 比如查AAA表里ID中有1的就是 select * from AAA from ID like '%1%'

相似回答
大家正在搜