下面函数的功能应该是:删除字符串s仃中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ABCDCD” Function delchar(str As String,ch As S

admin2018-10-18  33

问题 下面函数的功能应该是:删除字符串s仃中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ABCDCD”
    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)
    Iftemp=ch Then
    ret=ret temp
    End If   
    Next k   
    delchar=ret
    End Function
    但实际上函数有错误,需要修改。下面的修改方案中正确的是

选项 A、把ret=ret temp改为ret=temp
B、把Iftemp=ch Then改为Iftemp<>ch Then
C、把delchar=ret改为delchar=temp
D、把ret=""改为temp=""

答案B

解析 本题考查常用函数和循环结构的使用。在delchar函数中,Ret变量保存要返回的字符串,通过一个循环来查处要删除的字符,在循环体内,逐个取出字符,并判断是否是需要删除的字符,如果是则把该字符保存到Ret中,最后返回Ret。显然程序的功能是返回字符串str中由ch组成的字串,和题目要求不符,应该把If判断里面的等于改成不等于,这样只要不是ch就保存到Ret中,相当于删除了ch字符。
转载请注明原文地址:https://jikaoti.com/ti/vnm0FFFM
0

最新回复(0)