Visual Basic - TRANSACCIONES EN VISUAL BASIC

Hola, necesito saber como funcionan las transacciones de sql en visual basic.
Si alguien tiene un manual, me lo podría prestar, o simplemente deque alguien me explique el funcionamiento.
GRACIAS

Hola

Las transacciones en VB usando SQL se utilizan desde un objeto Connection de ADO(En este ejemplo)

el objeto conexion tiene tres metodos
CnnConexion.BeginTrans
CnnConexion.CommitTrans
CnnConexion.RollbackTrans

El primero BeginTrans inicia la transaccion
El segundo CommitTrans Confirma la actualizacion
El tercero RollbackTrans deshace las modificaciones hechas hasta cuando se inicio la transaccion

Aqui hay un ejemplo

En una una lista hay unos ID que Bienen de una tabla al precionar el boton se elimina el registro que coincide con ese id.

En este ejemplo se inicia la transaccion y se elimina el registro luego con RollbackTrans deshacemos la eliminacion si colocas CommitTrans en vez de
RollbackTrans el registro sera eliminado por completo

Private Sub Comando0_Click()
Dim CnnConexion As New ADODB.Connection
Dim CmdComando As New ADODB.Command
Dim strSQL As String

strSQL = "DELETE FROM tblTareas WHERE ID=" & Me.Lista3
CmdComando.CommandText = strSQL
CnnConexion.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BaseDatos.mdb"
CnnConexion.Open
Set CmdComando.ActiveConnection = CnnConexion

CnnConexion.BeginTrans
CmdComando.Execute
'CnnConexion.CommitTrans
CnnConexion.RollbackTrans
CnnConexion.Close
End Sub

Saludos
http://www.theemulator.tk

Hola de nuevo, y muchisimas gracias por la aclaracion.
Lo que yo quiero hacer, es gestionar(modificar o borrar) un registro de una tabla, que sea seleccionado en un listview.

Esto se puede hacer ??

GRACIAS

un Ejemplo: este es un ejemplo de como ingersar y obtener datos de un List, espero te sirva

Public Sub CrearCabeceras()
'INGRESANDO CABECERAS DEL LIST VIU
With ListView1
' El tipo de Listview que queremos es del tipo "reporte"
'.ColumnHeaderIcons = ImageList1
.View = lvwReport
'Que muestre las líneas de separación entre datos
.GridLines = False
' Que no se puedan modificar los datos del listview
.LabelEdit = lvwManual
End With
'FIN DE CABECERAS
End Sub

Public Sub LISTA()
ListView1.Refresh
Dim tLi As ListItem
ListView1.ListItems.Clear
'adobuscar.MoveFirst
Do While Not AdoConsulta.EOF
Set tLi = ListView1.ListItems.Add(, , Trim(AdoConsulta.Fields(1)) & " ", 1, 1)
tLi.SubItems(1) = Trim(AdoConsulta.Fields(2)) & ""
tLi.SubItems(2) = Trim(AdoConsulta.Fields(3)) & ""
tLi.SubItems(3) = Trim(AdoConsulta.Fields(4)) & ""
tLi.SubItems(4) = Trim(AdoConsulta.Fields(5)) & ""
tLi.SubItems(5) = Trim(AdoConsulta.Fields(6)) & ""
tLi.SubItems(6) = Trim(AdoConsulta.Fields(0)) & ""
tLi.SubItems(7) = Trim(AdoConsulta.Fields(7)) & ""
AdoConsulta.MoveNext
Loop
End Sub

Public Sub MostrarDatosListView()
Dim i As Integer
On Error GoTo Mensaje
For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).Selected = True Then
Bandera = Trim(ListView1.ListItems(i).ListSubItems(6))
DATOSCLIENTE = Trim(ListView1.ListItems(i).ListSubItems(7))
NFactura = Trim(ListView1.ListItems(i))
End If
Next
Exit Sub
Mensaje:
Resume Next
End Sub

NOTA:SI ESTAS TRABAJANDO CON LA OPCION CHECKBOXES, CAMBIAS SELECTED, POR CHECKED