首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件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
42
问题
文件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全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0s=s&nMod
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) PrintText1.Text;EndSub运行程序,
以下关于过程及过程参数的叙述中,错误的是
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:DimxAsInteger,yAsIntegerx=Val(InputBox("输入整数"))y=Val(InputBox("输
VB中,若没有显式声明变量的数据类型,则默认的类型是
下面属于系统软件的是
下面程序运行时,若输入395,则输出结果是( )。PrivateSubCommand1_Click() Dimx% x=InputBox("请输入一个3位整数") PrintxMod10,x\100,(xMod100)\10
能够用于标识对象名称的属性是( )。
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
以下关于VB对象属性的叙述中,错误的是
随机试题
当归四逆汤的功效包括
男,30岁。餐后突发右上腹及剑突下痛,放射到右肩及后背部,2小时后疼痛剧烈,伴恶心,并吐出所进食物,仍不缓解,急诊就医。数年“胃病”史及胆石症病史,间有胆绞痛发作。查体:痛苦病容,体温37.2℃,呼吸28次/分,浅快,律齐。全腹胀,上腹肌紧张,压痛反跳痛(
男,65岁,夜尿频,排尿不畅1年,直肠指诊前列腺略大,质韧,中间沟消失。
证券的回转交易是指投资者买入的证券,经确认成交后,在交收前全部或部分卖出。()
关于罗杰斯的有意义学习,说法错误的是()
材料:教育过程是连续性的,这种思想并不是什么新的东西。无论人类是自觉的,还是不知觉地这样做,他们总是持续不断地学习和训练他们自己。这种学习和训练主要是通过周围环境的影响,通过亲身经验改变他们的行为、人生观和知识内容。然而到现在,还没有多少机构支持这种自然动
《刑法》第263条:以暴力、胁迫或者其他方法抢劫公私财物的,处3年以上10年以下有期徒刑,并处罚金;有下列情形之一的,处10年以上有期徒刑、无期徒刑或者死刑,并处罚金或者没收财产:(一)入户抢劫的;(二)在公共交通工具上抢劫的;(三)抢劫银行或者其他金融机
设ξ1=[1,一2,3,2]T,ξ2=[2,0,5,一2]T是齐次线性方程组Ax=0的基础解系,则下列向量中是齐次线性方程组Ax=0的解向量的是()
Wehavetotryeverymeansto______thecostsoftheproject.
Peoplebecomequiteillogicalwhentheytryto【C1】______whatcanbeeatenandwhatcannotbeeaten.IfyoulivedintheMediterr
最新回复
(
0
)