首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有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
42
问题
设窗体上有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全国计算机二级
相关试题推荐
如果要向工具箱中加入控件和部件,可以利用“工程”菜单中的______命令。
算法的复杂度主要包括【】复杂度和空间复杂度。
在VisualBasic中,要使标签的标题栏居中显示,则将其Alignment属性设置为
若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:PrivateSubForm_Load()Text1.Text="计算机"EndSubPrivateSubText1_Change()
设有如下程序:PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0n=0Fori=1To5x=n/in
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DOUnti
设组合框Combol中有3个项目,则以下能删除最后一项的语句是
栈和队列的共同特点是
表达式(7\2+1)*(8\2+2)的值为
随机试题
"糖尿病",口渴喜冷饮,多食易饥,急躁易怒,心烦怕热溲赤便秘。舌质红,脉细数。宜用方
指出下列不属化痰止咳平喘药的适应范围
工程量清单中开列的工程量是()。
根据《注册消防工程师制度暂行规定》,下列行为中,不属于注册消防工程师义务的是()。
2016年,多年成功经营的啤酒生产企业宝泉公司投资新建了一家果蔬饮料生产企业,但因管理不善出现持续亏损。最近宝泉公司组织果蔬饮料生产企业的管理人员到本公司的啤酒生产企业调研、学习,收效良好。宝泉公司所实施的基准分析的类型属于()。
下列因素可能导致注册会计师修改审计业务约定条款或提醒被审计单位注意现有的业务约定条款的有()。
新学年开学伊始,有些新生刚入学就当上了校学生干部。在奖学金评定中,所有河南籍的学生都申请了本年度一等奖学金。所有校学生会干部都没有申请本年度的一等奖学金。如上断定为真,哪项也为真?
A、做错了事B、经常忘事C、说错了话A
LifeExpectancyintheLastHundredYearsAhundredyearsago,lifeexpectancyindevelopedcountrieswasabout47;inthee
Inmyfamily,weweretaughtandshownbyexamplesthatpoliticscanbeanobleprofession,thateachofusshould【B1】______the
最新回复
(
0
)