Demora con query en sqlite sobre dato tipo texto

[miguelillo2]

Hola a todos !!!!

Estoy haciendo una aplicacion de escritorio en vb.net 2005; en donde he decidido importar una bd sql server 2005 a sqlite; debido a que la aplicación la voy a distribuir en cd; por lo tanto necesito mandarle la bd al usuario.----

En la app utilizo un treeview para mostrar los datos, del lado derecho de ese treeview pongo un cuadro de texto personalizado, en donde recupero el campo de tipo charvar(en MS server es text) cuando el usuario selecciona un nodo y mando a llamar el evento treeview.AfterSelect, es en este momento cuando tarda aproximadamente 10 minutos en mostrar los datos de ese nodo seleccionado--He probado el mismo evento pero cambiando el valor a recuperar en el cuadro de texto es decir le digo esto txtcontenido.InnerHtml = treeview.slectednode.text.

Eh observado que ejecuta el query como sino respetara los parametros que le indico, es decir como si me llenara el dataset con los datos de esa tabla que son alrededor de 20,000 registros, no se si hago mal el query---

para que se den una idea del query aquí se los pongo:

Código:

Private Sub treeview_AfterSelect(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles treeview.AfterSelect
        If Not treeview.SelectedNode Is Nothing Then
            txtley.Text = treeview.SelectedNode.Text
            'txtcontenido.InnerHtml = treeleyes.SelectedNode.Text

            Dim my_SQLite_Connection As New SQLiteConnection
            Dim cmd As New SQLiteCommand
            Try
                Dim cad As String = "C:\Documents and Settings\Miguel-in\Mis documentos\Visual Studio 2005\Projects\Controles\Controles\bin\mydatabase.db"

                my_SQLite_Connection.ConnectionString = "Data Source=" + cad
                my_SQLite_Connection.Open()

            Catch ex As SQLiteException
                MessageBox.Show(ex.Message)
            End Try
            With cmd
                .Connection = my_SQLite_Connection
                .CommandType = CommandType.Text
            End With
            Dim sSQL As String
            sSQL = " select a_id,t_id,l_id,l_o,l_nombre,l_contenido from mytabla where a_id = " & IIf(cba.SelectedIndex < 0, "0", cba.SelectedValue)
            sSQL &= " and t_id = " & IIf(cbt.SelectedIndex < 0, "0", cbt.SelectedValue)
            sSQL &= " and l_id = " & treeview.SelectedNode.Tag
            cmd.CommandText = sSQL

            Dim my_SQLite_DataAdapter As New System.Data.SQLite.SQLiteDataAdapter
            Dim my_SQLite_DataSet As New DataSet


            my_SQLite_DataAdapter.SelectCommand = cmd
            my_SQLite_DataAdapter.Fill(my_SQLite_DataSet, "mytable")


            Dim dr As DataRow
            For Each dr In my_SQLite_DataSet.Tables("mytable").Rows

                txtcontenido.InnerHtml = dr("l_contenido")
            Next
            my_SQLite_Connection.Close()

        End If
    End Sub

se alenta nada mas cuando intento recuperar cualquier campo de una tabla, y dicha tabla contiene un tipo varchar(text en MS server), que contiene elementos html!!!.-----

cualquier sugerencia se acepta--- gracias anticipadamente

Bitss--Miguel--in----