Dim trans as SqlTransAction
Try
  sqlCmd.Connection.Open()
  trans = sqlCmd.Connection.BeginTransAction()
  sqlCmd.ExecuteNonQuery()
  trans.Commit() 
Catch ex As Exception
  MessageBox.Show(ex.Message)
  trans.RollBack()
Finally
  sqlCmd.Connection.Close()
End Try