首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。 命令按钮的单击事件过程如下: Private Sub Command1_Click() CD1.ShowOpen Open
admin
2018-07-11
51
问题
窗体上有一个名称为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/iKGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上添加一个文本框,其名称为Textl,然后通过属性窗口没置窗体和文本框的属性,实现如下功能:①在文本框中,MultilJne属性设置为Tme。②scrollBars属性设置为2;③文本框中显示的初
执行以下程序段:a$=“VisualBasicProgramming”b$:“C++”c$=UCase(Left$(a$,7))&b$&Right$(a$,12)后,变量c$的值为()。
关于随机文件,以下叙述中错误的是
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click()Dimarr_x(5,5)AsIntegerFori=1To3Forj=2To4arr_x(i,j)=i
设Labell、Command1、Text1、Checkl分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
以下合法的VB变量名是
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
下列关于算法复杂度叙述正确的是
为了用键盘打开菜单和执行菜单命令,第一步应按的键是()。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是()。
随机试题
在刚性连接的平面仿形铣床上铣削直线成形面时,仿形杆可制成圆锥体,并与模型轮廓斜度相等,以适应不同直径的铣刀。()
领导艺术是一种客观存在,其外在形态是
引起发热的病因中.下列哪项属非感性发热
土工合成材料铺筑时正确的做法是()。
2017年4月1日,王某与丁某签订了房屋买卖合同,双方约定:王某将其房屋出售给丁某,房价120万元。丁某支付房屋价款后,王某于2017年4月10日向丁某交付了房屋,但双方没有办理产权过户登记。丁某对房屋进行了简单装修,于2017年4月20日将该房屋出租给
导游人员(),全行业通报。
下列属于邓小平同志对社会主义的本质的论断有()。
下列西方著名画家及其流派对应不正确的是()。
民族精神是社会主义核心价值体系的重要内容之一,其核心是
Imaginethatyoucouldrewindtheclock20years,andyou’re20yearsyounger.Howdoyoufeel?Well,ifyou’reatalllikethe
最新回复
(
0
)