在VB2008 速成版中使用参数化SQL查询语句无效

  最近刚学会在VB2008 中使用参数化SQL语句，于是马上用到代码中，却碰到查不到任何数据的情况，纠结了好几天，还是没有搞明白，差点吐血。不得已还是先在代码中使用字符串拼接的SQL语句。
  包含参数化SQL语句的代码如下：
            Dim cmSl As New OleDbCommand("select * from PENA where VSL_VOY=@vsl_voy and POD"+ _                                                                                                                                 "LIKE @pod ",dbCon)
            Dim paPOD As New OleDbParameter("@pod", OleDbType.VarChar)
            Dim paVSL_VOY As New OleDbParameter("@vsl_voy", OleDbType.VarChar)
            
            paPOD.Value = IIf(Me.TextBoxPOD.Text.Length = 0, "%", Me.TextBoxPOD.Text.Trim.ToUpper)
            paVSL_VOY.Value = Me.TextBoxVSL_VOY.Text.Trim.ToUpper
            cmSl.Parameters.Add(paVSL_VOY)
            cmSl.Parameters.Add(paPOD)
    &nbs