首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Command l Click() Dim strAs String,chAs String str=“Visual Basic Programming”.0 ch=“a” n=fun(ch,str):Pr
设有下面程序代码: Private Sub Command l Click() Dim strAs String,chAs String str=“Visual Basic Programming”.0 ch=“a” n=fun(ch,str):Pr
admin
2018-10-18
79
问题
设有下面程序代码:
Private Sub Command l Click()
Dim strAs String,chAs String
str=“Visual Basic Programming”.0 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
选项
A、Visual Basic Programming 0
B、VisuAl BAsic ProgrAmming 3
C、Visul Bsic Progrmming 3
D、VisualBasicProgramming2
答案
B
解析
本题中函数fun除了有返回值外,还通过地址传递的形参str带回修改以后的字符串。在函数中会依次遍历整个字符串,每一次取得一个字符,判断该字符和给定的参数“a”是否相等,如果不等则将其原样连接,否则将此字符转换成大写字符以后连接,而且令计数器加1。所以整个函数的功能就是将形参str中所有等于形参ch的字符转换成大写,并且统计这类字符的个数作为函数返回值。
转载请注明原文地址:https://kaotiyun.com/show/XCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体的名称为Form1,标题为Win,则窗体的MouseDown事件过程的过程名是( )。
假定有以下循环结构:DoUntil条件表达式 循环体Loop则以下正确的描述是( )。
下列关于栈的叙述正确的是( )。
下面程序运行时,若输入"VisualBasicProgramming",则在窗体上输出的是( )。PrivateSubCommand1_Click() Dimcount(25)AsInteger,chAsString ch=U
设有窗体的Form_MouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) If(Button
以下控件中,能显示滚动条的是
在窗体上添加"控件"的正确的操作方式是( )。
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
能正确表述"x为大于等于5并且小于20的数"的VisualBasic表达式是
以下能对正实数d的第3位小数四舍五入的表达式是
随机试题
全球性组织结构的基本组织形式为()
下列哪项是嗜铬细胞瘤最具特征性的临床表现
女性,66岁,因肺炎住院,既往有慢性肺源性心脏病病史,输液过程中突然出现呼吸困难、气促、咳嗽、咳出粉红色泡沫样痰。下列急救措施正确的是
锐器盒盛装以满()为宜。
FIDIC系列合同条件中,()主要用于发包人设计的或咨询工程师设计的房屋建筑工程和土木工程。
江苏现存下列遗迹中,与辛亥革命有关的有()。
执行完下列语句段后,i值为()。intf(f(1));{return((x>0)?x*f(x-1):2);}intI;I=f(f(1));
任何一种教育体制下,都存在着学生资质差异的问题。理想的教育体制,应该面向不同资质的学生,都提供相应的机会。但是,面对高考升学,面对社会对人才的遴选机制,我们常常是无奈地叹息。因此,天才对教育惟一可说的话,是古希腊哲学家第欧根尼的那句名言:“不要挡住我的阳光
外国侵略者通过不平等条约取得的特权中,按时间先后顺序排列应是()。①外国商船和军舰可以在长江各口岸自由航行②外国人可以在通商口岸开设工厂③可在通商口岸建立教堂④领事裁判权和片面最惠国待遇
Britain’seastmidlandswereoncethepictureofEnglishcountryside,aliveWithflocks,shepherds,skylarksandbuttercups--the
最新回复
(
0
)