首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
函数fun如下: Private Function fun(ch As String)As Integer Dim n%,st$.c$ For k=1 To Len(ch) C=Mid(ch,k,1) If C<>"
函数fun如下: Private Function fun(ch As String)As Integer Dim n%,st$.c$ For k=1 To Len(ch) C=Mid(ch,k,1) If C<>"
admin
2020-07-22
42
问题
函数fun如下:
Private Function fun(ch As String)As Integer
Dim n%,st$.c$
For k=1 To Len(ch)
C=Mid(ch,k,1)
If C<>"A"Then
st=st&c
Else
n=n+1
End If
Next k
ch=st
fun=n
End Function
函数的功能是( )。
选项
A、从字符串ch中删除所有字符“A”,返回值为删除的个数
B、从字符串ch中删除所有字符“A”,返回值为删除后的字符串
C、统计字符串ch中字符“A”的个数并返回
D、把字符串ch中不等于“A”的字符都改成“A”,返回值为修改的个数
答案
A
解析
fun函数中字符串变量ch作为形参,函数的返回值类型为整型,For循环中循环变量k的初始值为1终止值为字符串的长度,每当循环执行一次时,将字符串ch中的一个字符取出赋值给字符变量c,然后使用if语句判断取出的字符是否等于字符“A”,若取出的字符不是“A”,则将该字符放入字符串st中,若取出的字符是“A”,则将变量n的值加l;由程序可知for循环的功能是:将字符串ch中非“A”字符存放到字符串变量st中,并对字符串ch中“A”字符的个数进行计数,故本题A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/PjHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt4.vbp,其功能如下:①单击“读数据”命令按钮,把考生文件夹下in4.dat文件中已按升序排列的60个数读入数组A,并在Text1中显示:②单击“输入”按钮,弹出一个输入对话框,接收用户输入的任意一个
设有如下程序:PrivateSubForm_Click() num=InputBox("请输入一个实数") p=InStr(num,".") Ifp>0Then PrintMid(num,p+1) Else
数据库设计过程不包括
在窗体上没有进行任何属性设置,然后编写如下事件过程,则程序运行结果是()。PriVateSubFormLoad()Fori=1To10sum=sum+iNextiPrint"Sum=":sumEndSu
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
下面程序运行时,若输入395,则输出结果是( )。PrivateSubCommand1_Click() Dimx% x=InputBox("请输入一个3位整数") PrintxMod10,x\100,(xMod100)\
下列关于窗体的描述中,错误的是()。
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
以下能正确定义数据类型Systemlnfo的代码是()。
以下关于VB对象属性的叙述中,错误的是
随机试题
请你自拟信息,写一份迁址启事。要求:(1)格式正确;(2)信息量充分;(3)语言规范,表达准确;(4)字数在100左右。
女性,58岁,均匀性肥胖,高血压病史6年,平时治疗情况不详。近1个月常出现头胀,头痛,心悸,1周前出现心前区闷痛,体力活动不受影响。检查血压170/110mmHg,心界向左下扩大,心率50次/分,心底部S2亢进,哪一项检查暂时不宜进行
大量饮清水后约半小时尿量开始增多,这一调节属于
某女,50岁。患白庀l5年,症见皮疹为点滴物,基底鲜红色,表面覆有银白色鳞屑。证属血热风燥,皮肤科医师建议服用消银颗粒,此因该成药除祛风止痒外,又能()。
根据《招标投标法》的规定,下列包括在招标公告中的是()。[2009年真题]
对于设计方案比较特殊,无同类工程可比,且审查精度要求高的施工图预算,适宜采用的审查方法是()。
税务师事务所的合伙人可以由()担任。
根据社会保险法律制度的规定,关于职工患病应享受医疗期及医疗期内待遇的下列表述中,正确的有()。
它是兴国之要,党和国家兴旺发达、长治久安的根本要求。党在新时期实现的最根本的拨乱反正是()
Thestoryismainlyaboutabigbearwhichwantedtoattackthefamilybutonlymanagedtofrightenthecattleonthefarm.It
最新回复
(
0
)