首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Private Sub Form_Click() Dim InD Open "d:\city.txt" For
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Private Sub Form_Click() Dim InD Open "d:\city.txt" For
admin
2020-07-22
38
问题
文件d:\city.txt的内容如下:
BeiJing
TianJin
ShangHai
ChongQing
编写如下事件过程:
Private Sub Form_Click()
Dim InD
Open "d:\city.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, InD
Loop
Close 1
Print InD
End Sub
运行程序,单击窗体,输出结果是
选项
A、文件city.txt的全部内容
B、BeiJing
C、ChongQing
D、空白
答案
C
解析
#1文件以读操作的方式打开。在文件结尾的部分退出。退出时InD内存储的内容是ChongQing,打印的内容就是ChongQing,选D)。
转载请注明原文地址:https://www.kaotiyun.com/show/NJHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,再依次出栈,则元素出栈的顺序是
窗体上有一个名称为VScroll1的滚动条,当用鼠标拖动滚动条中的滚动块时,触发的事件是
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=1DoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
窗体上有一个名称为Combol的组合框,为了引用Combol中最后一个列表项,应使用的表达式是
数据库系统的三级模式不包括
关于文件操作,以下叙述中正确的是
以下关于VB文件的叙述中,错误的是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
能够产生1到50之间(含1和50)随机整数的表达式是( )。
定义学生选修课程的关系模式如下:S(S#,Sn,Sd,Sa)(其属性分别为学号、姓名、所在系、年龄);C(C#,Cn,P#)(其属性分别为课程号、课程名、先选课);SC(S#,C#,G)(其属性分别学号、课号和成绩)。检索选修课程名为“操作系统”的
随机试题
材料一:全面深化改革的总目标是完善和发展中国特色社会主义制度,推进国家治理体系和治理能力现代化。全面深化改革,必须立足于我国长期处于社会主义初级阶段这个最大实际,坚持发展仍是解决我国所有问题的关键这个重大战略判断,以经济建设为中心,发挥经济体制改
起重机械定期检验是指在使用单位进行经常性日常维护保养和自行检查的基础上,由检验机构进行的全国检验。《起重机械定期检验规则》规定,起重机械定期检验中应当进行性能试验,首检后每间隔1个检验周期应进行1次的试验项目是()。
正常工况下,危险源运行模拟流程,进行主要参数的数据显示、报表、超限报警,并根据临界状态数据自动判断是否()。
下列属于操作风险产生原因的有()。
2×13年度,K公司发生了以下会计政策变更:(1)1月1日,K公司将一项固定资产的弃置费用由实际发生时计入当期损益变更为计入固定资产成本,假定折现率为8%。该固定资产于2×10年12月31日建造完成并投入使用,建造成本为500万元,预计使用寿命为20年,
简述异众比率、四分位差、方差或标准差的适用场合。
一个优秀的领导人是不会脱离群众的。所以,如果一个领导人脱离群众,他就不是一个能够得到大多数群众拥护的人。以下哪项与上面的议论方式最相似?
Nowadays,morepeoplearelivingclosertogether,andtheyusemachinestoproduceleisure.Asaresult,theyfindthattheirle
Thefirstparagraphisintendedto______.Thebesttitleforthepassagewouldbe______.
Aninternationalcommitteeofdoctorssaysthatthenumberofcasesofbraindiseasesindevelopingcountriesisrising.Thedoc
最新回复
(
0
)