首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
33
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1,编写如下程序代码:PrivateSubForm_Load()List1.AddItem"111"List1.AddItem"222"Lis
有下面程序代码:PrivateSubCommand1_Click()DimaAsStringa="CONPUTER"n=search(a,"T")PrintIIf(n=0,"未找到",n)EndSubPrivateFuncti
有下面程序代码:PrivateSubCommand1_Click()DimsignAsIntegersign=1a=1:b=2Fork=1To5c=a+sign*ba=b:b=cPrintc;sign=-signNextk
假定把计时器控件Timer1的Interval属性设置为1000,Enabled属性设置为True,并编写下面的事件过程:PrivateSubTimer1_Timer()DimxAsIntegerFori=1To
设运行程序时弹出的菜单如图所示.关于该菜单,以下叙述中错误的是( )。
在设计阶段,假定在图片框Picture1中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下:PublicxAsIntegerPrivateSubFo
面向对象方法中,继承是指()。
下列运算符中,优先级别最低的是
下列运算符中,优先级别最低的是()。
随机试题
《渔父》的作者是()
干扰素具有广谱抗病毒的作用,它能直接抑制病毒的复制。()
药用部位为动物生理产物的药材是
A.中国食品药品检定研究院B.CFDA食品药品审核查验中心C.CFDA药品审评中心D.CFDA药品评价中心参与制定、修订GLP、GCP、GMP、GAP、GSP、医疗器械GMP的机构是
粉煤灰硅酸盐水泥是指由硅酸盐水泥和20%~50%的粉煤灰、适量的石膏磨细制成的水硬性胶凝材料,代号为P·F。()
以下各项均是工程造价计价依据的类别,其中不是按照用途分类的是()。
“预收账款”账户属于债权结算账户,“预付账款”账户属于债务结算账户。()
李某种植的香蕉遭野象糟蹋,损失达2万余元。李某要求地方政府赔偿,地方政府以没有这项预算为由拒绝。李某遂向人民法院提起行政诉讼。对于此案,法院应当做出的判决是()。
Whyistheairportclosed?
A--accountnumberB--wageratepaidC--billofexchangeD--creditriskE--realnetprofitF--marketanalysisG--marketmechanism
最新回复
(
0
)