首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD” Function delchar(str As String,ch As
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD” Function delchar(str As String,ch As
admin
2017-11-27
66
问题
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD”
Function delchar(str As String,ch As String)
As String
DimkAs Integer,tempAs String,retAs 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相同的字符,而在给出的程序段中,每次遍历s仃参数中的每一个字符,若其与ch相等,则将其连接到结果字符串中,这样显然是不合要求的,应该是若取出的字符和ch不等则将其连接到结果中,否则舍弃。因此,应将“If temp=ch Then”改为“If temp<>ch Then”
转载请注明原文地址:https://www.kaotiyun.com/show/twGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写了如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)If(ButtonAnd3)=3ThenPrint"AAAA"
函数过程F1的功能是:如果参数a为奇数,则返回值为1,否则返回值为0。以下能正确实现所述功能的代码的是()。
有如下程序。PrivateSubCommand1_Click()DimkAsInteger,mAsIntegerDimopAsIntegerk=4:m=1op=PPC(k,m):Printop;op=P
定时器的Interval属性以什么为单位指定Timer事件之前的时间间隔
运行以下程序,输出结果是()。ForI=1To3clsPrint"I=",I;Next
数据流图的类型有______和事务型。
若在Shape控件内以FillSyylr属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
()控件可以使图形根据控件大小而改变大小。
表达式Sgn(0.25)的值是
语句:PrintInt(Rnd*5+20)的输出不可能是
随机试题
《知识产权协定》明确版权保护不延及【】
A、右心室B、左心房C、冠状窦D、门静脉E、T腔静脉肝的血液经肝静脉注入
腰部隐痛,酸软无力,缠绵不愈,心烦少寐,口燥咽干,面色潮红,手足心热,舌红少苔,脉弦细数者,治宜选用( )
用于显示退变髓鞘的染色方法是
患者,男,72岁。上腹部疼痛反复发作5年,近7天出现腹胀,呕吐。经X线钡餐检查诊断为瘢痕性幽门梗阻。为解除梗阻应行
房地产物业投资或置业投资的目的有两个,即自用或______给最终使用者。
工资率提高对劳动力供给所产生的替代效应导致()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征和规律分类正确的一项是:
A、Childrencanlearnhowabusinessworksinsociallife.B、Childrenmayunderstandwhatanormalfamilylifeis.C、Childrenmay
Stressmaybedefinedasanemotional,intellectual,orphysicalreactiontochangeordemands.Thestressreactionpreparesthe
最新回复
(
0
)