清华大学vb编程语言基础_第11讲_界面设计AND文件1.pptVIP

第十一讲 界面设计-2 　文件 内容提要 多窗体 设置启动对象 多窗体有关的语句和方法 多窗体有关的语句和方法 多窗体-例 多窗体-例 多文档界面 创建多文档界面 创建子窗体 MDI窗体与子窗体的交互 MDI窗体的Arrange方法 工具栏设计 ImageList控件添加图像 ToolBar控件添加按钮 ToolBar控件添加按钮 响应ToolBar控件事件 工具栏-例 RichTextBox控件 文件操作方法 文件操作-例 文件操作方法 常用格式化属性 常用格式化属性 RichTextBox控件-例 RichTextBox控件-例 插入图像 剪贴板 剪贴板 剪贴板 剪贴板 剪贴板 剪贴板-例 剪贴板-例 文件系统控件 驱动器列表框 目录列表框 文件列表框 文件列表框 三个文件系统控件协同工作 文件系统控件－例 文件 文件结构 文件分类 文件分类 文件的基本操作 文件的打开 文件的打开 文件的关闭 文件的读写语句和函数 顺序文件的写操作 顺序文件的写操作-例 顺序文件的读操作 顺序文件的读操作 顺序文件的读操作 顺序文件-例 本学期综合作业 Clipboard.SetText Text1.SelText Text2.SelText = Clipboard.GetText Clear 方法 清除剪贴板中的内容 Clipboard.Clear GetText方法 把剪贴板的当前内容返回到目标对象中 目标对象=Clipboard.GetText() 调色板格式 vbCFPalette 9 与装置无关的位图格式 vbCFDIB 8 Windows元文件(.WMF) vbCFMetafile 3 位图格式 vbCFBitmap 2 文字格式 vbCFText 1 用于动态数据交换 vbCFLink HBF00 说明 常量 号码 SetData方法 把图片框或图像框中的图像放入剪贴板 Clipboard.Setdata 源对象 [,数据格式] GetData方法 返回剪贴板中图片框或图像框属性的内容 目标对象=Clipboard.Getdata (数据格式) Clipboard.SetData Picture1.Picture, 2 Picture2.Picture = Clipboard.GetData(2) Public Sub filecutproc() Clipboard.Clear Clipboard.SetText frmMDI.ActiveForm.ActiveControl.SelText frmMDI.ActiveForm.ActiveControl.SelText = End Sub 使用剪贴板实现剪切、复制、粘贴操作 Public Sub filecopyproc() Clipboard.SetText frmMDI.ActiveForm.ActiveControl.SelText End Sub Public Sub filepasteproc() frmMDI.ActiveForm.ActiveControl.SelText = Clipboard.GetText End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) With frmMDI.ActiveForm.ActiveControl Select Case Button.Key ……. Case TCut filecutproc Case TCopy filecopyproc Case TPaste filepasteproc End Select End With End Sub 使用剪贴板实现剪切、复制、粘贴操作 VB提供了三个文件系统控件：驱动器列表框、目录列表框和文件列表框 都具有Enabled、 Visible、 Top、Left、Width、Height、List、ListIndex、ListCount等属性 利用此三个控件可以编写文件管理程序 Drive属性 用来设置或返回选择的驱动器名,只能在运行时设置 驱动器列表框名称.Drive[=驱动器名] Change事件 重新设置驱动器列表框的Drive属性时触发 Click事件 单击驱动器列表框时触发 用来显示当前驱动器上的目