求一个VB字符编程

设计一个字符格式化界面,功能包括,字体,字型,字号,对齐,字体颜色,下划线,删除线。预览效果会得加Q582333039... 设计一个字符格式化界面,功能包括,字体,字型,字号,对齐,字体颜色,下划线,删除线。预览效果
会得加Q 582333039
展开
 我来答
剑小风
2011-12-17 · TA获得超过117个赞
知道答主
回答量:105
采纳率:0%
帮助的人:126万
展开全部
我有 你要? 我的百度空间有
追问
有没有成品的
追答
我直接发到你邮箱?
zgwxm
2011-12-17 · 经典歌曲、名人名家歌曲视频
zgwxm
采纳数:1792 获赞数:21142

向TA提问 私信TA
展开全部
'将“工程-部件”中Microsoft Common Dialog Control 6.0选中
Private Sub Command1_Click()
'将 Cancel 设置成 True。
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
'设置 Flags 属性。
CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects
'显示“字体”对话框。
CommonDialog1.ShowFont
'根据用户的选择来设置文本属性。
Text1.Font.Name = CommonDialog1.FontName
Text1.Font.Size = CommonDialog1.FontSize
Text1.Font.Bold = CommonDialog1.FontBold
Text1.Font.Italic = CommonDialog1.FontItalic
Text1.Font.Underline = CommonDialog1.FontUnderline
Text1.FontStrikethru = CommonDialog1.FontStrikethru
Text1.ForeColor = CommonDialog1.Color
Exit Sub
ErrHandler:
'用户按了“取消”按钮。
Exit Sub
End Sub
更多追问追答
追问
有没有成品
追答
这还不够成品吗?你想要什么样的成品呀?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式