首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下代码: Pfivate Sub Command1_Click() Dim MaxSize,NextChar,MyChar Open"d:\temp\female.txt"For Input As
在窗体上画一个命令按钮,然后编写如下代码: Pfivate Sub Command1_Click() Dim MaxSize,NextChar,MyChar Open"d:\temp\female.txt"For Input As
admin
2017-08-22
33
问题
在窗体上画一个命令按钮,然后编写如下代码:
Pfivate Sub Command1_Click()
Dim MaxSize,NextChar,MyChar
Open"d:\temp\female.txt"For Input As #1
MaxSize=LOF(1)
ForNextChar=MaxSize To 1 Step-1
Seek #1,NextChar
MyChar=Input(1,#1)
Next NextChar
Print EOF(1)
Close #1
End Sub
程序运行后,单击命令按钮,其输出结果为( )。
选项
A、True
B、False
C、0
D、Null
答案
B
解析
本题考查文件的操作。以读的方式打开文件female.txt,Nextchar表示从文件的最后一个字符开始。程序首先定位到该字符,然后取出一个字符,存放到字符串Mychar中。输出的EOF(1)表示文件指针是否到达文件l的末尾。返回值有True(移动到末尾)和False(没有到末尾)。既然是从后往前读出每个字符,因此操作结束以后,文件指针不可能移动到文件的末尾,所以EOF(1)的值必然为False。
转载请注明原文地址:https://kaotiyun.com/show/C3Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,CAsIntegera=
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrivateSubComand1_Click()Fori=1To4x=4Forj=1To3
下列命令按钮的事件过程执行后,输出的结果是PrivateSubcommand1_click()Form=1To10Step2a=10Forn=1To10Srep2
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机函数产生n个1~100范围的随机数,然后求出去掉一个最大数和最小数的平均数。根据题意,请完善下列程序:PrivateSubCommand1_Click
下列语句错误的是
某程序列表框中有许多项,现在用Timer控件控制时间,0.1秒删除一项,直到删完为止,用一滚动条来显示删除的项目,请选择合适的语句,完成此程序()。PrivateSubCommand2_Click
刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是()。
下列不能打开属性窗口的操作是______。
如果A为整数且|A|>=10,则打印“OK”,否则打印“Error”,表示这个条件的单行格式If语句是()。
随机试题
中国共产党独立领导革命战争、创建人民军队的开端是()
设立出版物出租单位或者其他单位、个人从事出版物出租业务的,应当于取得营业执照后10日内持营业执照复印件及经营地址、法定代表人或者主要负责人情况等材料到当地县级人民政府文化部门备案。()
猪新鲜精液液态保存的适宜温度为()
下列各项中不对的是
下列叙述中错误的是()。
甲厂委托职工张某到深圳购买一批仪器,由于委托书中未写明具体规格,导致张某买到的仪器不符合要求,此时价款还未支付。根据相关规定,下列说法正确的有()。
公元前334年,亚历山大第一次在地球上画出了一条纬线,这条线从直布罗陀海峡起,沿着托鲁斯和喜马拉雅山脉一直到()。
阅读材料,回答下列问题。2020年1—2月,我国境内投资者共对全球147个国家和地区的1733家境外企业进行了非金融类直接投资,累计实现投资1078.6亿元人民币,同比增长1.8%。对外承包工程完成营业额1080亿元人民币,同比下降9.5%,新签
阅读以下说明,回答问题1~问题3,将解答填入答题纸对应的解答栏内。[说明]假设某公司被分配了一个C类地址,网络号是202.128.236.0,该公司的网络拓扑结构如下图所示。其中部门A和部门B拥有的主机数不会超过25台,其他部门及分公司的主机
BirdFlu:CommunicatingtheRiskTherecommendationslistedbelowaregroundedintwoconvictions(信念):thatmotivatingpeopl
最新回复
(
0
)