首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。 本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。 本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上
admin
2015-06-30
46
问题
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。
本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓名;当在Text1中输入一个姓氏,或一个姓名后,单击“查找”按钮,则进行查找,若找到,就把所有与Text1中所有具有Text1中姓氏的姓名或相同的姓名显示在Text2中(如图所示);若未找到,则在Text2中显示“未找到!”;若Text1中没有查找内容,则在Text2中显示“未输入查找内容!”。
注意:考生不得修改程序的其他部分和控件的属性,最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Dim a(15) As String Private Sub C1_Click() Dim k As Integer Open "in5.txt" For Input As #1 Form1.Cls For k = 1 To 15 Input #1, a(k) Print a(k) Next k ’Close ? End Sub Private Sub C2_Click() Dim k As Integer, n As Integer, c As String ’n = Len( ? ) c = "" If n > 0 Then For k = 1 To 15 ’If Left(a(k), ? ) = Text1.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个?处填入:#1 第2个?处填入:Text1.Text 第3个?处填入:n 第4个?处填入:a(k) 第5个?处填入:c 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/mVQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框(其Name属性为Text1),编写如下事件过程,运行结果是______。PrivateSubForm_Load()ShowText1.Text="你好!"Text1.SetF
下列程序的输出图形是()。Fork=0To360cr=Int(160*RnD)ang=-1415926/180*kCircle(2000,2000),500,cr,0,angNext
5.【】是从二维表列的方向进行的运算。
单击命令按钮时,下列程序代码的执行结果为______。PublicSubProcl(nAsInteger,ByValmAsInteger)n=nMod10m=m/10EndSubP
在窗体中添加一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()a=InputBox("请输入一个整数")b=InputBox("请输入一个整数")PrintVa
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【】。
下列关于队列的叙述中正确的是______。
数据库保护分为:安全性控制、【】、并发性控制和数据的恢复。
下列关于dowhile...loop和do...100puntil循环执行循环体次数的描述正确的是()
若某完全二叉树的深度为h,则该完全二叉树中至少有______个结点。
随机试题
物质即看得见、摸得着的实物。
社会主义初级阶段的分配制度是()
增感屏受激发,产生荧光的物质是
A.血液传播B.飞沫传播C.唾液传播D.食物传播E.蚊虫传播戊型肝炎是
“备案号”栏:()。“指运港”栏:()。
垄断厂商的产量()。
某化工厂将废水直接排人河道,流入张某的鱼塘,造成绝大部分鱼死亡。该厂承认其侵权,但不能接受张某提出的赔偿数额。对此,下列哪一表述是不正确的?
阿尔比派
作为法国资产阶级革命成果的《人权与公民权利宣言》颁布的时间是()。
在《水》中塑造了一位西双版纳的傣族妇女的优美形象的著名舞蹈艺术家是______。
最新回复
(
0
)