单选题
下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，并返回删除后的结果。例如：若str="ABCDABCD"，ch="B"，则函数的返回值为："ACDACD"
Function delchar(str As String，ch As String)As String
Dim k As Inlegcr，temp As String，ret As String
ret=""
For k=1 To Len(str)
temp=Mid(str，k，1)
If temp=ch Then
ret=ret＆temp
End If
Next k
delchar=ret
En d Function
但实际上函数有错误，需要修改，下面的修改方案中正确的是( )。
【正确答案】
B
【答案解析】【解析】Mid函数用于提取字符串中的指定位数。Len函数的作用是返回串的长度。本题中，For k=1 To Len(str)，语句的作用是每次循环提取str串中的一个字符，语句temp=Mid(str，k，1)的作用是将提取的字符存入字符变量temp中，然后将temp和用户欲删除的字符做比对，若不同，则将此字符插入的字符串ret的末尾。循环结束ret 中保存的就是不包含用户欲删除字符的字符串，也就是题目要求的字符串了。所以选B。