2026-01-30 03

2026-01-30 12:07:23 +01:00
parent 6034845e65
commit 79ae74ee26
28 changed files with 319 additions and 89 deletions
--- a/GestionGrupoSanchoToro/Contabilidad/Aplicaciones/ucConceptosApuntes.xaml.vb
+++ b/GestionGrupoSanchoToro/Contabilidad/Aplicaciones/ucConceptosApuntes.xaml.vb
@@ -128,7 +128,7 @@ Public Class ucConceptosApuntes
    Public Async Sub ObtieneConceptosApuntesAsync(Background As Boolean)
        Try
            Dim rs As New List(Of conceptosapuntes)
-            Dim Busqueda = tsl5.Extensiones.ObjetoNothingAVacio(Me.teBusqueda.EditValue)
+            Dim Busqueda As String = Me.teBusqueda.EditValue.ToString
            If Background Then
                Me.ContenedorAplicacion.IsEnabled = False
                Await Task.Run(Sub()