首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有Text1文本框和Commandl命令按钮,并有以下程序: Private Sub Commandl Click() tempS:“” Fork=1 ToLen(Text1) ch$=
设窗体上有Text1文本框和Commandl命令按钮,并有以下程序: Private Sub Commandl Click() tempS:“” Fork=1 ToLen(Text1) ch$=
admin
2012-05-23
39
问题
设窗体上有Text1文本框和Commandl命令按钮,并有以下程序:
Private Sub Commandl Click() tempS:“”
Fork=1 ToLen(Text1)
ch$=Mid(Text1,k,1)
If Not found(temp,ch)Then
temp=temp&【 】
End If
Next k
Text1=【 】
EndSub
Private Function found(str As String,ch As String)As Boolean
Fork=1 ToLen(str)
If ch=Mid(str,k,1)Then
found=【 】
Exit Function
End If
Next k
found=False
End Function
运行时,在文本框中输入若干英文字母,然后单击命令按钮,则可以删去文本框中所有重复的字母。例如,若文本框中原有字符串为“abcddbbc”,则单击命令按钮后文本框中字符串为“abcd”。其中函数found的功能是判断字符串str中是否有字符ch,若有,函数返回True,否则返回False。请填空。
选项
答案
ch temp True
解析
在本题的单击事件中,首先利用循环取出文本框中的每一位字符,然后依次进行比较看该字符是否在结果串temp中出现,若未出现则证明该字符尚未重复,所以将该字符ch连接到结果串temp中,当循环结束后temp中的字符必然是没有重复值的,所以要将temp的值放到Text1中进行输出;在foulld函数中判断在给定字符串str中是否存在子串cb,方法是依次取出str中每一个字符与ch进行比较,若发现相等则证明存在ch子串,此时应该返回True证明找到字串随之退出函数;若循环结束后依然没有退出循环则证明没有找到,返回False。
转载请注明原文地址:https://kaotiyun.com/show/BPhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列各选项说法错误的一项是
下述关于数据库系统的叙述中正确的是
数据库管理系统DBMS中用来定义模式、内模式和外模式的语言为
栈和队列的共同特点是
线性表的顺序存储结构和线性表的链式存储结构分别是_________。
实体—联系模型是一种常用的高级概念数据模型,而【】是实体—模型中的核心。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
数据库系统阶段的数据具有较高独立性,数据独立性包括物理独立性和【】两个含义。
在程序设计阶段应该采取【】和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,进而用某种程序设计语言写成程序。
设A="12345678",则表达式Val(Left(A,4)+Mid(A,4,2))的值为_________。
随机试题
学生申诉制度建立的法律依据是()
领导者把握领导规律、履行领导职能的最高境界是
在食品加工人员中,常洗手是防止食品污染的有效措施,必须洗手的环节有
A.放置宫内节育器大小应参考宫腔大小B.宫内节育器要一次放至宫底部C.为便于术后随访,尾丝应留2cmD.探针超过宫腔深度时应停止操作E.子宫腔过大伴轻度子宫脱垂者
下列各项,不属胎膜早破常见病因的是
在服务项目的管理过程中,经常会忽略项目的需求调研和(),而这两个阶段对于服务项目管理来说恰恰是至关重要的。
管理会计是会计的重要分支,主要服务于单位。
根据《支付结算办法》的规定,办理托收承付的收付双方必须()。
Theideathatsomegroupsofpeoplemaybemoreintelligentthanothersisoneofthosehypothesesthatdarenotspeakitsnam
Youaregoingtoreadatextoftipsoninterview,followedbyalistofexplanations(orexamples).Choosethebestexplanation
最新回复
(
0
)