Access交流中心

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

求助:窗体中点击“查询”或“清除”按钮后没反应

韩云  发表于:2015-01-16 08:39:02  
复制

附件中用代码的形式做了一个查询,但是,点击“查询”或“清除”都没有反应,问题出在哪里,请老师们帮忙解决并指导。

�������ش˸���

 

 

 

Top
zhaoyoulong 发表于:2015-01-16 09:46:08

你的控件名称分别是 :“查询”、“清除”

可是你的事件却写在 cmd查询_Click、cmd清除_Click两个并不存在的按钮单击事件中,当然没反应了

重新更改事件按钮名称,和按钮名称一致







韩云 发表于:2015-01-16 14:21:30

我将按钮改成一致 但是点击查询后,代码提示找不到数据源了,拜托你给看看是哪的问题呢

 



韩云 发表于:2015-01-17 09:36:29

将查询和清除按钮名称改正以后,提示“找不到方法和数据”,问题出在哪了?请老师们帮助指导。

�������ش˸���

 



zhaoyoulong 发表于:2015-01-17 15:31:22

   Me.进度查询 子窗体.Form.Filter = strWhere
    Me.进度查询 子窗体.Form.FilterOn = True

改成:

    Me.进度查询_子窗体.Form.Filter = strWhere

    Me.进度查询_子窗体.Form.FilterOn = True

或:

    Me.[进度查询 子窗体].Form.Filter = strWhere
    Me.[进度查询 子窗体].Form.FilterOn = True




韩云 发表于:2015-01-17 17:56:13
按你说的改正以后,现在说是“子程序或函数未定义”,应该怎样改正呢,请老师指正。

恐龙的传人 发表于:2015-01-17 23:46:16

回楼主5楼的回帖:

你调用 Call CheckSubformCount,

但是,找遍窗体VBA代码,没看到你的CheckSubformCount在哪儿



韩云 发表于:2015-01-18 07:31:31
麻烦你给在附件中改正一下好吗

韩云 发表于:2015-01-18 16:22:22
我已经引用了控件,但是还是提示“未定义函数”,是在“Call CheckSubformCount  ”运行子程序环节,我不知道下面该怎样做了。

顺其自然 发表于:2015-01-18 21:46:21
把Call CheckSubformCount代码删除即可,因为子程序你就没有编辑过代码。

顺其自然 发表于:2015-01-18 21:50:45
因为子程序你就没有编辑过代码

总记录:10篇  页次:1/1 9 1 :