首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() Dim a As String a="COMPUTER"n=search(a,"T"):Print IIf(n=0,"未找到",n) End Sub Private Functio
有下面程序代码: Private Sub Command1_Click() Dim a As String a="COMPUTER"n=search(a,"T"):Print IIf(n=0,"未找到",n) End Sub Private Functio
admin
2019-06-11
29
问题
有下面程序代码:
Private Sub Command1_Click()
Dim a As String
a="COMPUTER"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 Len(str)
c=Mid(str,k,1)
If c=ch Then
search=k:Exit Function
End If
Next k
search=0
End Function
程序运行后,单击命令按钮Command1,输出结果是
选项
A、0
B、8
C、6
D、未找到
答案
C
解析
本题中search函数的参数是两个字符串,在函数内进行循环,依次取出第一个参数的第k位和第二个参数进行比较,如果相等则返回k的值,实际上就是查找第二个参数在第一个参数中出现的位置。
转载请注明原文地址:https://kaotiyun.com/show/RDUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列有关文件的叙述中,正确的是()。
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsIntegerbAsIntegerEndTypePrivateS
在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是()。
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输出小于50
下面描述中,不属于软件危机表现的是()。
负责数据库中查询操作的数据库语言是()。
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load()
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a—b
当前文件夹中设有一个文本文件Filel.txt,并有下面程序代码:PrivateSubCommand1_Click()DimchAsStringOpen"Filel.txt"ForInputAs#1D
学生选课成绩表的关系模式是SC(S#,C#,G)。其中S#为学号,C#为课号,G为成绩,则检索课号为2的成绩不及格的学生的学号的表达式是()。
随机试题
维持心脏、神经及消化系统正常功能所必需的维生素是
2014年11月,甲股份有限公司(以下简称“甲公司”)拟向中国证监会提交在深圳证券交易所主板首次公开发行股票并上市(以下简称“IPO”)的申请。为解决公司应收账款余额过大的问题,顺利实现上市目标,甲公司董事长赵某决定通过外部借款、伪造银行单据等方式冲减应收
内存储器可大致分为()和()两类。
成分输血有什么优点?
预防苯中毒的根本性措施是______。
应急预案的演练是检验、评价和保持应急能力的一个重要手段。对应急预案的完整性和周密性进行评估,可采用各种应急演练方法。下列有关演练的说法,正确的有()
某公司2005年年初的未分配利润为100万元,当年的税后利润为400万元,2006年年初公司讨论决定股利分配的数额。公司目前的目标资本结构为权益资本占60%,债务资本占40%,2006年不打算继续保持目前的资本结构,也不准备追加投资资本。按有关法规规定该公
唐三彩是中国古代著名的艺术珍品,下列关于唐三彩说法,正确的是()
某乡村违章搭建问题严重,有同事在下乡调查处理此事时与违章搭建者发生冲突,你怎么解决?
请将文字转换成表格。
最新回复
(
0
)