首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: 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
50
问题
设有下面程序代码:
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全国计算机二级
相关试题推荐
软件是程序、数据和______的集合。
执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的内容是______。atrInput=InputBox("请输入字符串","字符串对话框","字符串")
在软件结构化设计中,好的软件结构设计应该力求做到______。
在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。PrivateSubTimer1_TextTime.Text=TimeEnd
已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的VisualBasic表达式为()。
设x为整型变量,以下不能正确表达数学关系式2<x<5的VisualBasic表达式为_______。
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句是______。
下列()标识符不能作为VisualBasic的变量名。
在深度为5的满二叉树中,叶子结点的个数为______。
随机试题
若HDLC帧数据段中出现下列比特串:“010000011111110101111110”,请问比特填充后的输出是什么?并解释原因。
患者男性,22岁。因低热半个月,呼吸困难1天入院。查体:端坐位,颈静脉怒张,心率130次/分,心音低钝。X线检查:肺野清晰,心影弧度消失。诊断最可能是
以下检查除外哪项对功血病人的诊断均有帮助
下列关于意志说法错误的是
患儿女,7岁。低热、轻咳3周。查体:体温38.5℃,营养差,左背下部听诊呼吸音减低,接种过卡介苗,PPD试验(+++)。患儿最可能发生
甲欲为其多年好友乙以及乙10岁的儿子小乙订立以死亡为给付保险金条件的合同,依据相关法律规定回答下列问题:若乙同意甲为其订立以死亡为给付保险金条件的合同,下列相关说法正确的是:()
注册会计师在对被审计单位财务报表审计中,关于资产类账户余额实施相关审计抽样从而获取充分、适当的审计证据。下列说法中,正确的是()。
党的十一届三中全会后,邓小平提出的重要思想有()。
因对微博的无知,某局长和某主任在微博上泄露个人隐私,暴露其不道德行为,受到有关部门的查处。有网友对他们的行为冷嘲热讽,感慨道:知识改变命运,没有知识也改变命运。以下哪项陈述最接近该网友所表达的意思?
两台交换机分别有16个和8个100/1000Mbit/s全双工下联端口,它们的上联端口带宽至少为()。
最新回复
(
0
)