VB中连接数据库的问题,制作学生管理系统

[复制链接]
查看11 | 回复0 | 2009-1-30 06:28:38 | 显示全部楼层 |阅读模式
VB做学生管理系统的问题 !请高手帮助!````我做学生管理系统遇到一个问题在 修改成绩 一项中 我用select语句想查找条件为:成绩表学号=学生表中学号再在学生信息表中查找相对应的姓名和学号 我想让成绩表里的学号是唯一的(一学号可以对应多个成绩)我写的部分语句如下这是在装入窗体里写的:Private Sub Form_Load()txtsql = Trim("select student_info.student_ID,student_info.student_Name fromstudent_info,result_info where student_info.student_ID = result_info.student_ID ") 这条就是我的条件语句Set mrc = executesql(txtsql)mrc.MoveFirstText1(0).Text = mrc.Fields(0)Text1(1).Text = mrc.Fields(1)end sub这是在"下一个"里写的:Private Sub Command2_Click()mrc.MoveNextIf mrc.EOF ThenMsgBox "已经到了最后一个": mrc.MovePreviousElseText1(0).Text = mrc.Fields(0)Text1(1).Text = mrc.Fields(1)End IfEnd Sub我感觉我这么写是对的运行也是没错的 可是运行出来它还是以成绩表中的学号为字段,我点“下一个” 因为学号取自成绩表 所以我要按好几下才能把学号转到下一个还有一个 在做信息查询中我把查询的字段已经全部找出 txtsql = Trim("select student_info.student_Name,result_info.* from student_info,result_info where ((student_info.student_ID=\'" & Text1.Text & "\')" & "and" & "(student_info.student_ID = result_info.student_ID))")因为这是多条字段我不知道怎么把它全部显示在MSFlexGrid里 我只会用 MSFlexGrid.TextMatrix(1, 1) = mrc.Fields(3)想了一天了怎么也想不出这两个原因 ``

                                                                                                用GROUP分组select student_info.student_ID,student_info.student_Name from student_info,result_info where student_info.student_ID = result_info.student_ID group by student_info.student_ID                                       
提问者对答案的评价:
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行