Cita: he intentado con el try catch pero eso no me ha funcionado pues desde antes de
que llegue al codigo del procedimiento marca el error no se a ciencia cierta en cual
evento me esta marcando ese error
Por lo pronto, si no sabes a ciencia cierta dónde se está produciendo el error, entonces debes poner un try / catch en cada método o evento programado, poniendo un stop en el catch de cada uno, hasta determinar cuál es el que llama al error.
Por otro lado, no has puesto en tu código ningún Try/Catch, o al menos no aparece, por lo que no sabes exactamente lo que sucede. En todo caso, yo intentaría probar con esta forma:
Código vb.net:
Ver originalPrivate Sub cbbApellidos_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbbApellidos.SelectedIndexChanged
Dim x As Integer = Me.cbbApellidos.Text.IndexOf(",")
CargarDatos("Select * from CLIENTES")
If x >= 0 Then
Dim nombre, apellidos As String
apellidos
= Me.cbbApellidos.Text.Substring(0, x
).Trim() Filas = Tabla.Rows
Buscar_fila = Tabla.Select("Apellidos_cliente = '" & apellidos & "' AND Nombre_cliente = '" & nombre & "'")
If Buscar_fila.Length = 0 Then
MessageBox.Show("El Cliente que busca no Existe vuelva a introducir sus Apellidos", "Buscar")
Exit Sub
End If
Dim i, j, posi As Integer
For i = 0 To Buscar_fila.Length - 1 'Indica el tamaño del arreglo
For j = 0 To Filas.Count - 1
If (Filas(j).Equals(Buscar_fila(i))) Then
posi = j
Exit For
End If
Next
Next
BindingSource.Position = posi
Enlazar_Datos_Clientes()
End If
End Sub