| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 969 人关注过本帖
标题:提示“找不到宏202
取消只看楼主 加入收藏
pxfinal
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-5-3
收藏
 问题点数:0 回复次数:1 
提示“找不到宏202
在access工程中,新建了一个按钮,用来增加记录
On Error GoTo Err_Command78_Click


If Not IsNull(Me!入库单编号) Then
Update_form
End If

If IsNull(Me!入库单编号) = True Then
Else
If Check_Empty() = True Then
MsgBox "你还有未添加数据的入库单,不能新建"
End
End If
End If
DoCmd.GoToRecord , , acNewRec



If Check_Empty() = True Then
MsgBox "你还有未添加数据的入库单,不能新建"
Else
Me!入库单编号 = Add_number("原材料入库单", "入库单编号")
Me!入库日期 = Date
Me.Recalc
End If
读取审核
Text65 = Form.CurrentRecord
Exit_Command78_Click:
Exit Sub
Err_Command78_Click:
MsgBox Err.Description
Resume Exit_Command78_Click
当我运行到me.recalc 时候,提示找不到宏202,原来是好用的,我只是在其他模块中修改了一个函数,把一个窗体函数,做成了公共函数,就出现了这个问题。不知道为什么!!!
搜索更多相关主题的帖子: 提示 Then End True Check 
2006-05-22 14:32
pxfinal
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-5-3
收藏
得分:0 
说出来都气死你,我把原来的备份文件,调了出来(控件完全一样),然后把错误文件的代码全部拷贝过去,包括窗体和模块的,运行就没有问题了。问题解决了,但是就是不知道为什么会出现这种情况,抽风?
2006-05-23 11:26
快速回复:提示“找不到宏202
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.049545 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved