首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
46
问题
有下面程序代码:
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全国计算机二级
相关试题推荐
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
判断复选框是否被选中的属性为
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是( )。
有以下通用过程:Functionfun(NAsInteger) s=0 Fork=1ToN s=s+k*(k+1) Nextk fun=sEndFunction该过程的功能是( )。
设程序中分别将a、b、c、d定义为布尔型、整型、字符串型、日期型变量,下列赋值语句错误的是
数据库设计过程不包括
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
以下表达式与Int(3.5)的值相同的是
表达式Sgn(0.25)的值是( )。
随机试题
下列属于凶礼的有()
体层摄影中,被照体的欲选成像平面称
甲在信用社未贷到款而疑心本单位的乙搞鬼,遂即把乙殴打致伤。W省A市B县公安局对甲处以拘留10日的处罚,并决定由甲赔偿乙的实际损失。甲不服,向上一级主管机关申请复议,上一级主管机关认为此案认定事实清楚,证据确凿,适用依据正确,程序合法,内容适当的,决定维持。
下列各项中属于企业广义投资活动的有()。
以下关于个人所得税有关规定的表述中,说法正确的有()。
下列选项中,不属于四大发明的是()。
这半年来.某社区银燕幼儿园中二班的周老师经常发现班上的小朋友施巧巧身上有淤青,三天前.周老师在幼儿园门口还亲眼看见施巧巧的母亲张女士在动手打施巧巧。于是,周老师来到社区服务中心.要求社区的社会工作者介人。社区工作者接受此案后,通过和周老师会谈、了解了事情的
在OSI七层协议模型中,TCP是(183)的协议。使用(184)次握手协议建立连接,当主动方发出SYN连接请求后,等待对方回答(185)。这种建立连接的方法可以防止(186)。TCP使用(187)进行流量控制。
某工作站无法访问域名为www.test.com的服务器,此时使用ping命令按照该服务器的IP地址进行测试,响应正常。但是按照服务器域名进行测试,出现超时错误。此时可能出现的问题是(17)。
It’smyhonortobeheretonight.OurorganizationiscalledtheNoiseAbatementSocietythat【B1】______andtriestodealwi
最新回复
(
0
)