首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下代码: Private Sub Commandl_Click() Dim MaxSize,NextChar,MyChar Open“d:\temp\female.txt”For I
在窗体上画一个命令按钮,然后编写如下代码: Private Sub Commandl_Click() Dim MaxSize,NextChar,MyChar Open“d:\temp\female.txt”For I
admin
2012-09-07
57
问题
在窗体上画一个命令按钮,然后编写如下代码:
Private Sub Commandl_Click()
Dim MaxSize,NextChar,MyChar
Open“d:\temp\female.txt”For Input As#1
MaxSize=LOF(1)
For NextChar=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)表示文件指针是否到达文件1的末尾。返回值有True(移动到末尾)和False(没有到末尾)。既然是从后往前读出每个字符,因此操作结束以后,文件指针不可能移动到文件的末尾,所以EOF(1)的值必然为False。
转载请注明原文地址:https://kaotiyun.com/show/eDhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为a=6Fork=1To0a=a+kNextkPrintk;a
检查软件产品是否符合需求定义的过程称为
下列关系运算的叙述中,正确的是
文件的打开和关闭语句分别是【】和【】。
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labell,文本框的Text1属性设置为空白,然后编写如下事件过程:PrivateSubCommand1Click()x=Int(Val
以下过程的作用是将26个小写字母逆序打印出来,请补充完整。 SubInverse() Fori=122To【】 Print【】; Nexti EndSub
Jackson结构化程序设计方法是英国的M.Jackson提出的,它是一种面向【】的设计方法。
新建一个窗体,其Borderstyle属性设置为FixedSingle,但运行时却没有最大化和最小化按钮,可能的原因是
要显示当前过程中的所有变量及对象的取值,可以利用______窗口。
下列哪条语句是错的______。
随机试题
颅内压增高时,常出现高原波,亦称A波。下列描述哪些是正确的
女性,13岁。1年前无意中发现双肩背部不等高,后逐渐明显。X线显示胸椎侧凸畸形,Cobb角25o,临床诊断为突发性脊柱侧凸。对该患者的最佳治疗方案是
女,35岁,患甲状腺功能亢进症3年,应用抗甲状腺药物控制良好。因子宫肌瘤入院准备手术切除。护士在做术前教育时发现病人紧张、焦虑,心率达110次/分,术前1日,病人烦躁不安,自觉四肢无力,心慌气短,多汗;护理体检体温39℃,心率142次/分,心律不整,心率大
A.戊二醛B.合成酚C.碘伏D.乙醇E.次氯酸钠
关于上市公司不得公开发行证券,下列说法错误的是()
根据《房产税暂行条例》的规定,下列各项中,符合房产税纳税义务人规定的是( )。
纳税当事人不服税务行政复议决定的,可以在收到复议决定书之日起30日内向人民法院提起诉讼。()
WaterFromthebeginning,waterhasfurnishedmanwithasourceoffoodandahighwaytotravelupon.Thefirst(51)arosewhere
TheBrainsBusinessAForthoseofacertainageandeducationalbackground,itishardtothinkofhighereducationwithoutth
Forthispart,youareallowed30minutestowriteashortessayonthetopicParents’EmphasisonEducation.Youshouldwritea
最新回复
(
0
)