首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下代码: Private Sub Command1_Click( ) Dim MaxSize,NeXtChar,MyChar Open"d:\temp\female.txt"For Input As
在窗体上画一个命令按钮,然后编写如下代码: Private Sub Command1_Click( ) Dim MaxSize,NeXtChar,MyChar Open"d:\temp\female.txt"For Input As
admin
2018-09-29
43
问题
在窗体上画一个命令按钮,然后编写如下代码:
Private Sub Command1_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、Tme
B、False
C、0
D、Null
答案
B
解析
本题考查文件的操作。以读的方式打开文件female.txt,Nextchar表示从文件的最后一个字符开始。程序首先定位到该字符,然后取出一个字符,存放到字符串Mychar中。输出的EOF(1)表示文件指针是否到达文件1的末尾。返回值有True(移动到末尾)和False(没有到末尾)。既然是从后往前读出每个字符,因此操作结束以后,文件指针不可能移动到文件的末尾,所以EOF(1)的值必然为False。
转载请注明原文地址:https://kaotiyun.com/show/GQFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() m=-3.6 IfSgn(m)Then n=Int(m) Else n=Abs(m) EndIf
有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“单
以下关于变量作用域的叙述中,错误的是
以下能够正常结束循环操作的程序段是
为了读取数据,需打开顺序文件"D:\data5.txt",以下正确的命令是
VisualBasic源程序的续行符为
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimb(3,3)AsIntegerFori=1To3Forj=1To3
设栈的顺序存储空间为S(0:49),栈底指针bottom=49,栈顶指针top=30(指向栈顶元素)。则栈中的元素个数为
随机试题
A.神B.魂C.魄D.意肝藏
目前前置胎盘围产儿死亡率为
A、肺活量B、用力呼气量(时间肺活量)C、肺通气量D、肺总量E、肺泡通气量与下列检查指标相关的肺通气计量是能较好地评价肺通气功能
牙周疾病的二级预防包括
荆防颗粒适用于()
原始凭证是登记明细分类账的依据,记账凭证是登记总分类账的依据。()
在生产经营过程中由于经营管理不善、价格变化、消费者需求变化、通货膨胀、汇率变动或预测的失误,导致企业收入降低甚至破产的风险是()。
下列对中国电信客户品牌的说法,正确的是()。
Accordingtothetext,thedollarThefactorNOTaccountingfortheslideofdollaris
WhichofthefollowingisTRUEabouttheimmigrationreform?
最新回复
(
0
)