首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下函数: 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 El
设有如下函数: 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 El
admin
2019-03-08
25
问题
设有如下函数:
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=n
End Function
该函数的功能是
选项
A、统计并返回字符串ch中字符的个数
B、删除字符串ch中的空格符,返回删除字符的个数
C、统计并返回字符串ch中非空格字符数
D、删除字符串ch中除空格符外的其他字符,返回删除字符的个数
答案
B
解析
在函数中进行字符串的正向遍历,每次取出字符串中的一个字符,判断该字符如果不是空格就将其连接到st上,否则令n+1。循环结束后将会删除字符串ch中的空格符,返并使用函数值返回删除字符的个数。
转载请注明原文地址:https://kaotiyun.com/show/EiFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序段:x=5Fori=1To20Step2x=x+i\5Nexti执行上面的程序段后,x的值为
在窗体上画2个名称分别为Text1和Text2的文本框,然后编写如下事件过程:PrivateSubForm_Load()ShowText1.Text="ChinaBeijing"Text1.SetFocusEnd
若在窗体上画了一个名称为List1的列表框,并编写了如下事件过程:PrivateSubForm_Load()List1.AddItem"数学"List1.AddItem"物理"List1.AddItem"
假定编写了如下通用过程:SubSp(x,y)y=1Fori=1Toxy=y*iNextiEndSub在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
有下面程序代码:PrivateSubCommand1_Click()Dima,sAsIntegera=7:b=4Doc=aDoc=c
如果窗体模块A中有一个过程:PrivateSubProc()……EndSub则下面叙述中错误的是
假定在标准模块中的声明部分有如下语句:PublicVarAAsInteger而在窗体模块的声明部分有如下语句:PublicVarBAsInteger则以下叙述中正确的是
随机试题
阅读下面的词,回答问题。
设,则y’=_______.
Anewcameasasurprisethatanelderlywomandiedyesterdayafter【21】knockeddownbyamotoristwhohadmadeno【22】tobrake(刹
低渗性缺水按临床表现轻重分为三度。()
现场行政处罚决定书应当载明
下列对于乳腺癌无效的是
治疗弥散性血管内凝血时,监测肝素用量的试验是
在伤害致死案件中有权提起附带民事诉讼的有________。
Theoceanisheatingup.That’stheconclusionofanewstudythatfindsthatEarth’soceansnow【K1】a______heatattwicethera
设随机变量X1,X2,…,Xm+n(m<n)独立同分布,其方差为σ2,令求:(Ⅰ)D(Y),D(Z);(Ⅱ)ρYZ。
最新回复
(
0
)