主题:有个问题卡死我了,大家帮帮忙啊
是这样的,在VB.net中,
Private Sub FrmMain_Load(…………) Handles MyBase.Load
Dim sqlstr As String
sqlstr = "Server=(local);Database=BookSystem;uid=sa;pwd=1234"
Dim ConnsqlPHO As New SqlConnection(sqlstr)
ConnsqlPHO.Open()
Dim biaoPHO As New SqlCommand("select * from photolist")
biaoPHO.Connection = ConnsqlPHO
Dim myReaderPHO As SqlDataReader
myReaderPHO = biaoPHO.ExecuteReader(CommandBehavior.CloseConnection)
Do While myReaderPHO.Read
Dim myItem2 As New ListViewItem
myItem2.Text = myReaderPHO.Item("ID")
myItem2.SubItems.Add(myReaderPHO.Item("mane)").ToString())
myItem2.SubItems.Add(myReaderPHO.Item("efe").ToString())
myItem2.SubItems.Add(myReaderPHO.Item("etr").ToString())
ListView1.Items.Add(myItem2)
Loop
可以实现SQL中的表数据显示于listview1(运行,主窗体FrmMain_Load产生事件)
我用一个子窗体对SQL中的数据进行修改并能保存成功。如果重新运行,可以
在listview1中显示修改后的效果。问题是这样的,我想在子窗体中修改保存后
能够在listview1中马上显示出效果,也就是马上刷新listview1中的数据。不需要
重新运行才能看到修改后的效果。
请大家帮帮忙啊,几天了都做不出来,很郁闷[em10][em10][em10][em18][em18][em18][em4]
Private Sub FrmMain_Load(…………) Handles MyBase.Load
Dim sqlstr As String
sqlstr = "Server=(local);Database=BookSystem;uid=sa;pwd=1234"
Dim ConnsqlPHO As New SqlConnection(sqlstr)
ConnsqlPHO.Open()
Dim biaoPHO As New SqlCommand("select * from photolist")
biaoPHO.Connection = ConnsqlPHO
Dim myReaderPHO As SqlDataReader
myReaderPHO = biaoPHO.ExecuteReader(CommandBehavior.CloseConnection)
Do While myReaderPHO.Read
Dim myItem2 As New ListViewItem
myItem2.Text = myReaderPHO.Item("ID")
myItem2.SubItems.Add(myReaderPHO.Item("mane)").ToString())
myItem2.SubItems.Add(myReaderPHO.Item("efe").ToString())
myItem2.SubItems.Add(myReaderPHO.Item("etr").ToString())
ListView1.Items.Add(myItem2)
Loop
可以实现SQL中的表数据显示于listview1(运行,主窗体FrmMain_Load产生事件)
我用一个子窗体对SQL中的数据进行修改并能保存成功。如果重新运行,可以
在listview1中显示修改后的效果。问题是这样的,我想在子窗体中修改保存后
能够在listview1中马上显示出效果,也就是马上刷新listview1中的数据。不需要
重新运行才能看到修改后的效果。
请大家帮帮忙啊,几天了都做不出来,很郁闷[em10][em10][em10][em18][em18][em18][em4]