SQL SELECT Statement mismatch

[Alexandru_mbm]

What's wrong with this ?

ERROR: Type mismatch in expression.

        conectare_db()

        data_table = New DataTable
        data_adapter = New OleDb.OleDbDataAdapter("SELECT id, denumire, pret FROM servicii WHERE id IN (SELECT id_serviciu FROM contracte WHERE stare='activ' AND id_beneficiar='" & Me.txt_cod_beneficiar.Text.ToString & "');".ToString, conexiune)
        command_builder = New OleDb.OleDbCommandBuilder(data_adapter)
        data_adapter.Fill(data_table)
        Me.dgv_lista_servicii_contractate.DataSource = data_table

        Dim coloana_1 As DataGridViewColumn = dgv_lista_servicii_contractate.Columns(1)
        Me.dgv_lista_servicii_contractate.Columns(0).Width = 90
        coloana_1.AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
        Me.dgv_lista_servicii_contractate.Columns(2).Width = 90
        Me.dgv_lista_servicii_contractate.Columns(0).HeaderText = "Cod"
        Me.dgv_lista_servicii_contractate.Columns(1).HeaderText = "Denumire / Descriere"
        Me.dgv_lista_servicii_contractate.Columns(2).HeaderText = "Pret"

        deconectare_db()

I just can't see what's wrong!!!