网友您好， 请在下方输入框内输入要搜索的题目：

题目内容 （请给出正确答案）

阅读以下说明和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

参考答案

更多 “ 阅读以下说明和Visual Basic代码，将应填入(n)处的字句写在对应栏内。[说明]本程序实现的功能是查看磁盘上的图片及其基本信息。程序运行界面如下图所示，用户只要逐步选择适当的驱动器、目录和图片文件，图片内容随即显示在界面中央，文件的基本信息则呈现于右侧文本框中。用户还可以删除或复制选中的图片文件。在开发过程中，驱动器列表框名为Drivel，目录列表框名为Dir1，文件列表框名为File1，图片的显示由Image控件对象Image1来实现，文件信息文本框名为Text1，按钮“删除文件”和“复制到…”分别名为CmdDel和CmdCpy。[Visual Basic代码]Dim filename As StringDim fso As New (1), file As filePrivate Sub Form_Load()Set fso = CreateObject("Scripting.FileSystemObject")Drivel.Drive = "F:"End SubPrivate Sub Dir1_Change()File1.path=Dirl.path ’更新文件列表框的路径End SubPrivate Sub Drive1_Change()Dir1.path =(2) ’更新目录列表框的路径End SubPrivate Sub File1_Click()’文件列表框的单击事件响应代码If Right(Dir1.path, 1) ＜＞"\" Thenfilename = Dir1.path "\" Filel.filenameElsefilename = Dir1.path Filel.filenameEnd IfImage1.Picture =(3)Set file = fso.GetFile(filename)Text1. Text = "文件名称:" file.Name vbCrLf _"文件大小:" file. Size "字节" vbCrLf _"文件类型:" file.Type vbCrLf _"创建日期:" file. DateCreated vbCrLf _"修改日期:" file. DateLastModifiedEnd SubPrivate Sub CmdCpy_Chck()’按钮“复制到…”的单击事件响应代码Dim path As Stringpath = InputBox("请输入目标路径(含文件名):")(4)End SubPrivate Sub CmdDel_Click()’按钮“删除文件”的单击事件响应代码(5)End Sub ” 相关考题
考题 阅读以下说明和流程图，将应填入(n)处的字句写在对应栏内。【说明】已知头指针分别为La和lb的有序单链表，其数据元素都是按值非递减排列。现要归并La和Lb得到单链表Lc，使得Lc中的元素按值非递减排列。程序流程图如下所示：
查看答案
考题 阅读下列程序说明和C++程序，把应填入其中(n)处的字句，写在对应栏内。【说明】阅读下面几段C++程序回答相应问题。比较下面两段程序的优缺点。①for (i=0; i＜N; i++ ){if (condition)//DoSomething…else//DoOtherthing…}②if (condition) {for (i =0; i＜N; i++ )//DoSomething}else {for (i=0; i ＜N; i++ )//DoOtherthing…}
查看答案
考题 试题三（共 15 分）阅读以下说明和 C 程序，将应填入 （n） 处的字句写在答题纸的对应栏内。
查看答案
考题 （a）智能网概念模型中分布功能平面模型如下图所示，请根据此图将应填入（n）处的 字句写在答题纸的对应栏内。
查看答案
考题 阅读下列说明和C++-代码，将应填入（n）处的字句写在答题纸的对应栏内。 【说明】 某发票（lnvoice）由抬头（Head）部分、正文部分和脚注（Foot）部分构成。现采用装饰（Decorator）模式实现打印发票的功能，得到如图5-1所示的类图。 【C++代码】 #include using namespace std； class invoice{ public： （1）{ cout
查看答案
考题 阅读下列说明和C++代码，回答问题，将解答填入答题纸的对应栏内。 【说明】某航空公司的会员积分系统将其会员划分为:普卡 (Basic)、银卡(Silver)和金卡 (Gold) 三个等级。非会员 (NonMember) 可以申请成为普卡会员。会员的等级根据其一年内累积 的里程数进行调整。描述会员等级调整的状态图如图 5-1 所示。现采用状态 (State) 模式实现上述场景，得到如图 5-2 所示的类图。 【问题1】（15分）阅读上述说明和C++代码，将应填入 (n) 处的字句写在答题纸的对应栏内。
查看答案
考题 阅读下列说明和Java代码，将应填入（n）处的字句写在答题纸的对应栏内。【说明】 某文件管理系统中定义了类OfficeDoc和DocExplorer，当类OfficeDoc发生变化时，类DocExplorer的所有对象都要更新其自身的状态，现采用观察者（Observer）设计模式来实现该需求，所设计的类图如图6-1所示。
查看答案
考题 阅读下列说明和?C++代码，将应填入(n)处的字句写在答题纸的对应栏内。 【说明】 阅读下列说明和?Java代码，将应填入?(n)?处的字句写在答题纸的对应栏内。 【说明】 某快餐厅主要制作并出售儿童套餐，一般包括主餐(各类比萨)、饮料和玩具，其餐品种 类可能不同，但其制作过程相同。前台服务员?(Waiter)?调度厨师制作套餐。现采用生成器?(Builder)?模式实现制作过程，得到如图?6-1?所示的类图。
查看答案
考题 在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为e盘，选择File1中所列的图片文件（*.bmp，*.gif和*.jpg），则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。程序运行结果如下图所示。 程序如下，请补充完整。
查看答案
热门标签
最新试卷