首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Command1_Click() Dim str As String, ch As String str = "Visual Basic Programming" ch = "a"
设有下面程序代码: Private Sub Command1_Click() Dim str As String, ch As String str = "Visual Basic Programming" ch = "a"
admin
2015-08-28
23
问题
设有下面程序代码:
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
Private Function fun(ch As String, str As String) As Integer
Dim strbuf As 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
解析
Mid$(A$,4,2)是为了与老版本的VB兼容($的作用是强制将函数的返回值设为字符型)。&用来连接字符串。If条件判断字符是否和输入的字符相等,相等则n加1。选B)。
转载请注明原文地址:https://kaotiyun.com/show/WzLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行以下语句后显示结果为______。DimxAsIntegerIfxThenPrintxElsePrintx-1
以下控件可以用来实现定时地执行某段代码的是______。
下列VisualBasic语句中,正确的语句是______。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填上合适的代码,将程序补充完整。PrivateTypeAngKAsIntegerSinxAsSin
下列叙述中正确的是()。
为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是______。
模块的功能性注释的主要内容不应包括______。
决定控件上文字的字体、字形、大小、效果的属性是______。
有下列二叉树,对此二叉树中序遍历的结果为()。
在深度为5的满二叉树中,叶子结点的个数为______。
随机试题
按谈判的内容来划分,商务谈判中数量最多的一种谈判是()
耕牛,4头,一直很健康,10月底上午,放牧于收割20多天后的再生幼苗和青草茂盛的玉米茬地,牛食欲旺盛,下午想将牛赶回去时,发现4头均发病,流涎、呼吸困难、抬头伸颈、肚腹鼓胀、张口喘气,且站立不稳,表现不安,身体局部出汗,体温基本正常,求诊。兽医到现场前已有
患儿,5岁半。右下后牙肿疼两日。检查右下第二乳牙磨牙冠大部分破坏,龋洞较深,叩(+)松动2度,颊侧牙龈处有0.5mm×0.5mm脓肿。X片示根吸收1/3,根分歧有低密度影如果治疗后右下第二乳磨牙仍然松动,症状不缓解,应做何种处理
维生素A缺乏时引起()
下列优于《海商法》所称的船舶优先权的是:()
关于施工现场大气污染的处理方法,说法正确的是()。
心理测验按测验的内容可分为两大类,一类是能力测验,另一类是()。
在幼小的儿童身上常常见到破涕为笑,脸上挂着泪水又笑起来的情况,这主要是因为()。
垄断资本向世界范围扩展的基本形式有三种:第一种是借贷资本输出,即由资本主义国家的政府、银行、企业把资本贷给其他国家的政府、银行或企业;第二种是生产资本输出,即在国外直接投资,独立创办企业,与外国资本合营,或者收购外国已有的企业等。第三种是商品资本的输出。从
手紙を書く()も、メールを送るのが一般的です。
最新回复
(
0
)