首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open
admin
2016-08-24
41
问题
窗体上有一个名称为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://jikaoti.com/ti/1UJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列语句都是在Form中定义的,()是错的
下列4项对InputBox函数的使用说明,不正确的是()。
确定复选框是否选中,可访问的属性是()。
假定窗体有一个标签,名为Label1,为了使该标签透明并且没有边框,正确的属性设置为()。
______是数据库设计的核心。
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在________和________处填所需的内容,使其产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:1234123
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
下列叙述中正确的是()。
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
实体是信息世界中广泛使用的一个术语,它用于表示()。
随机试题
Iwenttoseemyparents_______NationalDay.()
dTMP是由下列哪种核苷酸直接转变
A.螺旋甾烷醇型B.达玛烷型C.齐墩果烷型D.乌索烷型E.羽扇豆烷型人参皂苷Ro是
某市检察院张某在办理一起受贿案件时,发现犯罪嫌疑人之一系其堂妹,故申请回避并经检察长同意。下列关于张某在申请回避前所取得的证据和进行的诉讼行为效力问题的表述,哪一项是正确的?()
某企业上年度全部资金来源包括普通股1640万元、长期债券1600万元、长期借款40万元,资金成本分别为20%、13%和12%。本年年初企业发行长期债券1200万元,年利率为14%,筹资费用率为2%,企业的股票价格变为每股38元。假设企业下年度发放股利每股5
风险缓释的目的在于降低未来风险发生时所带来的损失,()就是最常用、最重要的风险缓释措施。
下列历史事件按时间顺序排列正确的一组是()。
如果经计算机处理后,结果超过计算机可表示的数据范围,则称为_________。如超过最大值,则称为_________,如果超过最小值,则称为_______。
有如下程序:#includeusingnamespacestd;intmain(){int*p;*p=9;cout
•Youwillhearabusinesspresentationabout3simplesellingtactics.•Asyoulisten,forquestions1—12,completethenotes,
最新回复
(
0
)