首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下代码: 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
26
问题
在窗体上画一个命令按钮,然后编写如下代码:
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全国计算机二级
相关试题推荐
定时器的Interval属性以什么为单位指定Timer事件之前的时间间隔
有下列二叉树,对此二叉树前序遍历的结果是()。
在窗体上画一个命令按钮,然后编写如下事件过程:OptionBase1PrivateSubCommand1_Click()Dimas=Array(1,2,3,4)j=1F
有如下事件过程,当同时按下转换键Ctrl和功能键F6时,最后输出的信息是 ConstShiftKey=1 ConstCtrlKey=2 ConstKey_F5=&H74 ConstKey_F6=&H75 PrivateSubText1
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrivateSubComand1_Click()Fori=1To4x=4Forj=1To3
在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommandl_Cliek()Dimarrayl(10,10)AsIntegerDimi,
从程序的行文角度,编写程序源代码应注意______。
记时器控件能有规律的以一定时间间隔触发【】事件,并执行该事件过程中的程序代码。
过程语句中,使用的<参数表>可以是下列哪种()。
随机试题
信息处理的客体是()
Ournewteacherisnotexperiencedandcan’tmakehimselfclearly______inclass.
简述诉讼时效的意义。
最常见的腹外疝是()
1/2000地形图和1/5000地形图相比,下列中哪个叙述是正确的?
下列各句所用的修辞手法与句后括号内所标注的不符的是:
本题为选做题,请在Ⅰ、Ⅱ两道试题中选取其中——道解答,若两题都回答,只按第Ⅰ道试题的成绩记入总分。选做题I阅读下列材料:据日本《每日新闻》报道说,日本教科书出版商在执政党自民党、文部省和右翼史学家的压力下,企图淡化日本战时侵略历史,
Climatechangeissupposedtounfoldslowly,overdecades.Butthatisnottrueupinthegreatwhitenorth,asthoseattending
下列叙述中正确的是()。
Foryears,Europeanshavebeenusing"smartcards"topaytheirwaythroughtheday.Theyusetheminshopsandrestaurants;plu
最新回复
(
0
)