首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Label1、标题为“回文的个数为”的标签和一个名称为Text1,初始值为空的文本框,如图3.87所示。程序功能如下: ①单击“读
(1)在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Label1、标题为“回文的个数为”的标签和一个名称为Text1,初始值为空的文本框,如图3.87所示。程序功能如下: ①单击“读
admin
2017-09-22
22
问题
(1)在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Label1、标题为“回文的个数为”的标签和一个名称为Text1,初始值为空的文本框,如图3.87所示。程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容读到变量s中。
②单击“统计"按钮,则统计in5.dat文件(该文件中仅含由空格间隔开的字母串)中回文的个数,并将统计的回文个数显示在Text1文本框内。(所谓回文是指顺读与倒读都一样的字符串,如“recycer”)。“读数据”按钮和“统计”按钮的Click事件过程已经给出,请完善Function过程foundhuiwen的功能,实现上述程序功能。
注意:考生不得修改窗体文件中已存在的控件和程序,在结束程序运行之前,必须先进行统计,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开考生文件夹下的工程文件sjt5.vbp,如表4.55所示在窗体上画出控件并设置它们的相关属性。 [*] 步骤2:打开代码编辑窗口,在指定位置编写foundhuiwen函数的过程。参考代码: Function foundhuiwen(p As String) foundhuiwen=True k=Len(p) For i=1 To k/2 If Mid(p,i,1)<>Mid(p,k+1-i,1)Then foundhuiwen=False Exit For End If Next End Function 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“统计”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
本题中自定义函数fotmdhuiwen的功能是判断字符串参数p是否为回文,若是则返回函数值True,否则返回函数值False。根据回文的定义程序设计思路:在For循环中按从两端到中间的顺序,分别用Mid函数依次从字符串参数p中同时取出两个字符,并比较这两个字符是否相同,若不相同则返回函数值False,并用Exit Function语句退出自定义函数;否则继续往下比较直至循环结束。循环正常结束时,返回函数值True。
转载请注明原文地址:https://kaotiyun.com/show/4kGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使标签能自动调整大小以显示全部文本内容,应把标签的【】属性设置为True。
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
以下程序用随机函数模拟掷骰子,统计掷50次骰子出现各点的次数。阅读该程序,并在【】和【】处填上正确的内容。PrivateSubCommand1_Click()Dimd(6)fori=1To50n=【】d(n)=【
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。下列可以实现上述要求的事件过程是()。
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
为命令按钮的Picture属性装入了一个图片,但却发现图片没有显示出来,要使图片显示出来,应设置它的【】属性。
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
随机试题
无急症的Ⅱ期胃癌患者应选择()
动眼神经损害体征有
难产时常用穴位
A.血浆胰岛素水平测定B.血糖测定C.糖化血红蛋白A1测定D.糖化血浆白蛋白测定可用于评价胰岛B细胞功能的检查是
以下属于人参和三七相同的质量控制成分的是()。
经济分析中采用的社会折现率测定方为()。
根据资料,回答以下问题。2011年,贵州省全年种植业增加值为432.86亿元,比上年增长0.2%。主要农作物种植面积稳步扩大,粮食作物种植面积305.56万公顷(4583.40万亩),比上年增长0.5%;油料种植面积53.61万公顷(804.15万亩),
关于“地球日”的表述,错误的是()。
下列关于Serv_UFTP服务器配置的描述中,错误的是()。
1 ApanelofthegreatandthegoodfromEuropeandtheUnitedStatesrecentlydrewupanelegantblueprintforremakingtheAt
最新回复
(
0
)