首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Command1_Click() Dim s1 As String, s2 As String Open "
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Command1_Click() Dim s1 As String, s2 As String Open "
admin
2020-07-22
38
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:
Private Sub Command1_Click()
Dim s1 As String, s2 As String
Open "c:\d4.dat" For Append As #3
Line Input #3, s1
Line Input #3, s2
Text1.Text=s1+s2
Close
End Sub
该程序运行时有错误,应该进行的修改是( )。
选项
A、将Open语句中的For Append改为For Input
B、将Line Input改为Line
C、将两条Line Input语句合并为Line Input #3, s1,s2
D、将Close语句改为Close #3
答案
A
解析
文件打开方式中的Append意味着打开的文件是顺序输出方式,也就是说打开文件是为了向其中写入数据的而不是要读出数据。因此Open "c:\d4.dat" For Append As #3应该改为Open "c:\d4.dat" For Input As #3。所以A选项正确。Clsoe语句中的文件号可以省略,这时会关闭所有打开的文件。
转载请注明原文地址:https://jikaoti.com/ti/cGS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程:PrivateSubCommandl_Click()n=0Fori=0To10X=2*i一1IfXMod3=0Thenn=n+1NextiPrint
窗体上有一个名称为VScrolll的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScrolll.Value的值等于
下列叙述中正确的是
数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下面图符名标识的图符不属于数据流图合法图符的是
以下能接收焦点的控件是
在医院,每个医生只属于某一个诊疗科,医生同一天可为多位患者看病,而一名患者可在多个科室治疗。则实体医生和患者之间的联系是
以下不能用Print方法输出数据的对象或窗口是()。
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
软件测试的目的是( )。
算法的空间复杂度是指()。
随机试题
脊髓灰质炎瘫痪前期可有
表面上看,1982午的大学毕业生很像1964年的大学毕业生。他们相当保守,衣着讲究,对传统感兴趣,尊敬父母。但是他们却有一种根深蒂固的差异:大部分1982年的学生在大一学年的调查中都认为有一份好收入是他们决定上大学的一个重要原因。上面的陈述如果正确,最好地
多发性硬化的治疗措施不包括
损坏不堪使用的房屋和危险房屋,经有关部门鉴定后,可免征房产税。()
长期使用低能量和能量密度低的食物,会影响儿童生长发育。()
与“及之而后知,履之而后艰”反映的哲学原理相同的是()。
结合材料回答问题:材料1“全国公安系统二级英雄模范”吕建江,生前系河北省石家庄市公安局桥西分局安建桥综合警务服务站主任,2004年从部队转业参加公安工作以来,13年如一日扎根基层,不忘初心、牢记使命,把为民服务的触角拓展到网络空间、延伸到千家万户,千方
Theoldestandsimplestmethod,then,ofdescribingdifferencesinpersonalitywasto(36)______peopleaccordingto(37)______
CanthePCIndustryResurrectItself?A)InternetDataCenter’s(IDC)recentreportstatedthatPCshipmentsdeclined13.9%lastqu
A、Hestandstogain.B、Hethinksit’sunfair.C、Heagreestotheproposal.D、Herejectstheidea.C对话中女士提到ifyouweedthegarden
最新回复
(
0
)