高考成绩查询系统简单实用!容易理解!
ado.Recordset.Close ado.Recordset.Open "select * from db1 where 准考证号='" + Txt1 + " '" If ado.Recordset.EOF Then MsgBox "数据库中没有你想查询的", 16, "错误" Else Form2.Txt1.Text = ado.Recordset.Fields("姓名").Value Form2.Txt2.Text = ado.Recordset.Fields("性别").Value Form2.Txt3.Text = ado.Recordset.Fields("语文").Value Form2.Txt4.Text = ado.Recordset.Fields("数学").Value Form2.Txt5.Text = ado.Recordset.Fields("英语").Value Form2.Txt6.Text = ado.Recordset.Fields("综合").Value Form2.Txt7.Text = ado.Recordset.Fields("总分").Value Form2.Txt8.Text = ado.Recordset.Fields("录取学校").Value Form2.Show Form2.Caption = RTrim(ado.Recordset.Fields("姓名").Value) & "的成绩" End If
- 1
- 粉丝: 0
- 资源: 2
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助