Segue o codigo abaixo....

Imports System.Data.SqlClient

Public Class Form6
    Private Sub tbcargoBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TbcargoBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.TbcargoBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.CTMDataSet)
    End Sub

    Private Sub Form6_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: esta linha de código carrega os dados para a tabela 'CTMDataSet.tbcargo'. Você pode movê-la, ou removê-la, conforme necessário.
        Me.TbcargoTableAdapter.Fill(Me.CTMDataSet.tbfuncao_no_ctm)

    End Sub

    Private Sub cargoTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cargoTextBox.TextChanged

    End Sub

    Private Sub BindingNavigatorAddNewItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BindingNavigatorAddNewItem.Click

    End Sub
End Class