首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Pfivate Sub Form Click() Dim InD Open”d:\
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Pfivate Sub Form Click() Dim InD Open”d:\
admin
2019-03-08
62
问题
文件d:\city.txt的内容如下:
BeiJing
TianJin
ShangHai
ChongQing
编写如下事件过程:
Pfivate Sub Form Click()
Dim InD
Open”d:\citv.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
解析
Visual Basic程序中关于文件的操作,主要是先打开一个文件,然后对这个文件进行读或写的操作,操作完成后,关闭这个文件。打开文件的基本格式为:Open FileName For Mode As#FileNumber。打开方式主要有Output、Append、Input、Random等几种方式。以Input方式打开的文件主要用来读入数据,它与Input#、Line Input#语句配合使用。Line Input#语句从顺序文件中读取一个完整的行,并把它赋给一个字符串变量。本题中依次取出每一行放到InD中,变量中只能保留最后一次取出的行。
转载请注明原文地址:https://kaotiyun.com/show/x4Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubsV(ByValmAsInteger,nAsInteger)m=m*2n=n-5Printm;nEndSubPrivateSubForm_Cli
在设计阶段,假定在图片框Picture1中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
为了在运行时能显示窗体左上角的控制框(即系统菜单),应执行的操作是
VB中,若没有显式声明变量的数据类型,则默认的类型是
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。要求:程序中不得使用变量,每个事件过程
在面向对象方法中,实现信息隐蔽是依靠
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
软件调试的目的是()。
下列对于软件测试的描述中正确的是
随机试题
下列( )不是实践中计划的组织实施行之有效的主要方法。
债的客体为【】
A.太阳经B.少阳经C.阳明经D.太阴经头痛连及项部,病在
符合急性白血病完全缓解的标准是
A.肺毛细血管压5mmHg,血压80/60mmHgB.肺毛细血管压10mmHg,血压80/60mmHgC.肺毛细血管压26mmHg,血压150/90mmHgD.肺毛细血管压12mmHg,血压120/80mmHgE.肺毛细血管压26mmHg,血压80
【2014专业案例真题下午卷】在某市远离发电厂的工业区拟建设一座110/10kV变电所,装有容量为20MV.A的主变压器两台,110kV配电装置室外布置,10kV配电装置室内布置;主变压器110kV中性点直接接地,10kV系统经消弧线圈接地,变电所所在场地
试件在交变应力作用下,能够承受无限次应力循环而不发生破坏的最大应力称之为()。
燕贾祖璋①自从春风唤醒了芳草以后,依依袅袅的杨柳垂枝上的点点银色芽苞中,抽放着浅黄嫩绿的新叶;秃濯僵立的桃李枯丫间,也点缀着娇红洁白的花葩。当晶莹和暖的阳光照耀万物的时候,在这红桃绿柳中间,更容易瞥见一种呢
“面对资源约束趋紧、环境污染严重、生态系统退化的严峻形势,必须树立尊重自然、顺应自然、保护自然的生态文明理念。”党的十八大报告的这一论断,是基于对人与自然关系深刻反思的科学判断。为建设美丽中国、实现中华民族永续发展应坚持
(2006年)若级数收敛,则级数()
最新回复
(
0
)