首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Commandl_Click() Dim sl As String,s2 As String O
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Commandl_Click() Dim sl As String,s2 As String O
admin
2018-10-15
44
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:
Private Sub Commandl_Click()
Dim sl As String,s2 As String
Open”c:\d4.dat”For Append As#3
Line Input#3,sl 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
解析
Visual Basic程序中关于文件的操作,主要是先打开一个文件,然后对这个文件进行读或写的操作,操作完成后,关闭这个文件。打开文件的基本格式为:Open FileName For Mode As#FileNumber。打开方式主要有Output、Append、Input、Random等几种方式。Output、Append、Input方式打开的文件进行的读写操作都是以顺序方式进行的,其中Output、Append打开的文件主要用来输出数据,与Print#、Write#等方法配合使用;以Input方式打开的文件主要用来读入数据,它与Input#、Line Input#语句配合使用。
转载请注明原文地址:https://kaotiyun.com/show/kTFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当直线控件的BorderStyle属性被设置为:2-Dash,控件显示的是
以下语句或子句中,符合VisualBasic语法要求的是
确定图片框Picture1在窗体上位置的属性是( )。
窗体上有1个名称为Text1的文本框,1个名称为Label1的标签。程序运行后,如果在文本框中输入信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。
软件设计中划分模块的一个准则是( )。
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)
对于列表框控件List1,能够表示当前被选中列表项内容的是()。
要想使列表框只允许单选列表项,应设置的属性为()。
以下说法中正确的是
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是( )。
随机试题
教师是课程实施成功的决定性力量,特别是在课堂教学层面,教师成为课程实施的核心。教师的影响主要体现在()
AtamusicfestivalinCaliforniainJune1967,amiddle-agedsitarplayerwatchedJimiHendrixsethisguitaronfire.Thecrow
Inaworldincreasinglyfearsomeandfragile,commercialspresentanoasis(绿洲)ofcalmandcomfort.Forsixminutesineveryhour
急性虹膜睫状体炎治疗的关键是
关于原发型肺结核,下列描述错误的是
若二层采用MUIO烧结普通砖、M7.5混合砂浆,试问,二层外纵墙Qa的高厚比验算式左右端项的数值,应与下列何项最为接近?
ABC会计师事务所的A注册会计师负责审计多家上市公司2018年度财务报表,遇到下列与审计报告相关的事项: (1)A注册会计师无法就乙公司2018年年末存放在第三方的存货获取充分、适当的审计证据,对财务报表发表了保留意见。A注册会计师认为除这一事项外,不存
()属于人的发展的特征。
提出动机的强化理论的心理学家属于学习理论流派里的()。
It’snosecret:high-techcareerspaywell,andtherearelotsofjobsthatgobegging. Butareyourightforacareerint
最新回复
(
0
)