第11章 实用扩展控件
11.1 RichTextBox控件
11.2 TreeView和ListView控件
11.3 其他扩展控件
结束
11.1 RichTextBox控件
概述
11.1.1 设置字体格式
11.1.2 设置段落格式
11.1.3 使用剪贴板
11.1.4 查找文本
11.1.5 打开与保存文件
返回首页
概述
RichTextBox控件又称为多格式文本框,使用该控件不仅可以输入和编辑文本,还可以对控件中任何部分的文本设置不同的格式,如对选定文本设置字体,字号,字形,颜色,下划线,删除线等.此外,在该控件中还可以设置左右缩进和悬挂式缩进等段落格式,插入图片,并以RTF和纯文本两种格式打开和保存文件.
加载RichTextBox控件的方法:右击工具箱,在弹出菜单中选择【部件】菜单项,打开【部件】对话框,在【控件】选项卡的列表中选中"Microsoft Rich Textbox Control 6.0"前面的复选框,单击【确定】按钮.此时工具箱中将增加该控件的图标 .
返回首页
返回本节
11.1.1 设置字体格式 (1)
下面通过实例说明如何设置RichTextBox控件中选定文本的字体格式.
【例11.1】利用字体对话框设置RichTextBox控件中选定文本的字体格式.
新建工程,在窗体上添加一个RichTextBox和一个CommonDialog控件,均采用默认名称.将RichTextBox控件的ScrollBars属性设为2.再添加一个命令按钮,名称为cmdFont,Caption属性为"字体".以下是按钮单击事件过程的代码:
11.1.1 设置字体格式 (2)
Private Sub cmdFont_Click()
On Error GoTo Quit
With CommonDialog1 '设置通用对话框相关属性
'显示所有字体和效果选项
.Flags = cdlCFBoth Or cdlCFEffects
'设置对话框默认字体名称
If .FontName = "" Then .FontName = "宋体"
' 对用户单击"取消"按钮做出响应
.CancelError = True .ShowFont '打开字体对话框
End With
'设置RichTextBox控件中选定文本字体格式
With RichTextBox1
11.1.1 设置字体格式 (3)
'字体名称(字符串型)
.SelFontName = CommonDialog1.FontName
.SelFontSize = CommonDialog1.FontSize '字号(整型)
.SelBold = CommonDialog1.FontBold '粗体(布尔型)
.SelItalic = CommonDialog1.FontItalic '斜体(布尔型)

下一页