关于用储存过程怎样实现模糊查询？

查询客户编号  
  界面有三个单选按钮，1为客户编号查询，2为客户名称查询，3为电话号码查询  
  还有一个文本框，接受输入查询字符串。在SQL数据库中建立一个储存过程QUERY_CODE，内容为  
  =========================  
  CREATE   PROCEDURE   query_code  
  @CUST_CODE     as   nvarchar(10)  
  AS  
  begin    
  select   CUST_CODE,CUST_NAMEE,CUST_NAMEC,PHONE,PHONE2   from   customer    
  --where   CUST_CODE   like   @CUST_CODE+'%'  
  where   CUST_CODE=   @CUST_CODE  
  order   by   CUST_CODE  
  end  
  GO  
  =========================  
  当点击按钮“查看”时，就返回符合条件的记录，在DATAGRID控件上显示。  
  我在VB程序代码中这样添加  
  =============================  
  If   Option1.Value   =   True   Then  
           
          Set   cmd   =   New   ADODB.Command  
          cmd.ActiveConnection   =   cn  
          cmd.CommandText   =   "query_code"  
          cmd.CommandType   =   adCmdStoredProc  
          str1   =   Text1.Text  
           
          Set   prm1   =   cmd.CreateParameter("CUST_CODE",   adChar,   adParamInput,   10)  
          cmd.Parameters.Append   prm1  
          prm1.Value   =   str1  
   
          Set   rs   =   cmd.Execute  
          Set   DataGrid1.DataSource   =   rs  
  End   If  
  ........(其他两个单选代码省略)  
  =================================  
  上面的储存过程是精确查询，现在我把储存过程的条件改为  
  where   where   CUST_CODE   like   @CUST_CODE+'%'  
  再次运行程序，就看不到任何记录在控件DATAGRID上显示。请教怎样才能实现模糊查询？