主题：如何判断系统是否安装access数据库或者sql2005数据库，如果没有，提示安装

 判断是否安装，只需要去查是否有对应的注册表值即可

Dim path As String
path = Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Setup","SQLPath",Nothing)
msgbox(path)

 http://www.foxtable.com/help/topics/2051.htm