Sql 简单VBA选择查询

Sql 简单VBA选择查询,sql,forms,ms-access,vba,Sql,Forms,Ms Access,Vba,我在MS Access上有一个表单,其中有一个按钮,当我按下该按钮时,我想运行一个SELECT查询“SELECT*FROM City” 这里的所有问题都非常复杂,我只需要几行简单的代码就可以了。这里有一种方法: sSQL = "SELECT Variable FROM GroupTable " Set rs = CurrentDb.OpenRecordset(sSQL) On Error GoTo resultsetError dbValue = rs!Variable MsgBo

我在MS Access上有一个表单,其中有一个按钮,当我按下该按钮时,我想运行一个SELECT查询
“SELECT*FROM City”


这里的所有问题都非常复杂,我只需要几行简单的代码就可以了。

这里有一种方法:

 sSQL = "SELECT Variable FROM GroupTable " 
 Set rs = CurrentDb.OpenRecordset(sSQL)
 On Error GoTo resultsetError 
 dbValue = rs!Variable
 MsgBox dbValue, vbOKOnly, "RS VALUE"
resultsetError:
 MsgBox "Error Retrieving value from database",VbOkOnly,"Database Error"

到目前为止你有什么收获?欢迎来到!这是一个程序员编写自己的代码并在试图自己解决某个特定问题后与之共享问题的网站。如果,之后,你有一个特定的问题,请分享你的文章和一些背景信息,你的项目。一些让你开始的好读物:“以及提示和建议