首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有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
27
问题
设窗体上有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://jikaoti.com/ti/XBO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic对象可以分为两类,分别为【】和【】。
根据变量的作用域,可以将变量分为3类,分别为
窗体文件的扩展名是
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:PrivateSubForm_Load()Text1.Text="计算机"EndSubPrivateSubText1_Change()
如果要改变窗体的标题,则需要设置的属性是
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:FunctionFunc(ByValxAsInteger,yAsInteger)y=x*yIfy>0ThenFunc=x
在用菜单编辑器设计菜单时,必须输入的项是_______。
在程序设计阶段应该采取【】和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,进而用某种程序设计语言写成程序。
为了清除列表框中的所有内容,应使用的方法是:_______。
设a=5,b=4,c=3,d=2下列表达式的值是3>2*bOra=cAndb<>COrc>d
随机试题
不符合血栓机化与再通描述的是
若线性方程组有解,则λ=_________.
患者,女性,28岁,凹面型,面下1/3正常,前牙反颌,磨牙中性关系,上颌尖牙唇向高位,拥挤9mm,上、下前牙唇倾度正常,下牙列无拥挤。侧位片测量显示上颌骨发育不足,∠ANB=-2°,4个第三磨牙牙胚存在。治疗中解除上前牙拥挤不考虑
下列不符合炎症渗出物的描述是
恒牙中发育最早的是
依据《涉外民事关系法律适用法》和司法解释,下列属于经常居所地的是?
城市燃气、热力管道施工中选用的法兰必须符合设计要求,当设计无要求时,应按照系统的()等因素综合选用适当形式及规格的法兰。
下列股票交易行为中,属于国家有关证券法律、法规禁止的有()。
处罚是治安管理的必要手段,处罚的目的是()。
根据所给图表、文字资料回答81-85题。2008年,全国民政事业基本建设完成投资总额为66.6亿元,施工项目为3906个,完成投资总额比上年增长39.6%。其中国家投资26.6亿元,比上年增长83.4%。在投资总额中,用于优抚安置事业单位投资为9.6亿元
最新回复
(
0
)