不显示操作查询的系统提示二种方法
dim strSQL As String
strSQL = " update语句"
方法1
DoCmd。SetWarnings False '不显示警告
docmd . runsqlstrsql
docmd . set warnings true '恢复显示。
方法2
current project . connection . execute strql
dim strSQL As String
strSQL = " update语句"
方法1
DoCmd。SetWarnings False '不显示警告
docmd . runsqlstrsql
docmd . set warnings true '恢复显示。
方法2
current project . connection . execute strql
0条评论