vb结合sql开发学校教务管理系统内容摘要：
on, 1, 3, adCmdText select * from 学生信息表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub 6 Private Sub Form_Load() Provider=。 Integrated Security=SSPI。 Persist Security Info=False。 Initial Catalog=教学成绩管理数据库。 Data Source=7MZZQCR4HI4IDQV select * from 学生信息表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub 教师信息管理界面： 教师信息管理界代码： Dim rs As New Dim con As New Private Sub Command1_Click() (教师号 ) = (姓名 ) = (性别 ) = (所在系 ) = (登录名 ) = Set = rs End Sub Private Sub Command2_Click() select * from 教师信息表 where 教师号 =39。 + + 39。 , con, 7 adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Command3_Click() (姓名 ) = (性别 ) = (所在系 ) = (登录名 ) = Set = rs End Sub Private Sub Command4_Click() delete from 教师信息表 where 教师号 =39。 + + 39。 , con, 1, 3, adCmdText select * from 教师信息表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Form_Load() Provider=。 Integrated Security=SSPI。 Persist Security Info=False。 Initial Catalog=教学成绩管理数据库。 Data Source=7MZZQCR4HI4IDQV select * from 教师信息表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub 课程信息管理界面： 8 课程信息管理代码： Dim rs As New Dim con As New Private Sub Command1_Click() (课程号 ) = (课程名称 ) = (院系编号 ) = (学时 ) = (类别 ) = Set = rs End Sub。阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体)，仅供学习参考。
用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权，请联系我们反馈本站将在三个工作日内改正。