首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD” Function delchar(str As String,ch As Stri
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD” Function delchar(str As String,ch As Stri
admin
2018-12-20
22
问题
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD”
Function delchar(str As String,ch As String)
As String
Dim kAs Integer,temp As String,ret As String
ret=" "
For k=1To 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、把Iftemp=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”
转载请注明原文地址:https://kaotiyun.com/show/VjFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下函数:FunctionDelSpace(chAsString)AsInteger Dimn%,st$,c$ st="" n=0 Fork=1ToLen(ch) c=Mid(ch,k,1) I
设a=2,b=3,c=4,d=5,下列表达式的值是( )。
下列选项中属于面向对象设计方法主要特征的是( )。
面向对象方法中,继承是指( )。
为了读取数据,需打开顺序文件"D:\data5.txt",以下正确的命令是
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=
为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为( )。
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click() Dimch$,asciiAsInteger Open"file.txt"ForInpu
在软件设计中不使用的工具是( )。
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click() ’循环1 Fori=1To3 Forj=1To4
随机试题
丹毒的致病菌是【】
男,74岁,发现血压高20余年,胸闷、气短2年,诊断为高血压心脏病,1小时前情绪激动后出现上述症状加重,咯粉红色泡沫状痰。查体:血压190/100mmHg,端坐呼吸,心界向左下扩大,心率110次/分,双肺底湿性啰音,下肢无水肿该患者目前的诊断为
影响计算机图像质量的主要参数有:
大额可转让定期存单最早产生于美国。美国的《Q条例》规定,商业银行对活期存款不能支付利息,定期存款不能突破一定限额。20世纪60年代,美国市场利率上涨,高于《Q条例》规定的上限,资金从商业银行流入金融市场。为了吸引客户,商业银行推出可转让大额定期存单。购买存
Theword“day”hastwomeanings.Whenwetalkaboutthenumberofdaysinayear,weareusing“day”tomean24hours.Butwhenwetalk
海上货物运输保险的附加险别包括()。
奥苏贝尔依据学习进行的方式把学习分为()。
请对“由于意志以外的原因导致犯罪没有完成的为犯罪未遂”进行辨析。
0.96875
Despiteyourbestintentionsandefforts,itis【C1】______:Atsomepointinyourlife,youwillbewrong.【C2】_______canbehar
最新回复
(
0
)