首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() Dim a As String a="CONPUTER" n=search(a,"T") Print IIf(n=0,"未找到",n) End Sub Private Functi
有下面程序代码: Private Sub Command1_Click() Dim a As String a="CONPUTER" n=search(a,"T") Print IIf(n=0,"未找到",n) End Sub Private Functi
admin
2019-03-08
48
问题
有下面程序代码:
Private Sub Command1_Click()
Dim a As String
a="CONPUTER"
n=search(a,"T")
Print IIf(n=0,"未找到",n)
End Sub
Private Function search(str As String,ch As String)
As Integer
For k=1 To ten(str)
c=Mid(str,k,1)
If c=ch Then
search=k
Exit Funotion
End If
Next k
search=0
End Function
程序运行后,单击命令按钮Command1,输出结果是
选项
A、0
B、8
C、6
D、未找到
答案
C
解析
Mid函数从字符串中获取指定位置的字符值。Search函数中找到相同的字符时退出循环,并返回该字符在字符串中的位置。Command1_Click事件中打印查找的结果。选C。
转载请注明原文地址:https://kaotiyun.com/show/ZaFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为List1的列表框控件,其List属性值为一组花卉的名称。一个名称为Picture1的图片框。窗体外观如图所示。程序代码如下:PrivateSubList1_Click()Fori=0ToList1.Listcou
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
要使标签中的文本靠右显示,应将其Aligment属性设置为
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text1.SetFocusEndSubPrivateSubForm_Click()
以下关于控件的叙述中,正确的是
以下关于变量作用域的叙述中,错误的是
下面属于系统软件的是
下列叙述中错误的是
已知图片框Picture1中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是( )。
软件调试的目的是()。
随机试题
A.苦笑面客B.伤寒面容C.甲亢面容D.二尖瓣面容E.慢性病面容两颧紫红,口唇发绀,多见于
蔡某在新冠疫情期间,将劣质口罩冒充N95口罩高价销往全国多地,获利近30万元。H市(地级市)Y区检察院以蔡某涉嫌销售伪劣产品罪向Y区法院提起刑事公诉后,拟提起附带民事公益诉讼。关于本案,下列说法正确的是()。
商业银行投放现金的主要渠道不包括()。
采用视准线监测的围堰变形点,其偏离视准线的距离不应大于()mm.
某多层砖混结构基础平面及断面图如图6-2所示,砖基为一步大放脚,钢筋混凝土带型基础外墙基底宽1200mm,内墙基底宽为1000mm。求:(1)砖基础工程量;(2)钢筋混凝土带型基础及垫层工程量。
2010年的“三八”妇女节,某一学习小组为了解本地区大约有多少中学生知道自己母亲的生日,随机调查了100个中学生,结果其中只有30个学生知道自己母亲的生日,对于这个关于数据收集与处理的问题,下列说法正确的是()。
教师帮助幼儿建立友好的同伴关系,可减轻幼儿的(),减缓和消除幼儿的紧张。
Babiescanlearnlanguageevenintheirsleep.ThethreevowelsmentionedinthisarticleareallFinnishsounds.
AstheTitanicwassinkingandwomenandchildrenclimbedintolifeboats,themusiciansfromtheship’sbandstoodandplayed.T
生命没有寄托的人,青年时代和“儿时”对他格外宝贵。这种浪漫蒂克的回忆其实并不是发现了“儿时”的真正了不得,而是感觉到中年以后的衰退。本来,生命只有一次,对于谁都是宝贵的。但是,假使他的生命溶化在大众的里面,假使他天天在为这世界干些什么,那末,他总在生长,虽
最新回复
(
0
)