https://foro.gambas-es.org/viewtopic.php?f=3&t=5056&p=29379#p29379
-----------------------------------
v3ctor
Jueves, 24 Diciembre 2015, 20:09

Re: Como Hacer Una Subconsulta En Sqlite?
-----------------------------------
ahtonio, hola

lo voy a probar, 

julio así me quedo el código y funciona de lujo:

[code linenumbers=false syntax=gambas]Public Sub txtBuscar_KeyRelease()
  Dim hresul As Result
  Dim filtro As String

  filtro = txtBuscar.Text
  
  QueFiltro()
    
  Select Case TipoDato
    Case "ingreso"
       hresul = Conectar1.Exec("Select * from tablataller where " & TipoDato & " like '%" & filtro & "%'")
    Case "pendiente"
       hresul = Conectar1.Exec("Select * from tablataller where " & TipoDato & " like '%si%'")
    Case Else
       If bAnio = False Then
         hresul = Conectar1.Exec("Select * from tablataller where " & TipoDato & " like '%" & filtro & "%'") 'original
       Else
         hresul = Conectar1.Exec("Select * From tablataller where(" & TipoDato & " Like '%" & filtro & "%' and ingreso like '%" & sAnio & "%')") 'filtro por año
       Endif
  End Select
   
  If hresul.Available = False Then
'       Me.Refresh
      vBoxSuma.Text = "0"
      txtTotalClientes.Text = "0"
      txtTotalOrdenes.Text = "0"
      txtCN.Text = "0"
      txtOPE.Text = "0"
      vBoxNP.Text = "0"
      tvTaller.Clear
      tvTaller.Grid = False
   Else
      tvTaller.Grid = True
      MostrarDatos(hresul)
   Endif

End[/code]


