通過fom1點擊錄入按鈕彈出frm2
frm2輸入資料后成功在access資料庫添加一條記錄
重新系結frm1的datagridview的資料源
GetAdap("select d.ID,d.日期,y.車牌號碼,k.姓名 as 老板,d.裝場,d.卸場,d.類別,d.重量,d.運價,d.運費,y.油量,y.油價,y.油費,y.加水,y.尿素,y.過路費,y.修理,y.罰款,y.其他,d.備注 from 訂單 as d,運輸 as y,客戶 as k where d.id=y.訂單ID And d.客戶ID = k.ID", "新明細")
FrmCheYunShu.DataGridView1.DataSource = Nothing
FrmCheYunShu.DataGridView1.DataSource = objDset.Tables("新明細")
但frm1的datagridview不重繪，必須fom1重新load才能看見新添加的記錄
uj5u.com熱心網友回復：
直接frm2宣告一個事件，添加完資料后執行該事件，frm1加載事件系結Load方法uj5u.com熱心網友回復：
能給個具體點的代碼嗎？
uj5u.com熱心網友回復：
Public Class frm2Public Shared Event OnRefresh() //宣告一個事件
錄入的點擊方法添加完后
RaiseEvent OnRefresh() //執行這個事件
End Class
Public Class frm1
Private Sub frm_PatrolGroup_Load(sender As Object, e As EventArgs) Handles MyBase.Load
AddHandler frm_PatrolGroup_add.OnRefresh, AddressOf Me.LoadData //系結加載方法
End Sub
Private Sub frm_PatrolGroup_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
RemoveHandler frm_PatrolGroup_add.OnRefresh, AddressOf Me.LoadData //關閉時移除事件
End Sub
End Class
uj5u.com熱心網友回復：
對應的表單名字自己改uj5u.com熱心網友回復：
add.OnRefresh怎么寫不了這句呢
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/264018.html
標籤：VB.NET
下一篇：輸出字符緩沖區太小