单选题下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，
并返回删除后的结果。例如：若str=“ABCDABCD”，ch=“B”，则函数的返回值为：“ACDACD”
Function delchar(str As String,ch As String)As String
Dim k As Integer,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
End Function
但实际上函数有错误，需要修改。下面的修改方案中正确的是______。

A.把ret=ret & temp改为ret=temp
B.把If temp=ch Then改为If temp＜＞ch Then
C.把delchar=ret改为delchar=temp
D.把ret=""改为temp=""

【正确答案】 B

【答案解析】[解析] 题干中给出的函数作用为删除参数字符串中与ch相同的字符，而在给出的程序段中，每次遍历str参数中的每一个字符，若其与ch相等，则将其连接到结果字符串中，这样显然是不合要求的，应该是若取出的字符和ch不等则将其连接到结果中，否则舍弃。因此，应将“If temp=ch Then”改为“If temp＜＞ch Then”