Torna al Thread
Public Class frmAspetto
Private Sub AspettoBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AspettoBindingNavigatorSaveItem.Click
Me.Validate()
Me.AspettoBindingSource.EndEdit()
Me.AspettoTableAdapter.Update(Me.MagazzinoDataSet.Aspetto)
End Sub
Private Sub frmAspetto_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: questa riga di codice carica i dati nella tabella 'MagazzinoDataSet.Aspetto'. È possibile spostarla o rimuoverla se necessario.
Me.AspettoTableAdapter.Fill(Me.MagazzinoDataSet.Aspetto)
End Sub
Private Sub btnAggiungi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAggiungi.Click
Dim newAspettoRow As magazzinoDataSet.AspettoRow
newAspettoRow = MagazzinoDataSet.Aspetto.NewAspettoRow()
newAspettoRow.descrizione = DescrizioneTextBox.Text
MagazzinoDataSet.Aspetto.Rows.Add(newAspettoRow)
End Sub
End Class