vb输入学号或姓名可以查询该学生信息的程序 30
展开全部
先建好学生信息的Access数据库。是不是想在textbox.text中输入学号然后在listview里显示学生的信息啊,你建立的数据哭要和listview的对应,这个程序要写在button的查询事件里
如果是:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
con1.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data Source=学生表.mdb"
con1.Open()
com1.CommandText = "select * from 学生信息表 where 学号 like" & "'%" & TextBox1.Text & "%'"
com1.Connection = con1
re1 = com1.ExecuteReader()
TextBox1.Text = ""
Do While re1.Read()
ListView1.Items.Add(re1(0))
ListView1.Items(n).SubItems.Add(re1(1))
ListView1.Items(n).SubItems.Add(re1(2))
ListView1.Items(n).SubItems.Add(re1(3))
。
。
。
n = n + 1
Loop
希望能帮到你!!!
如果是:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
con1.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data Source=学生表.mdb"
con1.Open()
com1.CommandText = "select * from 学生信息表 where 学号 like" & "'%" & TextBox1.Text & "%'"
com1.Connection = con1
re1 = com1.ExecuteReader()
TextBox1.Text = ""
Do While re1.Read()
ListView1.Items.Add(re1(0))
ListView1.Items(n).SubItems.Add(re1(1))
ListView1.Items(n).SubItems.Add(re1(2))
ListView1.Items(n).SubItems.Add(re1(3))
。
。
。
n = n + 1
Loop
希望能帮到你!!!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询