acCmdUndo

lihao6

见代码：
If MsgBox("数据已修改，是否保存", vbYesNo) = vbYes Then
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
   Else: DoCmd.RunCommand acCmdUndo
End If

执行后，系统提示：
命令行或操作“undo”当前不可用。
*这可能是一个只读数据库或是一个还没有转换的CAPMS旧版本数据库。
*此操作应用到的对象类型当前没有选定或不在活动的视图中。
只使用这个数据库当前可用的命令和宏操作。

这个问题发生的环境是这样的：
刚才那段代码我在一个小的MDB文件内运行没问题，一切正常。
然后我把这个MDB文件内的所有东西集成到一个大的MDB文件后，undo就出现了问题

希望给我一些启发

zhuyiwen

好象是子窗体没得到焦点。

zhuyiwen

把你的程序传上来，大家都来看看

zhuerw

else: ":"在这里是什么意思？

lihao6

我试过了，得到焦点后还是不行

martin

能不能直接写formname.undo,这样好像可以的

zhuyiwen

以下是引用zhuerw在2002-5-29 16:57:35的发言：
else: ":"在这里是什么意思？

BASIC语言的基本知识，用以分隔在同一行上的多条语句。[em26]