1.myCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=信息.mdb;"
'打开数据库好像是缺路径:data source= X:\XXXX\信息.mdb2.myRs.Open "select * from 班级表 where 年级='" & Text1.Text & "'", myCon, 3, 2改为:myCon, 1, 33.MsgBox "您确定要修改吗?", vbYesNo, "提示"有问题,点Yes或NO程序怎么运行?改为:if MsgBox "您确定要修改吗?", vbYesNo, "提示"=... |