• 2022-06-06
    设有如下函数:Function DelSpace(ch As String)As Integer Dim n%, st$, c$ st="" n=0 For k=1 To Len(ch) c=Mid(ch, k, 1) If c[]" " Then st=st & c Else n=n+1 End If Next k ch=st DelSpace=nEnd Function函数的功能是( )。
    A: 统计并返回字符串ch中字符的个数
    B: 删除字符串ch中的空格符,返回删除字符的个数
    C: 统计并返回字符串ch中非空格字符数
    D: 删除字符串ch中除空格符外的其他字符,返回删除字符的个数
  • 举一反三