北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |
大家好,
请教大家一些vba的问题, 现在我做了一个主菜单的窗体1 可以连接多个(窗体2,窗体3,窗体4 等)
我从窗体1调用打开窗体2(窗体的意思就是一个Access单独文件调用并打开另一个Access单独文件)在窗体2中进行 增删改查的操作
当我插入一条数据时有些字段不能为null 你插入空的时候会有系统自带的提示信息 但是现在提示信息不显示。。字段空的时候也不通过,也没有提示信息
但是我单独 打开窗口2的时候 插入数据就会有提示信息 真不知道为什么
上网也找了 没有什么方法
On Error Resume Next
Select Case lng起動MDB番号
Case 1
str路径 = 路径名1
Case 2
str路径 = 路径名2
Case 3
str路径 = 路径名3
Case 4
str路径 = 路径名4
End Select
Set objAccess = New Access.Application
objAccess.OpenCurrentDatabase str路径
objAccess.RunCommand acCmdAppMaximize
Set objAccess = Nothing
路径名1 对应着存放Access文件的路径