use vb.net code:
dim email() as string=split("abc;dfg;kml",";")
Dim i As Integer =0 
for i=0 to email.length-1
   if right(email(i))="你想要删除的字母C" then
      email(i)=''
    end if
   i=i+1
end for
dim emailstring as string=""
for i=0 to email.length-1
   emailstring=emailstring & email(i)
end for 
if emailstring="" then
全部删除了。
endif

解决方案 »

  1.   

    注意:上面的代码是随手写的,没有在环境中测试,例如:
    email(i)=''写错了,应该是email(i)=""
      

  2.   

    你这段代码有问题,如果是
    abc;acc;adc
    那岂不是全删除了?
    而且要删除的是什么字符也不是那么的好找。
    因为在页面上,所以用javascript 实现会好些。
      

  3.   

    try:<script language="JavaScript">
    function delstr()
    {
    if(event.keyCode!=8)
    {return true;
    }
    else
    {var str=document.form1.t1.value;
     if(str=='') return true;
     
     document.form1.t1.focus();
     var cr=document.selection.createRange();
     cr.moveStart('character',-1);
     
     while(cr.text!='' && cr.text!=';')
       {cr.text='';
        cr.moveStart('character',-1);
        }   if(cr.text=='')
        {cr.moveEnd('character',1);
         if(cr.text==';')
          { cr.text='';}
        }
       
       if(cr.text==';')
         { cr.text='';}   
    }
    }</script><form name="form1">
    <input type="text" name="t1" onkeyup="javascript:delstr();">
    </form>