首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Labe11、标题为“回文的个数为”的标签和一个名称为Text1,初始值为空的文本框,如图3—87所示。程序功能如下: ①单击“读数据”
在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Labe11、标题为“回文的个数为”的标签和一个名称为Text1,初始值为空的文本框,如图3—87所示。程序功能如下: ①单击“读数据”
admin
2019-05-14
74
问题
在考生文件夹下有工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮,请添加一个名称为Labe11、标题为“回文的个数为”的标签和一个名称为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 _,1)Then foundhUiwen=False Exit For End If Next End Function 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“统计”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/5HUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当前文件夹中设有一个文本文件File1.txt,并有下面程序代码:PrivateSubCommand1_Click()DimchAsStringOpen"File1.txt"ForInputAs#1DoWhileNotEOF(
在名称为Form1的窗体上添加一个名称为Image1的图像框,有边框,并可以自动调整装入图片的大小以适应图像框的尺寸;再添加三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“红桃”、“黑桃”、“清除”。在考生文件夹下
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
阅读程序:PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=32:y=42CallPCS(x,y)Printx;yEndSubSubPCS(ByValnAsIntege
以下关于VB对象属性的叙述中,错误的是
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
在名称为Form1,标题为“图片”的窗体上添加1个名称为Image1的图像框,其高为2500,宽为2000。请通过属性窗口设置适当属性,将考生文件夹下的图片文件pic1.jpg插入图像框,并使图片自动适应图像框的大小(如图所示)。注意:存盘时必须存放在考
在考生文件夹下有一个工程文件sjt4.vbp,其窗体如图所示。该程序用来对在上面的文本框中输入的英文字母串(称为“明文”)加密,加密结果(称为“密文”)显示在下面的文本框中。加密的方法为:选中一个单选按钮,单击“加密”按钮后,根据选中的单选按钮后面的数字n
设窗体上有一个名称为List1的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性。该属性为
随机试题
患者,女,21岁。因不规则发热、乏力、消瘦2周来诊。查体:双侧颈部、锁骨上、腋窝均可扪及多个黄豆到蚕豆大小淋巴结,质硬、无压痛,肝肋下1cm,脾肋下3cm,质中、无压痛。检测WBC4.2×109/L,Hb80g/L,PLT70×109/L;网织红细胞0.1
A.免疫反应中最早出现的抗体 B.可通过胎盘的抗体 C.介导局部免疫 D.介导I型变态反应 E.B细胞成熟标志IgE是
前牙舌支托凹位于
治疗肺痈,咳吐脓血,胸痛,宜首选的药物是()治疗顽痰咳嗽,胸膈胀闷,宜首选的药物是()
导游人员在引导旅游者旅行、游览过程中,遇到可能危及( )的紧急情形时,经征得多数旅游者的同意,可以调整或者变更接待计划,但是应当立即报告旅行社。
在自然保护区的核心区和缓冲区内,可以建设部分生产设施。()
阅读下列材料,并回答问题。大一班有两位小朋友,一位叫明明,另一位叫强强。明明衣着整齐,乐于助人,有同情心,对人友好,有礼貌,善于与人分享合作,喜欢交往,深受同伴的喜爱。强强穿戴邋遢,脾气暴躁,对人很有敌意,还喜欢打人、骂人,经常欺负小朋友,班上小
一架飞机所带的燃料最多可以用6小时,飞机去时顺风,速度为1500千米/时,回来时逆风,速度为1200千米/时,这架飞机最多飞出多少千米就需往回飞?()
最近10年来,S市的电子行业的大中企业纷纷合并、重建或缩小规模,这使得这一行业的就业状况极不乐观。但令人惊奇的是,这一行业的就业者并没有感觉到此种不稳定的压力。据一项该市电子行业的相关调查显示,10年前被调查者中,58%不认为自己面临因工作不稳定而造成的压
甲在周二、周四、周六说真话,乙在周一、周三说真话,如果甲说的是假话,那么丙一定说真话。一日,甲、乙、丙、丁四人中有两人做了好人好事,现在要奖励做好人好事的人,询问四人。甲:我做了好人好事,乙也做了好人好事。乙:好人好事是我做的。丙:我没做好人好事,好
最新回复
(
0
)