'下划线(布尔型)
.SelUnderline = CommonDialog1.FontUnderline
'删除线(布尔型)
.SelStrikeThru = CommonDialog1.FontStrikethru
.SelColor = CommonDialog1.Color '颜色(长整型)
End With
Quit:
End Sub
11.1.1 设置字体格式 (4)
在上述代码中,首先利用通用对话框控件打开字体对话框,用户在对话框中设置格式并确认后,通过代码中的第二个With...End With语句块将RichTextBox控件中的选定文本格式设置为由字体对话框返回的各种格式.代码中RichTextBox控件的7个以"Sel"为前缀的属性(代表选定文本的各种格式)分别由字体对话框的对应属性赋值.代码中的注释说明了各属性的含义.程序运行效果如图11.1所示.
11.1.1 设置字体格式 (5)
图11.1 设置字体格式
返回首页
返回本节
11.1.2 设置段落格式(1)
1. 段落缩进
RichTextBox控件的SelIndent,SelRightIndent和SelHangingIndent属性分别用于设置选定段落的左缩进,右缩进和悬挂缩进,均为整型数值.缩进量的单位与窗体的ScaleMode属性有关,默认单位为缇(1厘米=567缇).
【例11.2】设置段落缩进.在例11.1中的窗体上增加一个按钮,Caption属性为"左缩进",在该按钮的单击事件过程中加入以下代码:
11.1.2 设置段落格式(2)
Dim sMargin As Single
sMargin = Val(InputBox("输入缩进量(厘米):", _
"左缩进"))
RichTextBox1.SelIndent = sMargin * 567
用同样的方法可设置右缩进和悬挂缩进.
2. 段落对齐方式
RichTextBox控件的SelAlignment属性用于设置选定段落的对齐方式.将该属性值设为常数rtfLeft或0为左对齐,rtfRight或1为右对齐,rtfCenter或2为居中.
11.1.2 设置段落格式(3)
3. 项目符号
将RichTextBox控件的SelBullet属性设为True即可为选定段落添加项目符号,若同时设置BulletIndent属性,则可指定含有项目符号的段落的缩进量(默认单位为缇).
提示:可将设置字体和段落格式的功能汇集在"格式"菜单中.
段落格式设置效果如图11.2所示.
返回首页
返回本节
11.1.3 使用剪贴板 (1)
RichTextBox控件的SelRTF属性含有当前选定的RTF格式文本.利用SelRTF属性和剪贴板(Clipboad)对象可以实现多格式文本的剪切,复制和粘贴操作.
1. 操作多格式文本
剪贴板对象的SetText方法用于向剪贴板传送文本.以下代码可将多格式文本复制到剪贴板:
Clipboard.Clear '清空剪贴板
'向剪贴板传送RTF文本
Clipboard.SetText RichTextBox1.SelRTF, _
vbCFRTF
- picture控件清空 > 实用扩展控件
-
实用扩展控件
下载该文档 文档格式:PPT 更新时间:2004-09-03 下载次数:0 点击次数:3文档基本属性 文档语言: 文档格式: ppt 文档作者: 关键词: 主题: 备注: 点击这里显示更多文档属性 经理: 单位: 分类: 创建时间: 上次保存者: User 修订次数: 91 编辑时间: 文档创建者: 修订: 加密标识: 幻灯片: 65 段落数: 443 字节数: 330200 备注: 0 演示格式: 在屏幕上显示 上次保存时间:
- 下载地址 (推荐使用迅雷下载地址,速度快,支持断点续传)
- PPT格式下载
- 更多文档...
-
上一篇:招标文件标
下一篇:常用控件与多窗体
点击查看更多关于picture控件清空的相关文档
- 您可能感兴趣的
- vb怎么清空picture picture控件显示图片 vcpicture控件 vbpicture控件 mfc中的picture控件 vcpicture控件画图 picture控件 vcpicture控件坐标 mfcpicture控件使用
- 大家在找
-
- · 北京西门子电气招聘
- · 北京天上人间夜总会
- · 通化县2011七中杀人
- · 地铁施工技术
- · 产业经济学专业描述
- · 英语四级新东方网校
- · 利润损益表
- · 黑龙江省科技厅
- · 欣比尔激光鼻炎治疗仪
- · aaaa半身裙
- · 上海大众cc现车报价
- · 李亚萍130727
- · 公共管理学什么
- · 关田山苗寨
- · 国电集团滦河发电厂
- · 毕业纪念册封面
- · 白血病会隔代遗传吗
- · 辽宁大学教务管理
- · 法学导论课件
- · 模具制作发动机
- · 应聘者面试提问
- · 天津城市建设学院排名
- · 安徽农村信用社联合社
- · 电动自行车价格及图片
- · 农村劳动力培训
- · 二手凸轮车床
- · 兄弟7340驱动下载xp
- · 移动通信原理与系统
- · 逻辑学导论试题
- · 学打锣鼓经说课稿
- 赞助商链接