首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓
admin
2013-11-29
63
问题
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓名;当在Text,中输入一个姓氏,或一个姓名后,单击“查找”按钮,则进行查找,若找到,就把所有与Textl中所有具有Textl中姓氏的姓名或相同的姓名显示在Text2中(如图所示);若未找到,则在Text2中显示“未找到!”;若Textl中没有查找内容,则在Text2中显示“未输入查找内容!”。
注意:考生不得修改程序的其他部分和控件的属性,最后将修改后的文件按原文件名存盘。
选项
答案
窗体的Print办法用于向窗体上输出内容,Cls办法用于清除窗体上已输出的内容。Left()函数用于取出已有字符串左边指定个数的字符串。根据题意,在“取数”按钮的click事件过程中,用Open语句打开文件in5.txt,用For循环的Input #方法读出10个数据存入数组a,并输出到窗体上,在整个输出前应先清除窗体上已有内容。在“查找”按钮的Click事件过程中,先判断在Txtl中是否输入了内容,若没有输入,在Txt2中显示相关信息;若有输入,用For循环在数组a 中逐一查找与Txtl中内容相符的元素,相符的标准是Left(a(i),n)=Txtl.text(i为循环变量,n为Txtl文本的长度),最后在文本框中显示结果。 步骤l:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Dim a(15)As String Private Sub Cl_Click() Dim k As Inleger Open“in5.txt”For Input As#l Forml.Cls For k=1 To 15 Input#l,a(k) Print a(k) Next k ‘Close? End Sub Private Sub C2_Click() Dim k As Integet,n As Integer,c As String ‘n=Len(?) C=“” lf n>0 Then For k=l To 15 ‘If Left(a(k),?)=Textl.Text Then ‘C=C+“”+? End If Next k If C=“”Then Text2.Text=“未找到!” Else Text2.Text=? End If Else Text2.Text=“未输入查找内容!” End If End Sub 程序结束 第1个?处填入:#l 第2个?处填入:Textl.Text 第3个?处填入:n 第4个?处填入:a(k) 第5个?处填入:C 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/7WQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对象实现了数据和操作的结合,使数据和操作______于对象的统一体中。
关系表中的每一横行称为一个
在VisualBasic中,实参传递给形参有两种方式,【】方式可以通过改变过程中的相应的参数来改变实参变量的值;而【】被调用过程中改变了这个形参的值,但对应的实参的值并不改变。
以下循环的执行次数是【】。k=0DoUntilk>=10k=k+1Loop
设一棵完全二叉树共有500个结点,则在该二叉树中有【】个叶子结点。
需求分析阶段的任务是()。
已知一个有序线性表为(13,18,24,35,47,50,62,83,90,115,134),当用二分法查找值为90的元素时,查找成功的比较次数为()。
设A=2,B=-4,则表达式3*A>5OrB+8>0的值是______。
若要设置定时器控件的定时时间,需设置的属性是
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员,从职员到部门的联系类型是
随机试题
甲县政府设立的临时机构基础设施建设指挥部认定乙镇政府辖区内一10户居民的小区自建的围墙及附属房系违法建筑,责令乙镇政府负责强制拆除。10户居民对此决定不服起诉。居民向法院起诉应以下列谁为被告()
患者,男,72岁。腰背部疼痛半年前来就诊。查体:肝肋下2cm,脾肋下3cm,多个腰椎骨压痛明显。实验室检查:Hb84g/L,白细胞4.6×109/L,血小板110×109/L,红细胞沉降率120mm/h,尿蛋白定性(-),24小时尿蛋白定量5g
拔牙后开口逐渐受限,下颌下淋巴结肿大,无其他阳性体征,此症状为()
可能造成睡眠障碍的因素不包括
商品房预售是指房地产开发企业将正在建设的房屋预先售给(),并由其预付定金或房价款的行为。
编制施工投标文件的主要依据是()。[2003年真题]
在需求期阶段,家长表现出()。
关于2012年福布斯全球企业前十强,下列说法正确的是()。
HowdoyouexplaineconomicsinplainEnglish?TheFederalReserveBankofNewYorkhasbeenansweringthequestionwithaneven
PhilanthropyIthasbecomeanAmericantraditionthatthosewhoattaingreatwealthreturnsomeofittothepublicthrough
最新回复
(
0
)