首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓
admin
2013-11-29
51
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
冒泡排序在最好情况下时间复杂度为【】。
若整型变量a值为2、b的值为3,则下列程序段执行后整型变量c的值为______。Ifa>5thenIfb<4Thenc=a-bElsec=b-aElseIfb>3Thenc=a*bElsec=
用于去掉一个字符串的右边的空白部分的函数是______。
为了把焦点移到某个指定的控件,所使用的方法是______。
文本框控件最多能处理______个字节。
以下关于菜单的叙述中,错误的是
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
结构化分析方法是面向()的自顶向下逐步求精进行需求分析的方法。
在有n个结点的--31链表中,值为非空的链域的个数为______。
假如用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
随机试题
患者主诉左下后牙残根,要求拔除,平时无不适症状。查左下第一前磨牙冠黄褐色残根状,探硬无龋坏,牙髓活力正常。应诊断为
下列血常规检查中哪项异常
根据税收征收管理法的规定,下列各项中税务机关有权核定其应纳税额的有()。
SumuelUllmanusedtobethefollowingexcept______.Whoregardstheessay"Youth"asthePopeye’sSpinach’?
Itisacommonplaceamongmoraliststhatyoucannotgethappinessbypursuingit.Thisisonlytrueifyoupursueit【62】.Gamble
Duringrecentyearswehaveheardmuchabout"race":howthisracedoescertainthingsandthatracebelievescertainthingsand
Whydoesn’ttheauthorwanttotalkaboutbeingawomanscientistagain?Whatdidtheauthorconstantlyfightagainstwhiledoi
Fromthehealthpointofviewwearelivinginamarvelousage.Weareimmunizedfrombirthagainstmanyofthemostdangerousd
Kodak’sdecisiontofileforbankruptcyprotectionisasad,thoughnotunexpectedturningpointforaleadingAmericancorpora
Beginninginthe1950sand1960s,Japanbegandevelopingareputationforitslongevity.Bythe1970s,theJapanesewerethelon
最新回复
(
0
)