VB(6.1)制作写字板程序

VisualBasic6.0程序设计第6章菜单和工具栏设计————任务1制作写字板程序2／9第5章目录任务1制作写字板程序【知识点】菜单控件Rich-TextBox控件StatusBar控件Clipboard对象3／9任务1制作写字板程序1、菜单控件：用途：用于显示应用程序的自定义菜单。进入菜单编辑器的方式有如下几种：选择“工具”→“菜单编辑器”命令；

单击常用工具栏中的“菜单编辑器”按钮；

按Ctrl+E组合键；

l在要建立菜单的窗体（此窗体为活动窗体）上右击，在弹出的快捷菜单中选择“菜单编辑器”命令。第5章目录4／9任务1制作写字板程序1、菜单控件：用途：用于显示应用程序的自定义菜单。常用属性如下：Caption：设置或返回菜单项的菜单名或命令名。Check:设置或返回一个布尔值，决定是否在菜单项旁边显示一个复选标记，一般在代码中进行设置。Enabled：设置或返回一个布尔值，决定菜单项是否可用。Index：几个菜单项使用相同的名称时，把它们组成控件数组，可指定一个数字值来确定每一个菜单项在控件数组中的位置。Name：指定菜单控件的名称，用于代码编写。Shortcut：设置一个值指定菜单项的快捷键。Visible：设置或返回一个值，决定菜单项是否可见。WindowList:该复选框被选中（即框内为√）时，将显示当前打开的一系列子窗口。该选项用于多文档应用程序。第5章目录5／9任务1制作写字板程序1、菜单控件：用途：用于显示应用程序的自定义菜单。常用事件：Click事件。除顶级菜单和分隔栏之外，所有菜单控件都可以编写Click事件过程第5章目录6／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：FileName：返回或设置装入RichTextBox控件的文件名MaxLength：用于获取或设置在RichTextBox控件中能够键入或者粘贴的最大字符数。MultiLine：用于获取或设置RichTextBox控件的文本内容是否可以显示为多行。RightMargin：设置RichTextBox控件的右边距。ScrollBars：是否带有水平或垂直的滚动条。SelAlignment（运行态）：控制RichTextBox中段落的对齐方式，0：左，1：有，2：居中第5章目录7／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：SelBold（粗体）、SelItalic（斜体）、SelStrikethru（删除线）、SelUnderline（下划线）（运行态）：用于设置RichtTextBox控件中选定文本的字体样式SelBullet（运行态）：决定在RichTextBox控件中的段落是否有项目符号样式。SelCharOffset（运行态）：设置控件中文本的上下标，>0上标，<0下标SelColor（运行态）：设置控件中文本颜色SelFontName（运行态）:设置当前选定的文本字体。例：RichTextBox1.selFontName=

"宋体"第5章目录8／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：SelFontSize（运行态）:设置指定字体的大小例：RichTextBox1.SelFontSize=25SelHangingIndent、SelIndent、SelRightIndent（运行态）：设置段落的页边距设置值

SelHangingIndent指定了选定段落中文本首行左边缘与本段下面各行左边缘之间的距离

SelIndent

属性指定了RichTextBox控件的左边缘和选定或添加的文本的左边缘之间的距离。

SelRightIndent属性指定了RichTextBox控件的右边缘和选定或添加的文本的右边缘之间的距离。第5章目录9／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：SelLength、SelStart、SelText（运行态）：SelLength返回或设置所选择的字符数。SelStart返回或设置所选择的文本的起始点SelText返回或设置包含当前所选择文本的字符串；如果没有字符被选中，则为零长度字符串("")。第5章目录10／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：SelRTF（运行态）:含有当前选定的RTF格式文本。利用SelRTF属性和剪贴板（Clipboad）对象可以实现多格式文本的剪切、复制和粘贴操作。例：’剪贴板对象的GetText方法用于从剪贴板中粘贴文本。RichTextBox1.SelRTF=Clipboard.GetText(vbCFRTF)第5章目录11／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用属性如下：SelTabCount、SelTabs:返回文本的制表符数目及制表符的绝对位置。(制表符相当于键盘上按下TAB键之间的距离，也称为空白符)TextRTF:返回或设置控件的文本例：IfR1.Find(strFind,,Len(.TextRTF))=-1ThenR1.SelStart=R1.SelStart-lngLR1.SelLength=lngLMsgBox"查找结束。",vbInformation,"提示"EndIf第5章目录12／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用方法如下：Find方法：用于搜索特定字符串。若找到待查内容则将其反相显示，并返回其位置；若未找到则返回-1。Find方法的调用格式为：RichTextBox控件名称.Find(待查字符串[，起始位置，结束位置，选项])GetLineFromChar方法：返回指定字符位置的行的行号语法：object.GetLineFromChar(charpos)第5章目录13／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用方法如下：LoadFile方法：用于装载文件语法：object.LoadFilepathname,filetype例：rtbBox.LoadFilesFileName'在文本框中加载所选文件SaveFile方法：把控件的内容存入文件语法：object.SaveFilepathname,filetype例：rtbBox.SaveFilesFileName'将文本框内容保存到文件中第5章目录14／9任务1制作写字板程序2、RichTextBox控件：用途：多格式文本框（RichTextBox），允许用户输入和编辑文本的同时提供了比普通的TextBox控件所没有的更高级的指定格式的许多功能。常用方法如下：SelPrint方法：用于把控件中的格式化文本发送给设备进行打印语法：object.SelPrint(HDC)例：rtbBox.SelPrint(Printer.hDC)

'打印rtbBox控件的可见区域第5章目录15／9任务1制作写字板程序3、状态栏控件(StatusBar)：用途：一般情况下，状态栏都是出现在窗体的底部，用来显示系统信息和对用户的提示。第5章目录16／9任务1制作写字板程序3、状态栏控件(StatusBar)：1．关于状态栏的“窗格”选项卡的几点说明插入窗格、删除窗格：这两个按钮可以在状态栏中添加新的窗格，最多添加16个窗格，或者删除已插入的窗格。索引、关键字：这两个文本框分别表示每个窗格的编号和标识。文本：此文本框内的信息是在窗格上显示的文本。工具提示文本：与工具栏中工具提示文本的功能一样，当鼠标指向相应的窗格时，将出现提示信息。样式：此下拉列表框指定系统提供的显示信息。

sbrText0显示文本和/或位图。sbrCaps1显示CapsLock状态。sbrNum2显示NumberLock状态。sbrIns3显示Insert键状态。sbrScrl4显示ScrollLock状态。sbrTime5以System格式显示时间。sbrDate6以System格式显示日期。sbrKana7Kana。当激活滚动锁定时，显示黑体字母KANA，反之当停用滚动锁定时，则显示暗淡的字母KANA。第5章目录17／9任务1制作写字板程序3、状态栏控件(StatusBar)：1．关于状态栏的“窗格”选项卡的几点说明对齐：此下拉列表框指定状态信息在对应窗格的对齐方式

sbrLeft0文本靠左。sbrCenter1文本居中。sbrRight2文本靠右。图片：可在相应的窗格中插入图片，图片文件的扩展名可以是.ico、.bmp。有效、可见：这两个复选框用于控制相应窗格中的信息是否有效，是否可见第5章目录18／9任务1制作写字板程序4、Clipboard对象：用途：提供对系统剪贴板的访问。常用方法如下：Clear：清除剪贴板上的信息语法：Clipboard.Clear