首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Command1_Click() Dim str As String,ch As String str="Visual Basic Programming":ch="a" n=fu
设有下面程序代码: Private Sub Command1_Click() Dim str As String,ch As String str="Visual Basic Programming":ch="a" n=fu
admin
2020-04-18
24
问题
设有下面程序代码:
Private Sub Command1_Click()
Dim str As String,ch As String
str="Visual Basic Programming":ch="a"
n=fun(ch,str):Print str,n
End Sub
Privme Function fun(ch As String,sir As String)As Integer
Dim strbufAs String,c As String,n As Integer
For k=1 To Len(str)
c=Mid$(str,k,1)
Ifc<>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://jikaoti.com/ti/h1x0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于列表框Selected属性的叙述中正确的是
在窗体上画一个名称为Text1的文本框,然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""EndSubPrivateSubText1_KeyDown(KeyCodeAsInteger
程序运行时,拖动滚动条上的滚动框,则所触发的事件是
以下叙述中错误的是
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
下列说法中,错误的是( )。
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是()。
假设用复制、粘贴的方法建立了一个命令按钮数组Commandl,以下对该数组的说法错误的是()。
下面不属于软件工程的3个要素是
随机试题
豫菜代表性品种包括()。
甲将自己的房屋租给乙居住,约定租期为30年。则下列说法正确的是:()。
防止污染及其他公害设施的建设,必须与主体工程建设项目实行“三同时”,“三同时”是指:[2001年第25题][2007年第15题]
对个人经营贷款借款人的生产经营收入,应重点调查的内容不包括()。
下列关于黄金理财产品的特点,说法不正确的是()。
IPv6协议数据单元由一个固定头部和若干个扩展头部以及上层协议提供的负载组成,其中用于标识松散源路由功能的扩展头是()。
“子适卫,冉有仆。子日:‘庶矣哉’。冉有曰:‘既庶矣,又何加焉?’曰:‘富之。曰:‘既富矣,又何加焉?’曰:‘教之。’”这段话最主要反映的是
WhyistheNativeLanguageLearntSoWellHowdoesithappenthatchildrenlearntheirmothertonguesowell?Whenwecompare
Minipresentation’about—6minutesInthispartofthetextyouareaskedtogiveashorttalkonabusinesstopic,Youhaveto
A、Adjustinghisbiologicalclock.B、Knowingthedirectionofajet.C、Realizingthetimedifference-duringflight.D、Gettingus
最新回复
(
0
)