首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: PlIivate Sub Command l_Click() Dim str As String,ch As String str=”Visual Basic Programming”
设有下面程序代码: PlIivate Sub Command l_Click() Dim str As String,ch As String str=”Visual Basic Programming”
admin
2020-01-02
44
问题
设有下面程序代码:
PlIivate Sub Command l_Click()
Dim str As String,ch As String
str=”Visual Basic Programming”:ch=”a”
n=fun(ch,str):Print str,n
End Sub
Private Function fun(ch As String,str As String)As Integer
Dim strbufAs String,c As String,n As Integer
For k=1 To Len(str)
c=Mid$(str,k,1)
If c<>ch Then
strbuf=strbuf&c
Else
strbuf=strbuf&UCase(c):n=n+1
End If
Next k
str=strbuf:fun=n
End Function
程序运行时的输出是
选项
A、Visual Basic Programming 0
B、VisuAl BAsic ProgrAmming 3
C、Visul Bsic Progrmming 3
D、VisualBasicProgramming 2
答案
B
解析
本题中函数fun除了有返回值外,还通过地址传递的形参str带回修改以后的字符串。在函数中会依次遍历整个字符串,每一次取得一个字符,判断该字符和给定的参数“a”是否相等,如果不等则将其原样连接,否则将此字符转换成大写字符以后连接,而且令计数器加1。所以整个函数的功能就是将形参str中所有等于形参ch的字符转换成大写,并且统计这类字符的个数作为函数返回值。
转载请注明原文地址:https://kaotiyun.com/show/4mTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=0To5
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:PrivateSubCommandlClick()DimxAsString,sAsString,tempAsSt
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4):j=1For
现有如下一段程序:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(3,5,7,9):x=1Fori=4To1Step-1s=s+a
设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_load0ShowText1.Text=“”:Text1.SetFocusEndSubPrivateSub
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommandl_Click()DimaAsVarianta=Array(1,2,3,4,5)Sum=0Fori
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()aS=InputBox(”请输入一个二进制数”):n=Len(a$)Fori=1TonDec=Dec*2+_
随机试题
对葡萄糖重吸收描述错误的是
A.激光B.阿昔洛韦C.阿奇霉素D.青霉素E.头孢三嗪梅毒治疗首选
患者,男,50岁。因失眠多梦半月余就诊。现不寐,入睡困难,心烦口苦,头重如裹,胸闷,舌红苔黄腻,脉滑数。其治法是
某地某年8月发生了一起由食用蛋、奶糖制作雪糕而引起的食物中毒,症状为腹痛,腹泻,大便如水样黄绿色便,少数患者有脓血便,部分患者体温为38~39℃,多数人潜伏期为12~24小时,你认为最可能是哪种食物中毒
某公司2008年度存货平均占用80万元,2009年度平均占用100万元。如果存货周转天数从2008年的60天降到2009年的50天,则该公司的销货成本2009年比2008年增长()。
公司进行债务重构的原因可能包括()。
股票股利与股票分割的共同之处在于()。
I’mtoldthatduringaninternationalgameofchess(国际象棋),manybeautifulmovescouldbemadeonachessboard.Inadecisive【C1】
A、Doingsomethingworthwhileandrewarding.B、Scaringthepeoplewalkinginthestreet.C、Attractingpeople’sattention.D、Criti
"Laugh,andtheworldlaughswithyou:weep,andweepalone."SowrotethepoetEllaWheelerCox.Emotionsarecatching,andmos
最新回复
(
0
)