VB(6.1)制作写字板程序重点回顾.pptVIP

汝南县职业教育中心 汝南县职业教育中心 汝南县职业教育中心 Visual Basic 6.0程序设计 第6章 菜单和工具栏设计 ————任务1 制作写字板程序 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 重点属性如下： SelLength、SelStart、SelText ： SelLength返回或设置所选择的字符数(选中文本字符数) 例：rtbBox.SelLength = Len(rtbBox.Text) SelStart返回或设置所选择的文本的起始点（选中文本的起点） 例：rtbBox.SelStart = 0 SelStart和SelLength配合使用可实现全选功能 例： rtbBox.SelStart = 0 rtbBox.SelLength = Len(rtbBox.Text) 第5章目录 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 重点属性如下： SelLength、SelStart、SelText ： SelText返回或设置包含当前所选择文本的字符串(选中文本内容) 例：Clipboard.SetText rtbBox.SelText 设置剪贴板内容 可实现剪切、复制、粘贴功能 例： Clipboard.SetText rtbBox.SelText ‘复制 rtbBox.SelText = “ ‘剪切 rtbBox.SelText = Clipboard.GetText ‘粘贴 第5章目录 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 重点属性如下： SelRTF :含有当前选定的RTF格式文本。利用SelRTF属性和剪贴板（Clipboad）对象可以实现多格式文本的剪切、复制和粘贴操作。 例：’剪贴板对象的GetText方法用于从剪贴板中粘贴文本。 RichTextBox1.SelRTF = Clipboard.GetText(vbCFRTF) 第5章目录 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 重要方法如下： Find方法：用于搜索特定字符串。若找到待查内容则将其反相显示，并返回其位置；若未找到则返回-1。Find方法的调用格式为： RichTextBox控件名称.Find(待查字符串[，起始位置，结束位置，选项]) 可实现查找文本功能 例： If RichTextBox1.Find(strFind) = -1 Then If .Find(strFind,,Len(.TextRTF))= -1 查找下一项 第5章目录 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 常用方法如下： LoadFile方法：用于装载文件 语法：object.LoadFile pathname,filetype 可实现打开文本功能 打开RTF文件 RichTextBox1.LoadFile .FileName, rtfRTF 打开文本文件 RichTextBox1.LoadFile .FileName, rtfText 例： rtbBox.LoadFile sFileName 在文本框中加载所选文件 第5章目录 *／9 任务1 制作写字板程序 RichTextBox控件： 用途：多格式文本框（RichTextBox），允许用户输入和编辑文本 的同时提供了比普通的TextBox控件所没有的更高级的指定格式的 许多功能。 常用方法如下： SaveFile方法：把控件的内容存入文件 语法：object. SaveFile pathname,filetype 可实现保存文本功能 保存文件为RTF格式 RichTextBox1.SaveFile .FileName, rtfRTF 保存文本文件 RichTextBox1