Måste man göra så här bara för att påpeka att ändringar är gjorda?
Det känns ju lite tjatigt måste jag säga.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.TblTableAdapter.Update(Me.Db1DataSet.tbl)
Button1.Text = "Spara"
End Sub
Private Sub dataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
Button1.Text = "Spara*"
End Sub
Private Sub dataGridView1_RowsRemoved(ByVal sender As Object, ByVal e As DataGridViewRowsRemovedEventArgs) Handles DataGridView1.RowsRemoved
Button1.Text = "Spara*"
End Sub
Private Sub dataGridView1_RowsAdded(ByVal sender As Object, ByVal e As DataGridViewRowsAddedEventArgs) Handles DataGridView1.RowsAdded
Button1.Text = "Spara*"
End Sub
Om du nu vill ändra texten varje gång en av ovanstående händelser inträffar så måste du göra så.
Däremot kan du återanvända koden, så att ändringar bara behöver göras på ett ställe:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.TblTableAdapter.Update(Me.Db1DataSet.tbl)
Button1.Text = "Spara"
End Sub
Private Sub dataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
_Button1Changed()
End Sub
Private Sub dataGridView1_RowsRemoved(ByVal sender As Object, ByVal e As DataGridViewRowsRemovedEventArgs) Handles DataGridView1.RowsRemoved
_Button1Changed()
End Sub
Private Sub dataGridView1_RowsAdded(ByVal sender As Object, ByVal e As DataGridViewRowsAddedEventArgs) Handles DataGridView1.RowsAdded
_Button1Changed()
End Sub
Private Sub _Button1Changed()
Button1.Text &= "*"
End Sub
