Office中国论坛/Access中国论坛

标题: 请教有关查询的问题 [打印本页]

作者: cocofelling 时间: 2009-8-20 16:16
标题: 请教有关查询的问题
本帖最后由 cocofelling 于 2009-8-22 10:58 编辑

有两个表，如下
A：
ID AA
1 1
2    25
3    58
4    59
5    98
B:
ID AA

现在我要想把A表中的数据追加到B表中去，当只只用查询的办法。不在窗体中实现

B表要求的效果如下
B:
ID                         AA
1，2                      1，25
3，5                      58，98
4                         59

我浏览了一下以前的贴子，有的朋友可以通过窗体实现，我现在想要通过查询来实现。有办法吗？几个查询都可以。

作者: Henry D. Sy 时间: 2009-8-20 16:25
把例子传上来试试

作者: aslxt 时间: 2009-8-20 16:43
你的ID中1和2、3和5有什么关联，或者说以什么规律把他们分组？

作者: babyboys 时间: 2009-8-20 20:37
试试试试

作者: cocofelling 时间: 2009-8-22 10:58
上传了一个例子。。

作者: Henry D. Sy 时间: 2009-8-22 12:33
Public Function gStr(fld As String)
Dim rs As New ADODB.Recordset
Dim strSQL As String
strSQL = "SELECT DM FROM TABDM WHERE KT='" & fld & "'"
With rs
      .Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly
      Do While Not .EOF
         gStr = gStr & .Fields(0) & ","
         .MoveNext
      Loop
      .Close
End With
Set rs = Nothing
End Function

SELECT KT.KTID, KT.KFXM, gStr([KTID]) AS 表达式1
FROM KT;

作者: Henry D. Sy 时间: 2009-8-22 12:33
ddddd

作者: cocofelling 时间: 2009-8-24 09:58
谢谢 Henry D. Sy 的支持！

作者: shenxb 时间: 2009-9-21 12:45
谢谢

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)