首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2019-06-20
52
问题
窗体上有一个名称为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://kaotiyun.com/show/KcUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好了表对象“tCourse”、“tGrade”和“tStudent”,请按以下要求完成设计。(1)创建一个查询,查找并显示“姓名”、“政治面貌”和“毕业学校”等3个字段的内容,
考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。(1)将表对象“tEmp”中的“聘用时间”字段的格式
在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上“计算”按钮(名为bt)的单击事件代码,试按以下要求完成设计。(1)设置窗体对象“fEmp”的标题为
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1,为了使它们同步操作,必须触发驱动器的Change事件和目录的Change事件,在这两个事件中执行的语句分别为()。
关系表中的每一行记录称为一个()。
在表达式2+3*4^5-Sin(x+1)/2中,首先进行的运算是()。
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是
表达式Sgn(0.25)的值是
表达式Int(8*Sqr(36)*10^(-2)*10+0.5)/10的值是()。
通常软件测试实施的步骤是
随机试题
在美国卓越绩效标准的绩效测量指标里,投资回报和运营利润属于________指标()
男性,35岁,低热3周入院,诊断为亚急性细菌性心内膜炎。以下哪一项不属于IE的周围体征
牙龈卟啉单胞菌牙密螺旋体和奋森密螺旋体
A、草麻黄B、中麻黄C、木贼麻黄D、生麻黄E、蜜麻黄多分枝,有粗糙感,节间长2~6cm,鳞片裂片3(稀2),髓部呈三角状圆形
下列哪些药物能够进行乙酰化结合反应
《江城晚报》记者张某在某报上发表一篇评论性文章,文中谈道:“江城文坛中,有的作家剽窃别人的作品当作自己的作品出版,有的作家昧着良心沦为有钱人的‘枪手’,文化素质和道德水平都有待大幅度地提高。”该报在江城所辖的甲、乙、丙、丁四个区发行。该市的作家陈某和李某认
财政支出可以分为购买性支出和转移性支出,下列属于转移性支出的有()。
财务管理十分重视股价的高低,因其()。
我国建立的新的宏观经济调控体系是直接调控与间接调控相结合,以间接调控为主。()
除(47)外,以下各项都是项目质量管理的原则。
最新回复
(
0
)