Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

Access问答 → 选择查询结果的问题

选择查询结果的问题

张燕华　 发表于：2007-12-24 16:40:34 　
复制

我想做一个查询，查询完毕后应该有一个列表，列出我要看的内容，就这个内容所包含的字段，我想要哪几个就列哪几个，应该怎么做？

 

例如: 查询结果列表有  姓名,地址,电话,联系人,公司,传真这六项字段,

希望的结果: 口姓名,口地址,口电话,口联系人,口公司,口传真    每个都有一个选择项,

            我勾上哪个,在最后的查询结果列表里就显示哪个

 

 

应该怎么做? 请各位老师指教

 

Top
探花 发表于：2007-12-24 17:22:58

把勾选项作为查询的 字段列表 项目部分的值



Top
咱家是猫 发表于：2007-12-25 12:13:26

在窗体上设6个复选框:Check1,Check2......缺省值可自己定为是或否

Dim Str as String

Str="Select "

If Chcek1+Chcek2+...+Check6=0 then

 

If Check1=-1 then



Top
咱家是猫 发表于：2007-12-25 12:13:26

在窗体上设6个复选框:Check1,Check2......缺省值可自己定为是或否

Dim Str as String

Str="Select "

If Chcek1+Chcek2+...+Check6=0 then

 

If Check1=-1 then



Top
咱家是猫 发表于：2007-12-25 12:13:26

在窗体上设6个复选框:Check1,Check2......缺省值可自己定为是或否

Dim Str as String

Str="Select "

If Chcek1+Chcek2+...+Check6=0 then

  

If Check1=-1 then



Top
咱家是猫 发表于：2007-12-25 12:13:27

在窗体上设6个复选框:Check1,Check2......缺省值可自己定为是或否

Dim Str as String

Str="Select "

If Chcek1+Chcek2+...+Check6=0 then

   

If Check1=-1 then



Top
咱家是猫 发表于：2007-12-25 12:17:45

NND,键盘出错,还没写完呢就发出去那么多次了.

在窗体上设6个复选框:Check1,Check2.....,Check6 缺省值可自己定为是或否

Dim Str as String

Str="Select "

If Chcek1+Chcek2+...+Check6=0 then

    Msgbox "最少要选择一个字段"

    Exit Sub

End if

If Check1=-1 Then Str=Str & "姓名 "

If Check2=-1 Then Str=Str & "地址 "

...

If Chcek6=-1 Then Str=Str & "传真 "

Str=Str & "From 表名"

Debug.Print Str

剩下的自己做吧.



Top
白加黑 发表于：2007-12-25 14:59:50

思路不错，留个脚印。。。



Top
咱家是猫 发表于：2007-12-25 15:32:22

不好意思,忘了加","了



Top
总记录：8篇  页次：1/1 9 1 :

Access软件网 版权所有 CopyRight 2006-2030
上海盟威软件有限公司 提供支持
沪ICP备12024966号-4