Acutalizacion fallida visual basic

[Aquaventus]

Hola acse lo que te falta es enlazar tu SqlCommand con la conexion :

Código vb.net:

Public Sub okcancelar() 
 
        Dim cnn As New SqlConnection 
        Dim cmd As New SqlCommand 
        cnn.ConnectionString = Me.conn.ConnectionString 
 
        'TE FALTA ENLAZAR CON LA CONEXION
        cmd.Connection = cnn
 
        cnn.Open() 
        'cmd = cnn.CreateCommand() 
        cmd.CommandText = ("UPDATE c_albven SET libre_1 = 'Ok.' WHERE letra = 'CC'") 
        cmd.CommandText = ("UPDATE c_albven SET libre_1 = 'Ok.' WHERE letra = 'CB'") 
        cmd.CommandText = ("UPDATE c_albven SET libre_1 = 'Ok.' WHERE letra = 'CA'") 
 
        MessageBox.Show("No Actualizas") 
 
        Me.RichTextBox1.Text = " Facturas Canceladas en Ok." 
        cmd.ExecuteNonQuery() 
        cnn.Close() 
        cnn.Dispose() 
    End Sub
 

Saludos!.