首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为"打开文件"的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open CD1.
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为"打开文件"的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open CD1.
admin
2018-05-08
98
问题
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为"打开文件"的命令按钮,如图所示。
命令按钮的单击事件过程如下:
Private Sub Command1_Click()
CD1.ShowOpen
Open CD1.FileName For Input As#1
MsgBox CD1.FileName
Line Input#1,s
Text1.Text=s
Close#1
End Sub
单击命令按钮,执行以上事件过程,打开选定的文件,读取文件的内容并显示在文本框中.以下叙述中正确的是( )。
选项
A、程序没有错误,可以正确完成打开文件、读取文件中内容的操作
B、执行Open命令时出错,因为没有指定文件的路径
C、Open语句是错误的,应把语句中的For Input改为For Output
D、Line Input命令格式错
答案
A
解析
第1条语句中用ShowOpen方法显示"打开"对话框后,在对话框中选中文件,单击"打开"按钮后,CD1.FileName属性就会返回打开文件的路径,所以用Open语句打开文件时,就可用CD1.FileName指定打开文件的路径,故B选项说法错误。
因为第4条语句中要用Line Input从文件读取数据,故用Open语句打开文件时用Input模式打开是正确的,故C选项说法错误。
Line Input命令格式为:Line Input #文件号,变量名,题中Line Input语句格式正确。故D选项错误。
本题程序无错误,能实现所说功能,故A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/fqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果为()。A=“5”:B=“6”A=Val(A)+Val(B)B=Val(“56”)IfA<>BThenPrintA-BElsePrintB-A
使用菜单编辑器设计菜单时,必须输入的项是()。
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()x=0doWhilex<50x=(x+2)
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
以下变量名中合法的是
若要清除列表框控件中的所有列表项,应该使用的方法是
深度为7的完全二叉树中共有125个结点,则该完全二叉树中的叶子结点数为
在数据库管理系统提供的数据语言中,负责数据模式定义的是
若实体A和B是一对一的联系,实体B和C是多对一的联系,则实体A和C的联系是
在满足实体完整性约束的条件下( )。
随机试题
2008年1月8日,温州制鞋企业奥康集团与意大利著名鞋业品牌万利威德签署全球战略合作协议。万利威德全球专卖店已超过2300家,奥康集团经过20年运作也已成为中国名牌,在国内开设了3000多家连锁专卖店。根据合作协议,奥康接管万利威德全球品牌经营权,万利威德
女性,68岁。慢性咳喘、咳痰近20年,近3年来症状加重,登二楼困难。有高血压病,服药控制较稳定、心电图示左心室肥大昨天傍晚无明确诱因突感胸闷、气急渐渐加重,不能平卧,彻夜未眠,今晨前来急诊体检:端坐呼吸,发绀。血压18/12kP小、气管位置无明显偏移
房地产市场需求调查包括()。
甲公司按照2020年的边际贡献和固定成本计算得出的经营杠杆系数为3,由此可知,2020年甲公司的安全边际率为()。
下列各项中,不属于法律行为的有()。
坚持一个中国原则,关键和核心是“和平统一,一国两制”。()
公安工作是我国()的重要组成部分。
伉俪情深:夫妻
用白盒测试技术测试以下流程图表示的程序,则至少分别需要设计()个测试用例就可以满足语句覆盖和路径覆盖。
____________(你本来能够通过那次考试的),butyouweren’tcarefulenough.
最新回复
(
0
)