vb sql 急问

来源：百度知道 编辑：UC知道 时间：2024/07/11 20:34:08
我有一份vb做的学生档案系统程序，他的数据库是sql做的，我现在想保持vb界面不动，但换成我自己的sql数据，怎么弄？

Dim mydb As Database
Dim myrs As Recordset
Dim sql As String
Dim MyMdb as String
MyMdb=App.path & "\student.mdb"
Set mydb = Workspaces(0).OpenDatabase(MyMdb) '打开数据库
sql = "select 学生 from 学生数据"
Set myrs = mydb.OpenRecordset(sql)