首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输人),找到后在标签Labell中显示该数是文件中第几个数;如果没找到,则显示文件中没有该数的信息 Private Sub Commandl_Click() Dim X As Int
在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输人),找到后在标签Labell中显示该数是文件中第几个数;如果没找到,则显示文件中没有该数的信息 Private Sub Commandl_Click() Dim X As Int
admin
2019-06-20
77
问题
在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输人),找到后在标签Labell中显示该数是文件中第几个数;如果没找到,则显示文件中没有该数的信息
Private Sub Commandl_Click()
Dim X As Integer,n As Integer
a=Val(Text1.Text)
Open”filel.txt”For Input As#l
Do While NOt EOF(1)
Input_______
n=n+1
If X=a Then
Labell.Caption=a&”是文件中第”&n&”个数”
Close#1
Exit Sub
End If
Loop
Close#1
Labell.Caption=”文件中没有”&a
End Sub
要使上面的程序代码实现上述功能,在横线处应填写的是( )。
选项
A、#l,X
B、#1,a
C、1,a
D、1.n
答案
A
解析
EOF函数常用来在循环中测试是否已到文件尾,顺序文件的读操作由Input#语句和Line Input#语句来实现,格式为:Input#文件号,变量表,故选项C、D错误。Input#语句从一个顺序文件中读出数据项,并把这些数据项赋值给程序变量,本题先从顺序文件中读出一个数据赋值给变量x,然后通过if语句判断所读出的数据x和输入的数据a是否相等。若相等,则将该数据显示在标签控件Labell上,故选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/xMUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时,单击某个复选框,如果列表框中没有该复选框的标题,则把该复选框的标题添加到列表框中,否则从列表框中把该复选框标题删除。PrivateSubCheck
以下关于图片框控件的说法中,错误的是
假定在窗体上添加了一个通用对话框控件,其名称为CD1,并有如下程序段:CD1.ShowOpen:CD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件,则FileTitle属性的值是
(1)在考生文件夹下有一个工程文件vbsi3.vbp,相应的窗体文件名为vbsi3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为空白;有一个列表框,名称为lstWord。程序运
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Labell的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其居中显示“等级考试”,并使
(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1:再添加一个名称为Timer1的计时器。请设置适当的控件属性.并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图2.170所示的是程序刚
考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对象“tBand”和“tLine”,同时还有以“tBand”和“tLine”为数据源的报表对象“rBand”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页
在考生文件夹下有一个数据库文件“samp1.accdb”,里边已建立了两个表对象“tGrade”和“tStudent”,同时还存在一个Excel文件“tCourse.xlsx”。请按以下操作要求,完成表的设计。(1)将Excel文件“tCours
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为
检查软件产品是否符合需求定义的过程称为
随机试题
根据《珠宝首饰评估程序指导意见》,执行单体珠宝首饰评估业务,应当根据评估对象种类,对评估对象的品质和价值特征分析等进行描述记录,描述方式包括()。
某患者骨髓涂片检查结果:粒系细胞30%,淋巴细胞25%,单核细胞25%,红系细胞20%。该患者骨髓M:E是
腰椎前后正位体位显示标准,错误的是
腹部B超检查对以下哪种黄疸最有意义
此患者可能的诊断是此患者下一步应做哪项辅助检查确诊
数字线划图的基本等高距依据地形类别进行划分,一幅图可最多采用()种等高距。
中暑是高温作业环境下容易发生的疾病。预防高温中暑是暑季安全生产的重要内容,下列预防措施中错误的是()。
下列应建立专职消防队的单位是________。()
下列各项,不能体现出财务部控制财务风险的情况有()。
学习迁移使习得的经验得以__________化、系统化,形成一种稳定的整合的心理结构,从而更好地调节人的行为,并能动地作用于客观世界。
最新回复
(
0
)