ccidnet????

出版日期：1997-06-16　总期号：662　本年期号：22

本期导读
综合消息
网络通信
市场商情
国际文摘
专题评测
编程维修
 用vb中的richtext框实现文字的排版处理

李涛

　　从visualbasic4．0开始，就提供了richtext框控件，它可以对文字进行适当的排版处理。

　　但是richtext框控件，在visualbasic启动时并不在工具箱中出现，可能一些用户根本不知道它的存在。要将richtext框加入到工具箱中，需要从tools菜单中选customcontrols。然后在customcontrols对话框中单击microsoftrichtextcustomcntrol边上的方框，使其选入，选择ok返回visualbasic设计环境，你就可以从工具箱中找到richtext框了。

　　richtext框支持text框的所有属性，所以可以很容易地利用richtext框来取代text框。

　　下面一段向大家介绍一下richtext框新增的一些函数和属性。

　　1、改变字体

　　同text框一样，可以在properties对话框中设置初始字体。作为richtext框的默认字体。可以通过下列属性的一个或多个对具体选定的文字进行排版：

　　·selfontname—改变所选文本的字体。

　　·selbold—使所选文本变成黑体。

　　·selitalic—使所选文本成为斜体。

　　·selfontsize—改变所选文本的字体尺寸。

　　·selunderline—为所选文本加下划线。

　　·selstrikethrough—为所选文本加删除线。

　　例如要把richtext1框中的选定文本变成宋体可用如下语句：

　　richtext1selfontnameΚ“宋体”

　　例如要把richtext1框中的选定文本加下划线可有如下语句：

　　richtextlselunderlineΚtrue

　　2、改变段落形式

　　richtext框不但能改变文字的字体特征，还允许用户在文本中使用缩进和悬挂。标准的缩进使所选的文本段落的左边界从richtext框的左边界处向右移。这类缩进是利用selindent属性来完成的。selrightindent属性还可以使所选的文本段落的右边界向左移。而selhangingindent属性可使所选文本段落中，第一行后的所有行都缩进。

　　这三种属性只能用代码设置，使用语法相同。用selindent的语法例子说明：窗体名·控件名·selindentΚ数值

　　利用richtext框，可改变文本中段落中的对齐方式。可实现段落沿richtext框的左边界对齐（默认形式）、右边界对齐和居中。控制文本对齐的属性是selalignment属性。语法为：窗体名·控件名·selalignmentΚ属性值

　　属性值可选0、1、2。其中0为左对齐，1为右对齐，2为居中。

　　3、保存和读取编辑过的文件

　　为了保存richtext框中的排版信息，不但要保存文本，还要保存排版代码，这是很麻烦的一件事。值得庆幸的是，visualbasic4．0提供了保存和提取的控制方法，可以完全的为用户做对这些工作。

　　要保存richtext框中的文本可以用savefile，用法如下：

　　richtext框名·savefileΚ要保存文件的路径（盘符和目录）和名称

　　为了将编辑过的文件调回richtext框编辑，可以用loadfile，用法如下：

　　richtext框名·loadfileΚ要保存文件的路径（盘符和目录）和名称

　　因为有了richtext框，visualbasic的文本编辑进入了它前所未有的新领域。现在编出类似windows中“书写器”的程序将不再是一件难事，如果有兴趣不妨试一试。