首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序实现的功能是查看磁盘上的图片及其基本信息。程序运行界面如下图所示,用户只要逐步选择适当的驱动器、目录和图片文件,图片内容随即显示在界面中央,文件的基本信
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序实现的功能是查看磁盘上的图片及其基本信息。程序运行界面如下图所示,用户只要逐步选择适当的驱动器、目录和图片文件,图片内容随即显示在界面中央,文件的基本信
admin
2009-02-15
52
问题
阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。
[说明]
本程序实现的功能是查看磁盘上的图片及其基本信息。程序运行界面如下图所示,用户只要逐步选择适当的驱动器、目录和图片文件,图片内容随即显示在界面中央,文件的基本信息则呈现于右侧文本框中。用户还可以删除或复制选中的图片文件。
在开发过程中,驱动器列表框名为Drivel,目录列表框名为Dir1,文件列表框名为File1,图片的显示由Image控件对象Image1来实现,文件信息文本框名为Text1,按钮“删除文件”和“复制到…”分别名为CmdDel和CmdCpy。
[Visual Basic代码]
Dim filename As String
Dim fso As New (1), file As file
Private Sub Form_Load()
Set fso = CreateObject("Scripting.FileSystemObject")
Drivel.Drive = "F:"
End Sub
Private Sub Dir1_Change()
File1.path=Dirl.path ’更新文件列表框的路径
End Sub
Private Sub Drive1_Change()
Dir1.path =(2) ’更新目录列表框的路径
End Sub
Private Sub File1_Click()’文件列表框的单击事件响应代码
If Right(Dir1.path, 1) <>"\" Then
filename = Dir1.path & "\" & Filel.filename
Else
filename = Dir1.path & Filel.filename
End If
Image1.Picture =(3)
Set file = fso.GetFile(filename)
Text1. Text = "文件名称:" & file.Name & vbCrLf & _
"文件大小:" & file. Size & "字节" & vbCrLf & _
"文件类型:" & file.Type & vbCrLf & _
"创建日期:" & file. DateCreated & vbCrLf & _
"修改日期:" & file. DateLastModified
End Sub
Private Sub CmdCpy_Chck()’按钮“复制到…”的单击事件响应代码
Dim path As String
path = InputBox("请输入目标路径(含文件名):")
(4)
End Sub
Private Sub CmdDel_Click()’按钮“删除文件”的单击事件响应代码
(5)
End Sub
选项
答案
(1) FileSystemObject (2) Drivel.Drive (3) LoadPic ture(filename) (4) file.Copy path (5) file.Delete
解析
(1)程序中需要用到FSO对象fso,这里是fso的变量声明;
(2)DriveListBox控件对象的Drive属性指定了当前的驱动器;
(3)为Image控件对象装载图片时应调用LoadPicture方法,其参数是图片文件的完整路径;
(4)复制文件应调用文件对象的Copy方法;
(5)删除文件应调用文件对象的Delete方法。
转载请注明原文地址:https://kaotiyun.com/show/JbjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
用Word2007编辑文件时,查找和替换中能使用的通配符是______。
在Word2007文档编辑时,使用(39)________________选项卡中的“分隔符”命令,可以在文档中指定位置强行分页。
黑屏是微机显示器常见的故障现象。发生黑屏时需要检查的项目不包括(27)________________。
n=1,2,3,…,100时,[n/3]共有(4)________________个不同的数([a]表示a的整数部分,例如[3.14]=3)。
某商场统计了每个月的销售总额,坚持了多年。每次公布上月销售额时,还都采用同比和环比概念与历史数据进行对比。以下叙述中,正确的是________________。
对数据分析处理人员的素质要求不包括()。
以下关于Word2010图形和图片的叙述中,不正确的是()。
在统计学中,用来衡量一个样本中各个数据波动大小的量是______。
为了调查某学校3000名学生的身高,抽取了100名学生进行身高测量,以下叙述中正确的是(23)。
在Excel的A2单元格中输入:“=1=2”,则显示的结果是______。
随机试题
Thenewestsportsfacilityinthehotelis
某女,50岁,近段时间无故地担心在外工作的家人会出现意外,激动不安,失眠,诊断为焦虑症。应选用的治疗药物是
城市土地利用结构合理性的主要指标不包括()。
某港口工程中,所配制混凝土的施工可操作性的具体要求包括混凝土的()。
槽盒内的绝缘导线总截面不应超过槽盒内截面的()。
根据新的企业所得税法规定,国家重点扶持的高新技术企业,适用的企业所得税税率是()。
用临时升降号,写出下列各调式音阶。(1)以D为角音的燕乐商调式;(2)降D和声大调;(3)B和声小调;(4)D雅乐角调式;(5)升F燕乐宫调式。
小王乘坐匀速行驶的公交车和人行道上与公交车相对而行、匀速行走的小李相遇,30秒后公交车到站,小王立即下车与小李同一方向匀速快步行走。已知他行走的速度比小李的速度快一倍但比公交车的速度慢一半,则他多久之后追上小李?
[*]
TheHomesteadActof1862gavebeadsoffamiliesorindividualsagedtwenty-oneoroldertherighttoown160acresofpublicla
最新回复
(
0
)